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 // XXX: the shorty doesn't store enough information
517 bool operator <(const CYJavaSignature
&rhs
) const {
518 return shorty_
< rhs
.shorty_
;
522 typedef std::set
<CYJavaSignature
> CYJavaOverload
;
523 typedef std::map
<unsigned, CYJavaOverload
> CYJavaOverloads
;
525 struct CYJavaMethod
:
528 CYJavaOverloads overloads_
;
530 CYJavaMethod(const CYJavaOverloads
&overloads
) :
531 overloads_(overloads
)
536 struct CYJavaStaticMethod
:
539 CYJavaOverloads overloads_
;
541 CYJavaStaticMethod(const CYJavaOverloads
&overloads
) :
542 overloads_(overloads
)
550 CYJavaGlobal
<jclass
> value_
;
553 CYJavaFieldMap static_
;
554 CYJavaFieldMap instance_
;
555 CYJavaOverloads overloads_
;
557 CYJavaClass(const CYJavaRef
<jclass
> &value
, bool interface
) :
559 interface_(interface
)
564 static JSObjectRef
CYGetJavaClass(JSContextRef context
, const CYJavaRef
<jclass
> &_class
);
566 struct CYJavaObject
:
569 CYJavaGlobal
<jobject
> value_
;
572 CYJavaObject(const CYJavaRef
<jobject
> &value
, CYJavaClass
*table
) :
578 JSValueRef
GetPrototype(JSContextRef context
) const;
581 struct CYJavaInterior
:
584 CYJavaGlobal
<jobject
> value_
;
587 CYJavaInterior(const CYJavaRef
<jobject
> &value
, CYJavaClass
*table
) :
594 struct CYJavaStaticInterior
:
597 CYJavaGlobal
<jclass
> value_
;
600 CYJavaStaticInterior(const CYJavaRef
<jclass
> &value
, CYJavaClass
*table
) :
610 CYJavaGlobal
<jarray
> value_
;
611 CYJavaPrimitive primitive_
;
613 CYJavaArray(const CYJavaRef
<jarray
> &value
, CYJavaPrimitive primitive
) :
615 primitive_(primitive
)
619 JSValueRef
GetPrototype(JSContextRef context
) const;
622 struct CYJavaPackage
:
627 typedef std::vector
<std::string
> Path
;
630 _finline
CYJavaPackage(JNIEnv
*jni
, const Path
&package
) :
637 JSValueRef
CYJavaObject::GetPrototype(JSContextRef context
) const {
638 CYJavaEnv
jni(value_
);
639 return CYGetProperty(context
, CYGetJavaClass(context
, jni
.GetObjectClass(value_
)), prototype_s
);
642 JSValueRef
CYJavaArray::GetPrototype(JSContextRef context
) const {
643 return CYGetCachedObject(context
, CYJSString("Array_prototype"));
646 static JSValueRef
CYCastJSValue(JSContextRef context
, const CYJavaRef
<jobject
> &value
) {
648 return CYJSNull(context
);
649 CYJavaEnv
jni(value
);
651 auto _class(jni
.GetObjectClass(value
));
652 if (jni
.IsSameObject(_class
, jni
.FindClass("java/lang/String")))
653 return CYCastJSValue(context
, CYJSString(value
.cast
<jstring
>()));
655 auto Class$
(jni
.FindClass("java/lang/Class"));
656 auto Class$
isArray(jni
.GetMethodID(Class$
, "isArray", "()Z"));
657 if (jni
.CallBooleanMethod(_class
, Class$isArray
)) {
658 auto Class$
getComponentType(jni
.GetMethodID(Class$
, "getComponentType", "()Ljava/lang/Class;"));
659 auto component(jni
.CallObjectMethod
<jclass
>(_class
, Class$getComponentType
));
660 auto Class$
getName(jni
.GetMethodID(Class$
, "getName", "()Ljava/lang/String;"));
661 return CYPrivate
<CYJavaArray
>::Make(context
, value
.cast
<jarray
>(), CYJavaGetPrimitive(context
, component
, Class$getName
));
664 auto Wrapper$
(jni
.FindClass("Cycript$Wrapper"));
665 if (jni
.IsSameObject(_class
, Wrapper$
)) {
666 auto Wrapper$
getProtect(jni
.GetMethodID(Wrapper$
, "getProtect", "()J"));
667 auto &protect(*reinterpret_cast<CYProtect
*>(jni
.CallLongMethod(value
, Wrapper$getProtect
)));
671 CYJavaClass
*table(reinterpret_cast<CYJavaClass
*>(JSObjectGetPrivate(CYGetJavaClass(context
, _class
))));
672 return CYPrivate
<CYJavaObject
>::Make(context
, value
, table
);
675 static _finline JSObjectRef
CYCastJSObject(JSContextRef context
, const CYJavaRef
<jobject
> &value
) {
676 return CYCastJSObject(context
, CYCastJSValue(context
, value
));
679 static CYJavaLocal
<jstring
> CYCastJavaString(const CYJavaEnv
&jni
, JSContextRef context
, CYUTF16String value
) {
680 return jni
.NewString(value
.data
, value
.size
);
683 static CYJavaLocal
<jstring
> CYCastJavaString(const CYJavaEnv
&jni
, JSContextRef context
, JSStringRef value
) {
684 return CYCastJavaString(jni
, context
, CYCastUTF16String(value
));
687 #define CYCastJava$(T, Type, jtype, Cast) \
688 _disused static CYJavaLocal<jobject> CYCastJava ## Type(const CYJavaEnv &jni, JSContextRef context, JSValueRef value) { \
689 auto Type$(jni.FindClass("java/lang/" #Type)); \
690 auto Type$init$(jni.GetMethodID(Type$, "<init>", "(" #T ")V")); \
691 return jni.NewObject(Type$, Type$init$, static_cast<jtype>(Cast(context, value))); \
694 CYCastJava$
(Z
, Boolean
, jboolean
, CYCastBool
)
695 CYCastJava$
(B
, Byte
, jbyte
, CYCastDouble
)
696 CYCastJava$
(C
, Character
, jchar
, CYCastDouble
)
697 CYCastJava$
(S
, Short
, jshort
, CYCastDouble
)
698 CYCastJava$
(I
, Integer
, jint
, CYCastDouble
)
699 CYCastJava$
(J
, Long
, jlong
, CYCastDouble
)
700 CYCastJava$
(F
, Float
, jfloat
, CYCastDouble
)
701 CYCastJava$
(D
, Double
, jdouble
, CYCastDouble
)
703 static CYJavaClass
*CYGetJavaTable(JSContextRef context
, JSObjectRef object
) {
704 if (!JSValueIsObjectOfClass(context
, object
, CYPrivate
<CYJavaClass
>::Class_
))
706 return reinterpret_cast<CYJavaClass
*>(JSObjectGetPrivate(object
));
709 static CYJavaObject
*CYGetJavaObject(JSContextRef context
, JSObjectRef object
) {
710 if (!JSValueIsObjectOfClass(context
, object
, CYPrivate
<CYJavaObject
>::Class_
))
712 return reinterpret_cast<CYJavaObject
*>(JSObjectGetPrivate(object
));
715 static CYJavaLocal
<jobject
> CYCastJavaObject(const CYJavaEnv
&jni
, JSContextRef context
, JSObjectRef value
) {
716 if (CYJavaObject
*internal
= CYGetJavaObject(context
, value
))
717 return internal
->value_
;
719 auto Wrapper$
(jni
.FindClass("Cycript$Wrapper"));
720 auto Wrapper$$init$
(jni
.GetMethodID(Wrapper$
, "<init>", "(J)V"));
721 CYProtect
*protect(new CYProtect(context
, value
));
722 return jni
.NewObject(Wrapper$
, Wrapper$$init$
, reinterpret_cast<jlong
>(protect
));
725 static CYJavaLocal
<jobject
> CYCastJavaObject(const CYJavaEnv
&jni
, JSContextRef context
, JSValueRef value
) {
726 switch (JSValueGetType(context
, value
)) {
730 return CYCastJavaBoolean(jni
, context
, value
);
732 return CYCastJavaDouble(jni
, context
, value
);
734 return CYCastJavaString(jni
, context
, CYJSString(context
, value
));
736 return CYCastJavaObject(jni
, context
, CYCastJSObject(context
, value
));
738 case kJSTypeUndefined
:
739 // XXX: I am currently relying on this for dynamic proxy of void method
746 static JSObjectRef
CYGetJavaClass(JSContextRef context
, const CYJavaRef
<jclass
> &value
) {
747 CYJavaEnv
jni(value
);
748 CYJavaFrame
frame(jni
, 64);
750 JSObjectRef
global(CYGetGlobalObject(context
));
751 JSObjectRef
cy(CYCastJSObject(context
, CYGetProperty(context
, global
, cy_s
)));
753 auto Class$
(jni
.FindClass("java/lang/Class"));
754 auto Class$
getName(jni
.GetMethodID(Class$
, "getName", "()Ljava/lang/String;"));
756 CYJSString
name(jni
.CallObjectMethod
<jstring
>(value
, Class$getName
));
757 JSValueRef
cached(CYGetProperty(context
, cy
, name
));
758 if (!JSValueIsUndefined(context
, cached
))
759 return CYCastJSObject(context
, cached
);
761 JSObjectRef constructor
;
762 JSObjectRef prototype
;
766 auto Class$
isInterface(jni
.GetMethodID(Class$
, "isInterface", "()Z"));
768 auto Class$
getDeclaredConstructors(jni
.GetMethodID(Class$
, "getDeclaredConstructors", "()[Ljava/lang/reflect/Constructor;"));
769 auto Class$
getDeclaredFields(jni
.GetMethodID(Class$
, "getDeclaredFields", "()[Ljava/lang/reflect/Field;"));
770 auto Class$
getDeclaredMethods(jni
.GetMethodID(Class$
, "getDeclaredMethods", "()[Ljava/lang/reflect/Method;"));
772 auto Constructor$
(jni
.FindClass("java/lang/reflect/Constructor"));
773 //auto Constructor$getModifiers(jni.GetMethodID(Constructor$, "getModifiers", "()I"));
774 auto Constructor$
getParameterTypes(jni
.GetMethodID(Constructor$
, "getParameterTypes", "()[Ljava/lang/Class;"));
776 auto Field$
(jni
.FindClass("java/lang/reflect/Field"));
777 auto Field$
getModifiers(jni
.GetMethodID(Field$
, "getModifiers", "()I"));
778 auto Field$
getName(jni
.GetMethodID(Field$
, "getName", "()Ljava/lang/String;"));
779 auto Field$
getType(jni
.GetMethodID(Field$
, "getType", "()Ljava/lang/Class;"));
781 auto Method$
(jni
.FindClass("java/lang/reflect/Method"));
782 auto Method$
getModifiers(jni
.GetMethodID(Method$
, "getModifiers", "()I"));
783 auto Method$
getName(jni
.GetMethodID(Method$
, "getName", "()Ljava/lang/String;"));
784 auto Method$
getParameterTypes(jni
.GetMethodID(Method$
, "getParameterTypes", "()[Ljava/lang/Class;"));
785 auto Method$
getReturnType(jni
.GetMethodID(Method$
, "getReturnType", "()Ljava/lang/Class;"));
787 auto Modifier$
(jni
.FindClass("java/lang/reflect/Modifier"));
788 auto Modifier$
isStatic(jni
.GetStaticMethodID(Modifier$
, "isStatic", "(I)Z"));
790 auto interface(jni
.CallBooleanMethod(value
, Class$isInterface
));
791 auto table(new CYJavaClass(value
, interface
));
793 for (CYJavaLocal
<jclass
> prototype(value
); prototype
; prototype
= jni
.GetSuperclass(prototype
)) {
794 auto fields(jni
.CallObjectMethod
<jobjectArray
>(prototype
, Class$getDeclaredFields
));
796 for (jsize
i(0), e(jni
.GetArrayLength(fields
)); i
!= e
; ++i
) {
797 auto field(jni
.GetObjectArrayElement
<jobject
>(fields
, e
- i
- 1));
798 auto modifiers(jni
.CallIntMethod(field
, Field$getModifiers
));
799 auto instance(!jni
.CallStaticBooleanMethod(Modifier$
, Modifier$isStatic
, modifiers
));
800 auto &map(instance
? table
->instance_
: table
->static_
);
801 CYJavaUTF8String
name(jni
.CallObjectMethod
<jstring
>(field
, Field$getName
));
802 auto id(jni
.FromReflectedField(field
));
803 auto type(jni
.CallObjectMethod
<jclass
>(field
, Field$getType
));
804 map
.insert(std::make_pair(std::string(name
), CYJavaField
{id
, CYJavaGetPrimitive(context
, type
, Class$getName
)}));
808 constructor
= JSObjectMake(context
, CYPrivate
<CYJavaClass
>::Class_
, table
);
810 prototype
= JSObjectMake(context
, NULL
, NULL
);
811 CYSetProperty(context
, constructor
, prototype_s
, prototype
, kJSPropertyAttributeDontEnum
);
813 auto constructors(jni
.CallObjectMethod
<jobjectArray
>(value
, Class$getDeclaredConstructors
));
815 for (jsize
i(0), e(jni
.GetArrayLength(constructors
)); i
!= e
; ++i
) {
816 auto constructor(jni
.GetObjectArrayElement
<jobject
>(constructors
, i
));
817 auto parameters(jni
.CallObjectMethod
<jobjectArray
>(constructor
, Constructor$getParameterTypes
));
818 CYJavaShorty
shorty(CYJavaGetShorty(context
, parameters
, Class$getName
));
819 auto id(jni
.FromReflectedMethod(constructor
));
820 table
->overloads_
[shorty
.size()].insert(CYJavaSignature(constructor
, id
, CYJavaPrimitiveObject
, shorty
));
823 std::map
<std::pair
<bool, std::string
>, CYJavaOverloads
> entries
;
826 for (CYJavaLocal
<jclass
> prototype(value
); prototype
; prototype
= jni
.GetSuperclass(prototype
)) {
827 auto methods(jni
.CallObjectMethod
<jobjectArray
>(prototype
, Class$getDeclaredMethods
));
829 for (jsize
i(0), e(jni
.GetArrayLength(methods
)); i
!= e
; ++i
) {
830 auto method(jni
.GetObjectArrayElement
<jobject
>(methods
, i
));
831 auto modifiers(jni
.CallIntMethod(method
, Method$getModifiers
));
832 auto instance(!jni
.CallStaticBooleanMethod(Modifier$
, Modifier$isStatic
, modifiers
));
833 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
));
838 CYJavaOverload
*overload
;
840 overload
= &entries
[std::make_pair(instance
, std::string(name
))][shorty
.size()];
842 auto entry(entries
.find(std::make_pair(instance
, std::string(name
))));
843 if (entry
== entries
.end())
845 overload
= &entry
->second
[shorty
.size()];
848 auto type(jni
.CallObjectMethod
<jclass
>(method
, Method$getReturnType
));
849 auto primitive(CYJavaGetPrimitive(context
, type
, Class$getName
));
850 auto id(jni
.FromReflectedMethod(method
));
851 overload
->insert(CYJavaSignature(method
, id
, primitive
, shorty
));
857 for (const auto &entry
: entries
) {
858 bool instance(entry
.first
.first
);
859 CYJSString
name(entry
.first
.second
);
860 auto &overload(entry
.second
);
862 CYSetProperty(context
, prototype
, name
, CYPrivate
<CYJavaMethod
>::Make(context
, overload
), kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
);
864 CYSetProperty(context
, constructor
, name
, CYPrivate
<CYJavaStaticMethod
>::Make(context
, overload
), kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
);
869 // XXX: for some reason kJSPropertyAttributeDontEnum doesn't work if there's already a property with the same name
870 // by not linking the prototypes until after we set the properties, we hide the parent property from this issue :(
872 if (auto super
= jni
.GetSuperclass(value
)) {
873 JSObjectRef
parent(CYGetJavaClass(context
, super
));
874 CYSetPrototype(context
, constructor
, parent
);
875 CYSetPrototype(context
, prototype
, CYGetProperty(context
, parent
, prototype_s
));
878 CYSetProperty(context
, cy
, name
, constructor
);
882 static void CYCastJavaNumeric(jvalue
&value
, CYJavaPrimitive primitive
, JSContextRef context
, JSValueRef argument
) {
884 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
885 case CYJavaPrimitive ## Type: \
886 value.t = static_cast<j ## type>(CYCastDouble(context, argument)); \
888 CYJavaForEachPrimitive
889 #undef CYJavaForEachPrimitive_
895 static bool CYCastJavaArguments(const CYJavaFrame
&frame
, const CYJavaShorty
&shorty
, JSContextRef context
, const JSValueRef arguments
[], jvalue
*array
) {
896 CYJavaEnv
jni(frame
);
898 for (size_t index(0); index
!= shorty
.size(); ++index
) {
899 JSValueRef
argument(arguments
[index
]);
900 JSType
type(JSValueGetType(context
, argument
));
901 jvalue
&value(array
[index
]);
903 switch (CYJavaPrimitive primitive
= shorty
[index
]) {
904 case CYJavaPrimitiveObject
:
905 // XXX: figure out a way to tie this in to the CYJavaFrame
906 value
.l
= CYCastJavaObject(jni
, context
, argument
).leak();
909 case CYJavaPrimitiveBoolean
:
910 if (type
!= kJSTypeBoolean
)
912 value
.z
= CYCastBool(context
, argument
);
915 case CYJavaPrimitiveCharacter
:
916 if (type
== kJSTypeNumber
)
917 CYCastJavaNumeric(value
, primitive
, context
, argument
);
918 else if (type
!= kJSTypeString
)
921 CYJSString
string(context
, argument
);
922 if (JSStringGetLength(string
) != 1)
925 value
.c
= JSStringGetCharactersPtr(string
)[0];
929 case CYJavaPrimitiveByte
:
930 case CYJavaPrimitiveShort
:
931 case CYJavaPrimitiveInteger
:
932 case CYJavaPrimitiveLong
:
933 case CYJavaPrimitiveFloat
:
934 case CYJavaPrimitiveDouble
:
935 if (type
!= kJSTypeNumber
)
937 CYCastJavaNumeric(value
, primitive
, context
, argument
);
948 static JSValueRef
JavaMethod_callAsFunction(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
949 auto internal(CYPrivate
<CYJavaMethod
>::Get(context
, object
));
950 CYJavaObject
*self(CYGetJavaObject(context
, _this
));
951 _assert(self
!= NULL
);
952 CYJavaEnv
jni(self
->value_
);
954 auto overload(internal
->overloads_
.find(count
));
955 if (overload
!= internal
->overloads_
.end())
956 for (auto signature(overload
->second
.begin()); signature
!= overload
->second
.end(); ++signature
) {
957 CYJavaFrame
frame(jni
, count
+ 16);
959 if (!CYCastJavaArguments(frame
, signature
->shorty_
, context
, arguments
, array
))
961 jvalue
*values(array
);
962 switch (signature
->primitive_
) {
963 case CYJavaPrimitiveObject
:
964 return CYCastJSValue(context
, jni
.CallObjectMethodA
<jobject
>(self
->value_
, signature
->method_
, values
));
965 case CYJavaPrimitiveVoid
:
966 jni
.CallVoidMethodA(self
->value_
, signature
->method_
, values
);
967 return CYJSUndefined(context
);
968 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
969 case CYJavaPrimitive ## Type: \
970 return CYJavaCastJSValue(context, jni.Call ## Typ ## MethodA(self->value_, signature->method_, values));
971 CYJavaForEachPrimitive
972 #undef CYJavaForEachPrimitive_
973 default: _assert(false);
977 CYThrow("invalid method call");
980 static JSValueRef
JavaStaticMethod_callAsFunction(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
981 auto internal(CYPrivate
<CYJavaStaticMethod
>::Get(context
, object
));
982 CYJavaClass
*table(CYGetJavaTable(context
, _this
));
983 CYJavaEnv
jni(table
->value_
);
985 auto overload(internal
->overloads_
.find(count
));
986 if (overload
!= internal
->overloads_
.end())
987 for (auto signature(overload
->second
.begin()); signature
!= overload
->second
.end(); ++signature
) {
988 CYJavaFrame
frame(jni
, count
+ 16);
990 if (!CYCastJavaArguments(frame
, signature
->shorty_
, context
, arguments
, array
))
992 jvalue
*values(array
);
993 switch (signature
->primitive_
) {
994 case CYJavaPrimitiveObject
:
995 return CYCastJSValue(context
, jni
.CallStaticObjectMethodA
<jobject
>(table
->value_
, signature
->method_
, values
));
996 case CYJavaPrimitiveVoid
:
997 jni
.CallStaticVoidMethodA(table
->value_
, signature
->method_
, values
);
998 return CYJSUndefined(context
);
999 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1000 case CYJavaPrimitive ## Type: \
1001 return CYJavaCastJSValue(context, jni.CallStatic ## Typ ## MethodA(table->value_, signature->method_, values));
1002 CYJavaForEachPrimitive
1003 #undef CYJavaForEachPrimitive_
1004 default: _assert(false);
1008 CYThrow("invalid method call");
1011 static JSObjectRef
JavaClass_callAsConstructor(JSContextRef context
, JSObjectRef object
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1012 auto table(CYPrivate
<CYJavaClass
>::Get(context
, object
));
1013 CYJavaEnv
jni(table
->value_
);
1014 jclass
_class(table
->value_
);
1016 if (table
->interface_
&& count
== 1) {
1017 auto Cycript$
(jni
.FindClass("Cycript"));
1018 auto Cycript$
Make(jni
.GetStaticMethodID(Cycript$
, "proxy", "(Ljava/lang/Class;LCycript$Wrapper;)Ljava/lang/Object;"));
1019 return CYCastJSObject(context
, jni
.CallObjectMethod
<jobject
>(Cycript$
, Cycript$Make
, _class
, CYCastJavaObject(jni
, context
, CYCastJSObject(context
, arguments
[0])).get()));
1022 auto overload(table
->overloads_
.find(count
));
1023 if (overload
!= table
->overloads_
.end())
1024 for (auto signature(overload
->second
.begin()); signature
!= overload
->second
.end(); ++signature
) {
1025 CYJavaFrame
frame(jni
, count
+ 16);
1026 jvalue array
[count
];
1027 if (!CYCastJavaArguments(frame
, signature
->shorty_
, context
, arguments
, array
))
1029 jvalue
*values(array
);
1030 auto object(jni
.NewObjectA(_class
, signature
->method_
, values
));
1031 return CYCastJSObject(context
, object
);
1034 CYThrow("invalid constructor call");
1037 static bool JavaStaticInterior_hasProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
) {
1038 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1039 CYJavaClass
*table(internal
->table_
);
1041 auto name(CYPoolUTF8String(pool
, context
, property
));
1042 auto field(table
->static_
.find(name
));
1043 if (field
== table
->static_
.end())
1048 static JSValueRef
JavaStaticInterior_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1049 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1050 CYJavaClass
*table(internal
->table_
);
1051 CYJavaEnv
jni(table
->value_
);
1053 auto name(CYPoolUTF8String(pool
, context
, property
));
1054 auto field(table
->static_
.find(name
));
1055 if (field
== table
->static_
.end())
1058 switch (field
->second
.primitive_
) {
1059 case CYJavaPrimitiveObject
:
1060 return CYCastJSValue(context
, jni
.GetStaticObjectField
<jobject
>(table
->value_
, field
->second
.field_
));
1061 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1062 case CYJavaPrimitive ## Type: \
1063 return CYJavaCastJSValue(context, jni.GetStatic ## Typ ## Field(table->value_, field->second.field_));
1064 CYJavaForEachPrimitive
1065 #undef CYJavaForEachPrimitive_
1066 default: _assert(false);
1070 static bool JavaStaticInterior_setProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef value
, JSValueRef
*exception
) { CYTry
{
1071 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1072 CYJavaClass
*table(internal
->table_
);
1073 CYJavaEnv
jni(table
->value_
);
1075 auto name(CYPoolUTF8String(pool
, context
, property
));
1076 auto field(table
->static_
.find(name
));
1077 if (field
== table
->static_
.end())
1080 switch (field
->second
.primitive_
) {
1081 case CYJavaPrimitiveObject
:
1082 jni
.SetStaticObjectField(table
->value_
, field
->second
.field_
, CYCastJavaObject(jni
, context
, value
));
1083 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1084 case CYJavaPrimitive ## Type: \
1085 jni.SetStatic ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value)); \
1087 CYJavaForEachPrimitive
1088 #undef CYJavaForEachPrimitive_
1089 default: _assert(false);
1095 static void JavaStaticInterior_getPropertyNames(JSContextRef context
, JSObjectRef object
, JSPropertyNameAccumulatorRef names
) {
1096 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1097 CYJavaClass
*table(internal
->table_
);
1098 for (const auto &field
: table
->static_
)
1099 JSPropertyNameAccumulatorAddName(names
, CYJSString(field
.first
));
1102 static JSValueRef
JavaClass_getProperty_class(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1103 auto table(CYPrivate
<CYJavaClass
>::Get(context
, object
));
1104 return CYCastJSValue(context
, table
->value_
);
1107 static bool JavaInterior_hasProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
) {
1108 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1109 CYJavaClass
*table(internal
->table_
);
1111 auto name(CYPoolUTF8String(pool
, context
, property
));
1112 auto field(table
->instance_
.find(name
));
1113 if (field
== table
->instance_
.end())
1118 static JSValueRef
JavaInterior_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1119 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1120 CYJavaEnv
jni(internal
->value_
);
1121 CYJavaClass
*table(internal
->table_
);
1123 auto name(CYPoolUTF8String(pool
, context
, property
));
1124 auto field(table
->instance_
.find(name
));
1125 if (field
== table
->instance_
.end())
1128 switch (field
->second
.primitive_
) {
1129 case CYJavaPrimitiveObject
:
1130 return CYCastJSValue(context
, jni
.GetObjectField
<jobject
>(internal
->value_
, field
->second
.field_
));
1131 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1132 case CYJavaPrimitive ## Type: \
1133 return CYJavaCastJSValue(context, jni.Get ## Typ ## Field(internal->value_, field->second.field_));
1134 CYJavaForEachPrimitive
1135 #undef CYJavaForEachPrimitive_
1136 default: _assert(false);
1140 static bool JavaInterior_setProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef value
, JSValueRef
*exception
) { CYTry
{
1141 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1142 CYJavaEnv
jni(internal
->value_
);
1143 CYJavaClass
*table(internal
->table_
);
1145 auto name(CYPoolUTF8String(pool
, context
, property
));
1146 auto field(table
->instance_
.find(name
));
1147 if (field
== table
->instance_
.end())
1150 switch (field
->second
.primitive_
) {
1151 case CYJavaPrimitiveObject
:
1152 jni
.SetObjectField(table
->value_
, field
->second
.field_
, CYCastJavaObject(jni
, context
, value
));
1153 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1154 case CYJavaPrimitive ## Type: \
1155 jni.Set ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value)); \
1157 CYJavaForEachPrimitive
1158 #undef CYJavaForEachPrimitive_
1159 default: _assert(false);
1165 static void JavaInterior_getPropertyNames(JSContextRef context
, JSObjectRef object
, JSPropertyNameAccumulatorRef names
) {
1166 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1167 CYJavaClass
*table(internal
->table_
);
1168 for (const auto &field
: table
->instance_
)
1169 JSPropertyNameAccumulatorAddName(names
, CYJSString(field
.first
));
1172 static JSValueRef
JavaObject_getProperty_constructor(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1173 auto internal(CYPrivate
<CYJavaObject
>::Get(context
, object
));
1174 CYJavaEnv
jni(internal
->value_
);
1175 return CYGetJavaClass(context
, jni
.GetObjectClass(internal
->value_
));
1178 static JSValueRef JavaClass_getProperty_$
cyi(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1179 auto internal(CYPrivate
<CYJavaClass
>::Get(context
, object
));
1180 return CYPrivate
<CYJavaStaticInterior
>::Make(context
, internal
->value_
, internal
);
1183 static JSValueRef JavaObject_getProperty_$
cyi(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1184 auto internal(CYPrivate
<CYJavaObject
>::Get(context
, object
));
1185 return CYPrivate
<CYJavaInterior
>::Make(context
, internal
->value_
, internal
->table_
);
1188 static JSValueRef
JavaClass_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1189 auto internal(CYPrivate
<CYJavaClass
>::Get(context
, _this
));
1190 CYJavaEnv
jni(internal
->value_
);
1191 auto Class$
(jni
.FindClass("java/lang/Class"));
1192 auto Class$
getCanonicalName(jni
.GetMethodID(Class$
, "getCanonicalName", "()Ljava/lang/String;"));
1193 return CYCastJSValue(context
, CYJSString(jni
.CallObjectMethod
<jstring
>(internal
->value_
, Class$getCanonicalName
)));
1196 static JSValueRef
JavaMethod_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1197 std::ostringstream cyon
;
1198 return CYCastJSValue(context
, CYJSString(cyon
.str()));
1201 static JSValueRef
JavaStaticMethod_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1202 std::ostringstream cyon
;
1203 return CYCastJSValue(context
, CYJSString(cyon
.str()));
1206 static JSValueRef
JavaArray_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1207 auto internal(CYPrivate
<CYJavaArray
>::Get(context
, object
));
1208 CYJavaEnv
jni(internal
->value_
);
1209 if (JSStringIsEqual(property
, length_s
))
1210 return CYCastJSValue(context
, jni
.GetArrayLength(internal
->value_
));
1214 if (!CYGetOffset(pool
, context
, property
, offset
))
1217 if (internal
->primitive_
== CYJavaPrimitiveObject
)
1218 return CYCastJSValue(context
, jni
.GetObjectArrayElement
<jobject
>(static_cast<jobjectArray
>(internal
->value_
.value_
), offset
));
1219 else switch (internal
->primitive_
) {
1220 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1221 case CYJavaPrimitive ## Type: { \
1222 j ## type element; \
1223 jni.Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element); \
1224 return CYJavaCastJSValue(context, element); \
1226 CYJavaForEachPrimitive
1227 #undef CYJavaForEachPrimitive_
1228 default: _assert(false);
1232 static bool JavaArray_setProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef value
, JSValueRef
*exception
) { CYTry
{
1233 auto internal(CYPrivate
<CYJavaArray
>::Get(context
, object
));
1234 CYJavaEnv
jni(internal
->value_
);
1238 if (!CYGetOffset(pool
, context
, property
, offset
))
1241 if (internal
->primitive_
== CYJavaPrimitiveObject
)
1242 jni
.SetObjectArrayElement(static_cast<jobjectArray
>(internal
->value_
.value_
), offset
, CYCastJavaObject(jni
, context
, value
));
1243 else switch (internal
->primitive_
) {
1244 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1245 case CYJavaPrimitive ## Type: { \
1246 j ## type element; \
1247 jni.Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element); \
1248 return CYJavaCastJSValue(context, element); \
1250 CYJavaForEachPrimitive
1251 #undef CYJavaForEachPrimitive_
1252 default: _assert(false);
1258 static JNIEnv
*GetJNI(JSContextRef context
, JNIEnv
*&env
);
1260 static JSValueRef
JavaPackage_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1261 auto internal(CYPrivate
<CYJavaPackage
>::Get(context
, _this
));
1262 std::ostringstream name
;
1263 for (auto &package
: internal
->package_
)
1264 name
<< package
<< '.';
1266 return CYCastJSValue(context
, CYJSString(name
.str()));
1269 static bool CYJavaPackage_hasProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
) {
1273 static JSValueRef
CYJavaPackage_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1274 auto internal(CYPrivate
<CYJavaPackage
>::Get(context
, object
));
1275 CYJavaPackage::Path
package(internal
->package_
);
1278 const char *next(CYPoolCString(pool
, context
, property
));
1280 std::ostringstream name
;
1281 for (auto &package
: internal
->package_
)
1282 name
<< package
<< '/';
1285 if (internal
->jni_
== NULL
)
1286 GetJNI(context
, internal
->jni_
);
1287 JNIEnv
*jni(internal
->jni_
);
1289 if (auto _class
= jni
->FindClass(name
.str().c_str()))
1290 return CYGetJavaClass(context
, CYJavaLocal
<jclass
>(jni
, _class
));
1291 jni
->ExceptionClear();
1293 package
.push_back(next
);
1294 return CYPrivate
<CYJavaPackage
>::Make(context
, jni
, package
);
1297 static void Cycript_delete(JNIEnv
*env
, jclass api
, jlong jprotect
) { CYJavaTry
{
1301 static jobject
Cycript_handle(JNIEnv
*env
, jclass api
, jlong jprotect
, jstring property
, jobjectArray jarguments
) { CYJavaTry
{
1302 JSValueRef
function(CYGetProperty(context
, object
, CYJSString(CYJavaRef
<jstring
>(jni
, property
))));
1303 if (JSValueIsUndefined(context
, function
))
1306 size_t count(jarguments
== NULL
? 0 : jni
.GetArrayLength(jarguments
));
1307 JSValueRef arguments
[count
];
1308 for (size_t index(0); index
!= count
; ++index
)
1309 arguments
[index
] = CYCastJSValue(context
, jni
.GetObjectArrayElement
<jobject
>(jarguments
, index
));
1311 return CYCastJavaObject(jni
, context
, CYCallAsFunction(context
, CYCastJSObject(context
, function
), object
, count
, arguments
)).leak();
1312 } CYJavaCatch(NULL
) }
1314 static JNINativeMethod Cycript_
[] = {
1315 {(char *) "delete", (char *) "(J)V", (void *) &Cycript_delete
},
1316 {(char *) "handle", (char *) "(JLjava/lang/String;[Ljava/lang/Object;)Ljava/lang/Object;", (void *) &Cycript_handle
},
1319 template <typename Type_
>
1320 static _finline
void dlset(Type_
&function
, const char *name
, void *handle
) {
1321 function
= reinterpret_cast<Type_
>(dlsym(handle
, name
));
1324 jint
CYJavaVersion(JNI_VERSION_1_4
);
1326 static JavaVM
*CYGetJavaVM(jint (*$JNI_GetCreatedJavaVMs
)(JavaVM
**, jsize
, jsize
*)) {
1328 JavaVM
*jvms
[capacity
];
1330 _jnicall($
JNI_GetCreatedJavaVMs(jvms
, capacity
, &size
));
1336 static JavaVM
*CYGetJavaVM(JSContextRef context
) {
1338 void *handle(RTLD_DEFAULT
);
1339 std::string library
;
1341 jint (*$JNI_GetCreatedJavaVMs
)(JavaVM
**jvms
, jsize capacity
, jsize
*size
);
1342 dlset($JNI_GetCreatedJavaVMs
, "JNI_GetCreatedJavaVMs", handle
);
1344 if ($JNI_GetCreatedJavaVMs
!= NULL
) {
1345 if (JavaVM
*jvm
= CYGetJavaVM($JNI_GetCreatedJavaVMs
))
1348 std::vector
<const char *> guesses
;
1351 char android
[PROP_VALUE_MAX
];
1352 if (__system_property_get("persist.sys.dalvik.vm.lib", android
) != 0)
1353 guesses
.push_back(android
);
1356 guesses
.push_back("/Library/Internet Plug-Ins/JavaAppletPlugin.plugin/Contents/Home/lib/jli/libjli.dylib");
1357 //guesses.push_back("/System/Library/Frameworks/JavaVM.framework/JavaVM");
1358 guesses
.push_back("libjvm.dylib");
1360 guesses
.push_back("libart.so");
1361 guesses
.push_back("libdvm.so");
1362 guesses
.push_back("libjvm.so");
1364 for (const char *guess
: guesses
) {
1365 handle
= dlopen(guess
, RTLD_LAZY
| RTLD_GLOBAL
);
1366 if (handle
!= NULL
) {
1372 if (library
.size() == 0)
1375 dlset($JNI_GetCreatedJavaVMs
, "JNI_GetCreatedJavaVMs", handle
);
1376 if (JavaVM
*jvm
= CYGetJavaVM($JNI_GetCreatedJavaVMs
))
1380 std::vector
<JavaVMOption
> options
;
1383 std::ostringstream option
;
1384 option
<< "-Djava.class.path=";
1385 option
<< CYPoolLibraryPath(pool
) << "/libcycript.jar";
1386 if (const char *classpath
= getenv("CLASSPATH"))
1387 option
<< ':' << classpath
;
1388 options
.push_back(JavaVMOption
{pool
.strdup(option
.str().c_str()), NULL
});
1391 // To use libnativehelper to access JNI_GetCreatedJavaVMs, you need JniInvocation.
1392 // ...but there can only be one JniInvocation, and assuradely the other VM has it.
1393 // Essentially, this API makes no sense. We need it for AndroidRuntime, though :/.
1395 if (void *libnativehelper
= dlopen("libnativehelper.so", RTLD_LAZY
| RTLD_GLOBAL
)) {
1396 class JniInvocation$
;
1397 JniInvocation$
*(*JniInvocation$$init$
)(JniInvocation$
*self
)(NULL
);
1398 bool (*JniInvocation$Init
)(JniInvocation$
*self
, const char *library
)(NULL
);
1399 JniInvocation$
*(*JniInvocation$finalize
)(JniInvocation$
*self
)(NULL
);
1401 dlset(JniInvocation$$init$
, "_ZN13JniInvocationC1Ev", libnativehelper
);
1402 dlset(JniInvocation$Init
, "_ZN13JniInvocation4InitEPKc", libnativehelper
);
1403 dlset(JniInvocation$finalize
, "_ZN13JniInvocationD1Ev", libnativehelper
);
1405 if (JniInvocation$$init$
== NULL
)
1406 dlclose(libnativehelper
);
1408 // XXX: we should attach a pool to the VM itself and deallocate this there
1409 //auto invocation(pool.calloc<JniInvocation$>(1, 1024));
1410 //_assert(JniInvocation$finalize != NULL);
1411 //pool.atexit(reinterpret_cast<void (*)(void *)>(JniInvocation$finalize), invocation);
1413 auto invocation(static_cast<JniInvocation$
*>(calloc(1, 1024)));
1414 JniInvocation$$init$
(invocation
);
1416 _assert(JniInvocation$Init
!= NULL
);
1417 JniInvocation$
Init(invocation
, NULL
);
1419 dlset($JNI_GetCreatedJavaVMs
, "JNI_GetCreatedJavaVMs", libnativehelper
);
1420 if (JavaVM
*jvm
= CYGetJavaVM($JNI_GetCreatedJavaVMs
))
1428 if (void *libandroid_runtime
= dlopen("libandroid_runtime.so", RTLD_LAZY
| RTLD_GLOBAL
)) {
1429 class AndroidRuntime$
;
1430 AndroidRuntime$
*(*AndroidRuntime$$init$
)(AndroidRuntime$
*self
, char *args
, unsigned int size
)(NULL
);
1431 int (*AndroidRuntime$startVm
)(AndroidRuntime$
*self
, JavaVM
**jvm
, JNIEnv
**env
)(NULL
);
1432 int (*AndroidRuntime$startReg
)(JNIEnv
*env
)(NULL
);
1433 int (*AndroidRuntime$addOption
)(AndroidRuntime$
*self
, const char *option
, void *extra
)(NULL
);
1434 int (*AndroidRuntime$addVmArguments
)(AndroidRuntime$
*self
, int, const char *const argv
[])(NULL
);
1435 AndroidRuntime$
*(*AndroidRuntime$finalize
)(AndroidRuntime$
*self
)(NULL
);
1437 dlset(AndroidRuntime$$init$
, "_ZN7android14AndroidRuntimeC1EPcj", libandroid_runtime
);
1438 dlset(AndroidRuntime$startVm
, "_ZN7android14AndroidRuntime7startVmEPP7_JavaVMPP7_JNIEnv", libandroid_runtime
);
1439 dlset(AndroidRuntime$startReg
, "_ZN7android14AndroidRuntime8startRegEP7_JNIEnv", libandroid_runtime
);
1440 dlset(AndroidRuntime$addOption
, "_ZN7android14AndroidRuntime9addOptionEPKcPv", libandroid_runtime
);
1441 dlset(AndroidRuntime$addVmArguments
, "_ZN7android14AndroidRuntime14addVmArgumentsEiPKPKc", libandroid_runtime
);
1442 dlset(AndroidRuntime$finalize
, "_ZN7android14AndroidRuntimeD1Ev", libandroid_runtime
);
1444 // XXX: it would also be interesting to attach this to a global pool
1445 AndroidRuntime$
*runtime(pool
.calloc
<AndroidRuntime$
>(1, 1024));
1447 _assert(AndroidRuntime$$init$
!= NULL
);
1448 AndroidRuntime$$init$
(runtime
, NULL
, 0);
1450 if (AndroidRuntime$addOption
== NULL
) {
1451 _assert(AndroidRuntime$addVmArguments
!= NULL
);
1452 std::vector
<const char *> arguments
;
1453 for (const auto &option
: options
)
1454 arguments
.push_back(option
.optionString
);
1455 AndroidRuntime$
addVmArguments(runtime
, arguments
.size(), arguments
.data());
1456 } else for (const auto &option
: options
)
1457 AndroidRuntime$
addOption(runtime
, option
.optionString
, option
.extraInfo
);
1461 _assert(AndroidRuntime$startVm
!= NULL
);
1462 failure
= AndroidRuntime$
startVm(runtime
, &jvm
, &env
);
1463 _assert(failure
== 0);
1465 _assert(AndroidRuntime$startReg
!= NULL
);
1466 failure
= AndroidRuntime$
startReg(env
);
1467 _assert(failure
== 0);
1472 jint (*$JNI_CreateJavaVM
)(JavaVM
**jvm
, void **, void *);
1473 dlset($JNI_CreateJavaVM
, "JNI_CreateJavaVM", handle
);
1475 JavaVMInitArgs args
;
1476 memset(&args
, 0, sizeof(args
));
1477 args
.version
= CYJavaVersion
;
1478 args
.nOptions
= options
.size();
1479 args
.options
= options
.data();
1480 _jnicall($
JNI_CreateJavaVM(&jvm
, reinterpret_cast<void **>(&env
), &args
));
1484 static JNIEnv
*GetJNI(JSContextRef context
, JNIEnv
*&env
) {
1485 auto jvm(CYGetJavaVM(context
));
1486 _assert(jvm
!= NULL
);
1487 _jnicall(jvm
->GetEnv(reinterpret_cast<void **>(&env
), CYJavaVersion
));
1490 // XXX: this happens once per stub :/
1492 auto Cycript$
(jni
.FindClass("Cycript"));
1493 jni
.RegisterNatives(Cycript$
, Cycript_
, sizeof(Cycript_
) / sizeof(Cycript_
[0]));
1495 JSObjectRef
java(CYGetCachedObject(context
, CYJSString("Java")));
1496 JSValueRef arguments
[1];
1497 arguments
[0] = CYCastJSValue(context
, CYJSString("setup"));
1498 CYCallAsFunction(context
, CYCastJSObject(context
, CYGetProperty(context
, java
, CYJSString("emit"))), java
, 1, arguments
);
1503 static JSStaticValue JavaClass_staticValues
[3] = {
1504 {"class", &JavaClass_getProperty_class
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1505 {"$cyi", &JavaClass_getProperty_$cyi
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1506 {NULL
, NULL
, NULL
, 0}
1509 static JSStaticFunction JavaClass_staticFunctions
[2] = {
1510 {"toCYON", &JavaClass_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1514 static JSStaticValue JavaObject_staticValues
[3] = {
1515 {"constructor", &JavaObject_getProperty_constructor
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1516 {"$cyi", &JavaObject_getProperty_$cyi
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1517 {NULL
, NULL
, NULL
, 0}
1520 static JSStaticFunction JavaMethod_staticFunctions
[2] = {
1521 {"toCYON", &JavaMethod_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1525 static JSStaticFunction JavaStaticMethod_staticFunctions
[2] = {
1526 {"toCYON", &JavaStaticMethod_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1530 static JSStaticFunction JavaPackage_staticFunctions
[2] = {
1531 {"toCYON", &JavaPackage_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1535 void CYJava_Initialize() {
1536 Primitives_
.insert(std::make_pair("void", CYJavaPrimitiveVoid
));
1537 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1538 Primitives_.insert(std::make_pair(#type, CYJavaPrimitive ## Type));
1539 CYJavaForEachPrimitive
1540 #undef CYJavaForEachPrimitive_
1542 JSClassDefinition definition
;
1544 definition
= kJSClassDefinitionEmpty
;
1545 definition
.className
= "JavaClass";
1546 definition
.staticValues
= JavaClass_staticValues
;
1547 definition
.staticFunctions
= JavaClass_staticFunctions
;
1548 definition
.callAsConstructor
= &JavaClass_callAsConstructor
;
1549 definition
.finalize
= &CYFinalize
;
1550 CYPrivate
<CYJavaClass
>::Class_
= JSClassCreate(&definition
);
1552 definition
= kJSClassDefinitionEmpty
;
1553 definition
.attributes
= kJSClassAttributeNoAutomaticPrototype
;
1554 definition
.className
= "JavaInterior";
1555 definition
.hasProperty
= &JavaInterior_hasProperty
;
1556 definition
.getProperty
= &JavaInterior_getProperty
;
1557 definition
.setProperty
= &JavaInterior_setProperty
;
1558 definition
.getPropertyNames
= &JavaInterior_getPropertyNames
;
1559 definition
.finalize
= &CYFinalize
;
1560 CYPrivate
<CYJavaInterior
>::Class_
= JSClassCreate(&definition
);
1562 definition
= kJSClassDefinitionEmpty
;
1563 definition
.className
= "JavaMethod";
1564 definition
.staticFunctions
= JavaMethod_staticFunctions
;
1565 definition
.callAsFunction
= &JavaMethod_callAsFunction
;
1566 definition
.finalize
= &CYFinalize
;
1567 CYPrivate
<CYJavaMethod
>::Class_
= JSClassCreate(&definition
);
1569 definition
= kJSClassDefinitionEmpty
;
1570 definition
.className
= "JavaStaticMethod";
1571 definition
.staticFunctions
= JavaStaticMethod_staticFunctions
;
1572 definition
.callAsFunction
= &JavaStaticMethod_callAsFunction
;
1573 definition
.finalize
= &CYFinalize
;
1574 CYPrivate
<CYJavaStaticMethod
>::Class_
= JSClassCreate(&definition
);
1576 definition
= kJSClassDefinitionEmpty
;
1577 definition
.attributes
= kJSClassAttributeNoAutomaticPrototype
;
1578 definition
.className
= "JavaObject";
1579 definition
.staticValues
= JavaObject_staticValues
;
1580 definition
.finalize
= &CYFinalize
;
1581 CYPrivate
<CYJavaObject
>::Class_
= JSClassCreate(&definition
);
1583 definition
= kJSClassDefinitionEmpty
;
1584 definition
.className
= "JavaArray";
1585 definition
.getProperty
= &JavaArray_getProperty
;
1586 definition
.setProperty
= &JavaArray_setProperty
;
1587 definition
.finalize
= &CYFinalize
;
1588 CYPrivate
<CYJavaArray
>::Class_
= JSClassCreate(&definition
);
1590 definition
= kJSClassDefinitionEmpty
;
1591 definition
.className
= "JavaPackage";
1592 definition
.staticFunctions
= JavaPackage_staticFunctions
;
1593 definition
.hasProperty
= &CYJavaPackage_hasProperty
;
1594 definition
.getProperty
= &CYJavaPackage_getProperty
;
1595 definition
.finalize
= &CYFinalize
;
1596 CYPrivate
<CYJavaPackage
>::Class_
= JSClassCreate(&definition
);
1598 definition
= kJSClassDefinitionEmpty
;
1599 definition
.attributes
= kJSClassAttributeNoAutomaticPrototype
;
1600 definition
.className
= "JavaStaticInterior";
1601 definition
.hasProperty
= &JavaStaticInterior_hasProperty
;
1602 definition
.getProperty
= &JavaStaticInterior_getProperty
;
1603 definition
.setProperty
= &JavaStaticInterior_setProperty
;
1604 definition
.getPropertyNames
= &JavaStaticInterior_getPropertyNames
;
1605 definition
.finalize
= &CYFinalize
;
1606 CYPrivate
<CYJavaStaticInterior
>::Class_
= JSClassCreate(&definition
);
1609 void CYJava_SetupContext(JSContextRef context
) {
1610 JSObjectRef
global(CYGetGlobalObject(context
));
1611 JSObjectRef
cy(CYCastJSObject(context
, CYGetProperty(context
, global
, cy_s
)));
1612 JSObjectRef
cycript(CYCastJSObject(context
, CYGetProperty(context
, global
, CYJSString("Cycript"))));
1613 JSObjectRef
all(CYCastJSObject(context
, CYGetProperty(context
, cycript
, CYJSString("all"))));
1614 //JSObjectRef alls(CYCastJSObject(context, CYGetProperty(context, cycript, CYJSString("alls"))));
1616 JSObjectRef
Java(JSObjectMake(context
, NULL
, NULL
));
1617 CYSetProperty(context
, cycript
, CYJSString("Java"), Java
);
1618 CYSetProperty(context
, cy
, CYJSString("Java"), Java
);
1620 JSObjectRef
Packages(CYPrivate
<CYJavaPackage
>::Make(context
, nullptr, CYJavaPackage::Path()));
1621 CYSetProperty(context
, all
, CYJSString("Packages"), Packages
, kJSPropertyAttributeDontEnum
);
1623 for (auto name
: (const char *[]) {"java", "javax", "android", "com", "net", "org"}) {
1624 CYJSString
js(name
);
1625 CYSetProperty(context
, all
, js
, CYPrivate
<CYJavaPackage
>::Make(context
, nullptr, CYJavaPackage::Path(1, name
)), kJSPropertyAttributeDontEnum
);
1629 static CYHook CYJavaHook
= {
1634 &CYJava_SetupContext
,
1638 CYRegisterHook
CYJava(&CYJavaHook
);