Java/Execute.cpp

   1 /* Cycript - The Truly Universal Scripting Language
   2  * Copyright (C) 2009-2016  Jay Freeman (saurik)
   3 */
   4
   5 /* GNU Affero General Public License, Version 3 {{{ */
   6 /*
   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.
  11
  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.
  16
  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/>.
  19 **/
  20 /* }}} */
  21
  22 #include <map>
  23 #include <sstream>
  24 #include <vector>
  25
  26 #include <dlfcn.h>
  27
  28 #if defined(__APPLE__) && !defined(__arm__)
  29 #include <JavaVM/jni.h>
  30 #else
  31 #include <jni.h>
  32 #endif
  33
  34 #ifdef __ANDROID__
  35 // XXX: this is deprecated?!?!?!?!?!?!
  36 #include <sys/system_properties.h>
  37 #endif
  38
  39 #include "cycript.hpp"
  40 #include "Error.hpp"
  41 #include "Execute.hpp"
  42 #include "Internal.hpp"
  43 #include "JavaScript.hpp"
  44 #include "Pooling.hpp"
  45
  46 #define _jnicall(expr) ({ \
  47     jint _value(expr); \
  48     if (_value != JNI_OK) \
  49         CYThrow("_jnicall(%s) == %d", #expr, _value); \
  50 })
  51
  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)); \
  57     } \
  58 _value; })
  59
  60 #define _envcallv(jni, expr) do { \
  61     jni->expr; \
  62     if (jthrowable _error = jni->ExceptionOccurred()) { \
  63         jni->ExceptionClear(); \
  64         throw CYJavaError(CYJavaLocal<jthrowable>(jni, _error)); \
  65     } \
  66 } while (false)
  67
  68 #define CYJavaTry \
  69     CYJavaEnv jni(env); \
  70     auto &protect(*reinterpret_cast<CYProtect *>(jprotect)); \
  71     _disused JSContextRef context(protect); \
  72     _disused JSObjectRef object(protect); \
  73     try
  74 #define CYJavaCatch(value) \
  75     catch (const CYException &error) { \
  76         jni->Throw(CYCastJavaObject(jni, context, error.CastJSValue(context, "Error")).cast<jthrowable>()); \
  77         return value; \
  78     }
  79
  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)
  89
  90 enum CYJavaPrimitive : char {
  91     CYJavaPrimitiveObject,
  92     CYJavaPrimitiveVoid,
  93 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
  94     CYJavaPrimitive ## Type,
  95 CYJavaForEachPrimitive
  96 #undef CYJavaForEachPrimitive_
  97 };
  98
  99 template <typename Type_>
 100 struct IsJavaPrimitive { static const bool value = false; };
 101
 102 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
 103     template <> \
 104     struct IsJavaPrimitive<j ## type> { static const bool value = true; };
 105 CYJavaForEachPrimitive
 106 #undef CYJavaForEachPrimitive_
 107
 108 // Java References {{{
 109 template <typename Value_>
 110 struct CYJavaRef {
 111     JNIEnv *jni_;
 112     Value_ value_;
 113
 114     _finline CYJavaRef(JNIEnv *jni, Value_ value) :
 115         jni_(jni),
 116         value_(value)
 117     {
 118     }
 119
 120     _finline operator Value_() const {
 121         return value_;
 122     }
 123
 124     _finline JNIEnv *jni() const {
 125         return jni_;
 126     }
 127
 128     // XXX: this is only needed to support CYJavaEnv relying on C variadics
 129     _finline Value_ get() const {
 130         return value_;
 131     }
 132
 133     template <typename Other_>
 134     _finline CYJavaRef<Other_> cast() const {
 135         return {jni_, static_cast<Other_>(value_)};
 136     }
 137
 138     // XXX: this should be tied into CYJavaFrame
 139     Value_ leak() {
 140         Value_ value(value_);
 141         value_ = NULL;
 142         return value;
 143     }
 144 };
 145
 146 template <typename Value_, void (JNIEnv::*Delete_)(jobject)>
 147 struct CYJavaDelete :
 148     CYJavaRef<Value_>
 149 {
 150     _finline CYJavaDelete(JNIEnv *jni, Value_ value) :
 151         CYJavaRef<Value_>(jni, value)
 152     {
 153     }
 154
 155     void clear() {
 156         if (this->value_ != NULL)
 157             (this->jni_->*Delete_)(this->value_);
 158         this->value_ = NULL;
 159     }
 160
 161     ~CYJavaDelete() {
 162         clear();
 163     }
 164 };
 165
 166 template <typename Value_>
 167 struct CYJavaGlobal :
 168     CYJavaDelete<Value_, &JNIEnv::DeleteGlobalRef>
 169 {
 170     typedef CYJavaDelete<Value_, &JNIEnv::DeleteGlobalRef> CYJavaBase;
 171
 172     CYJavaGlobal() :
 173         CYJavaBase(NULL, NULL)
 174     {
 175     }
 176
 177     template <typename Other_>
 178     CYJavaGlobal(const CYJavaRef<Other_> &other) :
 179         CYJavaBase(other.jni_, static_cast<Other_>(other.jni_->NewGlobalRef(other.value_)))
 180     {
 181     }
 182
 183     CYJavaGlobal(const CYJavaGlobal<Value_> &other) :
 184         CYJavaGlobal(static_cast<const CYJavaRef<Value_> &>(other))
 185     {
 186     }
 187
 188     CYJavaGlobal(CYJavaGlobal &&value) :
 189         CYJavaBase(value.jni_, value.value_)
 190     {
 191         value.value_ = NULL;
 192     }
 193 };
 194
 195 template <typename Value_>
 196 struct CYJavaLocal :
 197     CYJavaDelete<Value_, &JNIEnv::DeleteLocalRef>
 198 {
 199     typedef CYJavaDelete<Value_, &JNIEnv::DeleteLocalRef> CYJavaBase;
 200
 201     CYJavaLocal() :
 202         CYJavaBase(NULL, NULL)
 203     {
 204     }
 205
 206     CYJavaLocal(JNIEnv *jni, Value_ value) :
 207         CYJavaBase(jni, value)
 208     {
 209     }
 210
 211     template <typename Other_>
 212     CYJavaLocal(const CYJavaRef<Other_> &other) :
 213         CYJavaLocal(other.jni_, static_cast<Other_>(other.jni_->NewLocalRef(other.value_)))
 214     {
 215     }
 216
 217     template <typename Other_>
 218     CYJavaLocal(CYJavaRef<Other_> &&other) :
 219         CYJavaLocal(other.jni_, other.value_)
 220     {
 221         other.value_ = NULL;
 222     }
 223
 224     CYJavaLocal(CYJavaLocal &&other) :
 225         CYJavaLocal(static_cast<CYJavaRef<Value_> &&>(other))
 226     {
 227     }
 228
 229     template <typename Other_>
 230     CYJavaLocal &operator =(CYJavaLocal<Other_> &&other) {
 231         this->clear();
 232         this->jni_ = other.jni_;
 233         this->value_ = other.value_;
 234         other.value_ = NULL;
 235         return *this;
 236     }
 237 };
 238 // }}}
 239 // Java Strings {{{
 240 static CYJavaLocal<jstring> CYCastJavaString(const CYJavaRef<jobject> &value);
 241
 242 class CYJavaUTF8String :
 243     public CYUTF8String
 244 {
 245   private:
 246     const CYJavaRef<jstring> *value_;
 247
 248   public:
 249     CYJavaUTF8String(const CYJavaRef<jstring> &value) :
 250         value_(&value)
 251     {
 252         _assert(value);
 253         JNIEnv *jni(value.jni());
 254         size = jni->GetStringUTFLength(value);
 255         data = jni->GetStringUTFChars(value, NULL);
 256     }
 257
 258     CYJavaUTF8String(const CYJavaRef<jobject> &value) :
 259         CYJavaUTF8String(CYCastJavaString(value))
 260     {
 261     }
 262
 263     ~CYJavaUTF8String() {
 264         if (value_ != NULL) {
 265             JNIEnv *jni(value_->jni());
 266             jni->ReleaseStringUTFChars(*value_, data);
 267         }
 268     }
 269
 270     CYJavaUTF8String(const CYJavaUTF8String &) = delete;
 271
 272     CYJavaUTF8String(CYJavaUTF8String &&rhs) :
 273         value_(rhs.value_)
 274     {
 275         rhs.value_ = NULL;
 276     }
 277 };
 278
 279 CYJavaUTF8String CYCastUTF8String(const CYJavaRef<jstring> &value) {
 280     return CYJavaUTF8String(value);
 281 }
 282
 283 JSStringRef CYCopyJSString(const CYJavaRef<jstring> &value) {
 284     return CYCopyJSString(CYCastUTF8String(value));
 285 }
 286 // }}}
 287 // Java Error {{{
 288 struct CYJavaError :
 289     CYException
 290 {
 291     CYJavaGlobal<jthrowable> value_;
 292
 293     CYJavaError(const CYJavaRef<jthrowable> &value) :
 294         value_(value)
 295     {
 296     }
 297
 298     virtual const char *PoolCString(CYPool &pool) const {
 299         return CYPoolCString(pool, CYJavaUTF8String(value_.cast<jobject>()));
 300     }
 301
 302     virtual JSValueRef CastJSValue(JSContextRef context, const char *name) const;
 303 };
 304 // }}}
 305
 306 struct CYJavaFrame {
 307     JNIEnv *jni_;
 308
 309     CYJavaFrame(JNIEnv *jni, jint capacity) :
 310         jni_(jni)
 311     {
 312         _assert(jni->PushLocalFrame(capacity) == 0);
 313     }
 314
 315     ~CYJavaFrame() {
 316         operator ()(NULL);
 317     }
 318
 319     operator JNIEnv *() const {
 320         return jni_;
 321     }
 322
 323     jobject operator ()(jobject object) {
 324         JNIEnv *jni(jni_);
 325         jni_ = NULL;
 326         return jni->PopLocalFrame(object);
 327     }
 328 };
 329
 330 struct CYJavaEnv {
 331   private:
 332     JNIEnv *jni;
 333
 334   public:
 335     CYJavaEnv(JNIEnv *jni) :
 336         jni(jni)
 337     {
 338     }
 339
 340     template <typename Other_>
 341     CYJavaEnv(const CYJavaRef<Other_> &value) :
 342         jni(value.jni())
 343     {
 344     }
 345
 346     operator JNIEnv *() const {
 347         return jni;
 348     }
 349
 350     JNIEnv *operator ->() const {
 351         return jni;
 352     }
 353
 354     CYJavaLocal<jclass> FindClass(const char *name) const {
 355         return {jni, _envcall(jni, FindClass(name))};
 356     }
 357
 358     CYJavaLocal<jclass> GetObjectClass(jobject object) const {
 359         return {jni, _envcall(jni, GetObjectClass(object))};
 360     }
 361
 362     CYJavaLocal<jclass> GetSuperclass(jclass _class) const {
 363         return {jni, _envcall(jni, GetSuperclass(_class))};
 364     }
 365
 366     CYJavaLocal<jobject> NewObject(jclass _class, jmethodID method, ...) const {
 367         va_list args;
 368         va_start(args, method);
 369         jobject object(_envcall(jni, NewObjectV(_class, method, args)));
 370         va_end(args);
 371         return {jni, object};
 372     }
 373
 374     CYJavaLocal<jobject> NewObjectA(jclass _class, jmethodID method, jvalue *args) const {
 375         return {jni, _envcall(jni, NewObjectA(_class, method, args))};
 376     }
 377
 378     CYJavaLocal<jstring> NewString(const jchar *data, jsize size) const {
 379         return {jni, _envcall(jni, NewString(data, size))};
 380     }
 381
 382 #define CYJavaEnv_(Code) \
 383     template <typename... Args_> \
 384     void Code(Args_ &&... args) const { \
 385         _envcallv(jni, Code(cy::Forward<Args_>(args)...)); \
 386     }
 387
 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_
 394
 395     CYJavaEnv_(CallVoidMethod)
 396     CYJavaEnv_(CallStaticVoidMethod)
 397     CYJavaEnv_(CallVoidMethodA)
 398     CYJavaEnv_(CallStaticVoidMethodA)
 399     CYJavaEnv_(SetObjectArrayElement)
 400     CYJavaEnv_(SetObjectField)
 401     CYJavaEnv_(SetStaticObjectField)
 402 #undef CYJavaEnv_
 403
 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)...)); \
 408     }
 409
 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_
 419
 420     CYJavaEnv_(FromReflectedField)
 421     CYJavaEnv_(FromReflectedMethod)
 422     CYJavaEnv_(GetArrayLength)
 423     CYJavaEnv_(GetMethodID)
 424     CYJavaEnv_(GetStaticMethodID)
 425     CYJavaEnv_(IsSameObject)
 426     CYJavaEnv_(RegisterNatives)
 427 #undef CYJavaEnv_
 428
 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)...)))}; \
 433     }
 434
 435     CYJavaEnv_(CallObjectMethod)
 436     CYJavaEnv_(CallStaticObjectMethod)
 437     CYJavaEnv_(CallObjectMethodA)
 438     CYJavaEnv_(CallStaticObjectMethodA)
 439     CYJavaEnv_(GetObjectArrayElement)
 440     CYJavaEnv_(GetObjectField)
 441     CYJavaEnv_(GetStaticObjectField)
 442 #undef CYJavaEnv_
 443 };
 444
 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);
 450 }
 451
 452 template <typename Internal_, typename Value_>
 453 struct CYJavaValue :
 454     CYPrivate<Internal_>
 455 {
 456     CYJavaGlobal<Value_> value_;
 457
 458     CYJavaValue(const CYJavaRef<Value_> &value) :
 459         value_(value)
 460     {
 461     }
 462
 463     CYJavaValue(const CYJavaValue &) = delete;
 464 };
 465
 466 static JSValueRef CYCastJSValue(JSContextRef context, const CYJavaRef<jobject> &value);
 467
 468 template <typename Other_>
 469 static _finline JSValueRef CYCastJSValue(JSContextRef context, const CYJavaRef<Other_> &value) {
 470     return CYCastJSValue(context, value.template cast<jobject>());
 471 }
 472
 473 template <typename Type_>
 474 static _finline JSValueRef CYJavaCastJSValue(JSContextRef context, Type_ value) {
 475     return CYCastJSValue(context, value);
 476 }
 477
 478 static _finline JSValueRef CYJavaCastJSValue(JSContextRef context, jboolean value) {
 479     return CYCastJSValue(context, static_cast<bool>(value));
 480 }
 481
 482 JSValueRef CYJavaError::CastJSValue(JSContextRef context, const char *name) const {
 483     return CYCastJSValue(context, value_);
 484 }
 485
 486 static std::map<std::string, CYJavaPrimitive> Primitives_;
 487
 488 static CYJavaPrimitive CYJavaGetPrimitive(JSContextRef context, const CYJavaRef<jclass> &type, jmethodID Class$get$$Name) {
 489     CYJavaEnv jni(type);
 490     auto string(jni.CallObjectMethod<jstring>(type, Class$get$$Name));
 491     _assert(string);
 492
 493     CYJavaUTF8String name(string);
 494     auto primitive(Primitives_.find(name));
 495     return primitive != Primitives_.end() ? primitive->second : CYJavaPrimitiveObject;
 496 }
 497
 498 typedef std::vector<CYJavaPrimitive> CYJavaShorty;
 499
 500 static CYJavaShorty CYJavaGetShorty(JSContextRef context, const CYJavaRef<jobjectArray> &types, jmethodID Class$get$$Name) {
 501     CYJavaEnv jni(types);
 502     size_t count(jni.GetArrayLength(types));
 503     CYJavaShorty shorty(count);
 504     for (size_t index(0); index != count; ++index)
 505         shorty[index] = CYJavaGetPrimitive(context, jni.GetObjectArrayElement<jclass>(types, index), Class$get$$Name);
 506     return shorty;
 507 }
 508
 509 struct CYJavaField {
 510     jfieldID field_;
 511     CYJavaPrimitive primitive_;
 512 };
 513
 514 typedef std::map<std::string, CYJavaField> CYJavaFieldMap;
 515
 516 struct CYJavaSignature {
 517     CYJavaGlobal<jobject> reflected_;
 518     jmethodID method_;
 519     CYJavaPrimitive primitive_;
 520     CYJavaShorty shorty_;
 521
 522     CYJavaSignature(const CYJavaRef<jobject> &reflected, jmethodID method, CYJavaPrimitive primitive, const CYJavaShorty &shorty) :
 523         reflected_(reflected),
 524         method_(method),
 525         primitive_(primitive),
 526         shorty_(shorty)
 527     {
 528     }
 529
 530     CYJavaSignature(unsigned count) :
 531         shorty_(count)
 532     {
 533     }
 534
 535     bool operator <(const CYJavaSignature &rhs) const {
 536         return shorty_.size() < rhs.shorty_.size();
 537     }
 538 };
 539
 540 typedef std::multiset<CYJavaSignature> CYJavaOverload;
 541
 542 struct CYJavaMethod :
 543     CYPrivate<CYJavaMethod>
 544 {
 545     CYJavaOverload overload_;
 546
 547     CYJavaMethod(const CYJavaOverload &overload) :
 548         overload_(overload)
 549     {
 550     }
 551 };
 552
 553 struct CYJavaStaticMethod :
 554     CYPrivate<CYJavaStaticMethod>
 555 {
 556     CYJavaOverload overload_;
 557
 558     CYJavaStaticMethod(const CYJavaOverload &overload) :
 559         overload_(overload)
 560     {
 561     }
 562 };
 563
 564 struct CYJavaClass :
 565     CYJavaValue<CYJavaClass, jclass>
 566 {
 567     bool interface_;
 568
 569     CYJavaFieldMap static_;
 570     CYJavaFieldMap instance_;
 571     CYJavaOverload overload_;
 572
 573     CYJavaClass(const CYJavaRef<jclass> &value, bool interface) :
 574         CYJavaValue(value),
 575         interface_(interface)
 576     {
 577     }
 578 };
 579
 580 static JSObjectRef CYGetJavaClass(JSContextRef context, const CYJavaRef<jclass> &_class);
 581
 582 struct CYJavaObject :
 583     CYJavaValue<CYJavaObject, jobject>
 584 {
 585     CYJavaClass *table_;
 586
 587     CYJavaObject(const CYJavaRef<jobject> &value, CYJavaClass *table) :
 588         CYJavaValue(value),
 589         table_(table)
 590     {
 591     }
 592
 593     JSValueRef GetPrototype(JSContextRef context) const;
 594 };
 595
 596 struct CYJavaInterior :
 597     CYJavaValue<CYJavaInterior, jobject>
 598 {
 599     CYJavaClass *table_;
 600
 601     CYJavaInterior(const CYJavaRef<jobject> &value, CYJavaClass *table) :
 602         CYJavaValue(value),
 603         table_(table)
 604     {
 605     }
 606 };
 607
 608 struct CYJavaStaticInterior :
 609     CYJavaValue<CYJavaStaticInterior, jclass>
 610 {
 611     CYJavaClass *table_;
 612
 613     CYJavaStaticInterior(const CYJavaRef<jclass> &value, CYJavaClass *table) :
 614         CYJavaValue(value),
 615         table_(table)
 616     {
 617     }
 618 };
 619
 620 struct CYJavaArray :
 621     CYJavaValue<CYJavaArray, jarray>
 622 {
 623     CYJavaPrimitive primitive_;
 624
 625     CYJavaArray(const CYJavaRef<jarray> &value, CYJavaPrimitive primitive) :
 626         CYJavaValue(value),
 627         primitive_(primitive)
 628     {
 629     }
 630
 631     JSValueRef GetPrototype(JSContextRef context) const;
 632 };
 633
 634 struct CYJavaPackage :
 635     CYPrivate<CYJavaPackage>
 636 {
 637     JNIEnv *jni_;
 638
 639     typedef std::vector<std::string> Path;
 640     Path package_;
 641
 642     _finline CYJavaPackage(JNIEnv *jni, const Path &package) :
 643         jni_(jni),
 644         package_(package)
 645     {
 646     }
 647 };
 648
 649 JSValueRef CYJavaObject::GetPrototype(JSContextRef context) const {
 650     CYJavaEnv jni(value_);
 651     return CYGetProperty(context, CYGetJavaClass(context, jni.GetObjectClass(value_)), prototype_s);
 652 }
 653
 654 JSValueRef CYJavaArray::GetPrototype(JSContextRef context) const {
 655     return CYGetCachedObject(context, CYJSString("Array_prototype"));
 656 }
 657
 658 static JSValueRef CYCastJSValue(JSContextRef context, const CYJavaRef<jobject> &value) {
 659     if (!value)
 660         return CYJSNull(context);
 661     CYJavaEnv jni(value);
 662
 663     auto _class(jni.GetObjectClass(value));
 664     if (jni.IsSameObject(_class, jni.FindClass("java/lang/String")))
 665         return CYCastJSValue(context, CYJSString(value.cast<jstring>()));
 666
 667     auto Class$(jni.FindClass("java/lang/Class"));
 668     auto Class$isArray(jni.GetMethodID(Class$, "isArray", "()Z"));
 669     if (jni.CallBooleanMethod(_class, Class$isArray)) {
 670         auto Class$getComponentType(jni.GetMethodID(Class$, "getComponentType", "()Ljava/lang/Class;"));
 671         auto component(jni.CallObjectMethod<jclass>(_class, Class$getComponentType));
 672         auto Class$getName(jni.GetMethodID(Class$, "getName", "()Ljava/lang/String;"));
 673         return CYJavaArray::Make(context, value.cast<jarray>(), CYJavaGetPrimitive(context, component, Class$getName));
 674     }
 675
 676     auto Wrapper$(jni.FindClass("Cycript$Wrapper"));
 677     if (jni.IsSameObject(_class, Wrapper$)) {
 678         auto Wrapper$getProtect(jni.GetMethodID(Wrapper$, "getProtect", "()J"));
 679         auto &protect(*reinterpret_cast<CYProtect *>(jni.CallLongMethod(value, Wrapper$getProtect)));
 680         return protect;
 681     }
 682
 683     CYJavaClass *table(reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(CYGetJavaClass(context, _class))));
 684     return CYJavaObject::Make(context, value, table);
 685 }
 686
 687 static _finline JSObjectRef CYCastJSObject(JSContextRef context, const CYJavaRef<jobject> &value) {
 688     return CYCastJSObject(context, CYCastJSValue(context, value));
 689 }
 690
 691 static CYJavaLocal<jstring> CYCastJavaString(const CYJavaEnv &jni, JSContextRef context, CYUTF16String value) {
 692     return jni.NewString(value.data, value.size);
 693 }
 694
 695 static CYJavaLocal<jstring> CYCastJavaString(const CYJavaEnv &jni, JSContextRef context, JSStringRef value) {
 696     return CYCastJavaString(jni, context, CYCastUTF16String(value));
 697 }
 698
 699 #define CYCastJava$(T, Type, jtype, Cast) \
 700 _disused static CYJavaLocal<jobject> CYCastJava ## Type(const CYJavaEnv &jni, JSContextRef context, JSValueRef value) { \
 701     auto Type$(jni.FindClass("java/lang/" #Type)); \
 702     auto Type$init$(jni.GetMethodID(Type$, "<init>", "(" #T ")V")); \
 703     return jni.NewObject(Type$, Type$init$, static_cast<jtype>(Cast(context, value))); \
 704 }
 705
 706 CYCastJava$(Z, Boolean, jboolean, CYCastBool)
 707 CYCastJava$(B, Byte, jbyte, CYCastDouble)
 708 CYCastJava$(C, Character, jchar, CYCastDouble)
 709 CYCastJava$(S, Short, jshort, CYCastDouble)
 710 CYCastJava$(I, Integer, jint, CYCastDouble)
 711 CYCastJava$(J, Long, jlong, CYCastDouble)
 712 CYCastJava$(F, Float, jfloat, CYCastDouble)
 713 CYCastJava$(D, Double, jdouble, CYCastDouble)
 714
 715 static CYJavaClass *CYGetJavaTable(JSContextRef context, JSObjectRef object) {
 716     if (!JSValueIsObjectOfClass(context, object, CYJavaClass::Class_))
 717         return NULL;
 718     return reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(object));
 719 }
 720
 721 static CYJavaObject *CYGetJavaObject(JSContextRef context, JSObjectRef object) {
 722     if (!JSValueIsObjectOfClass(context, object, CYJavaObject::Class_))
 723         return NULL;
 724     return reinterpret_cast<CYJavaObject *>(JSObjectGetPrivate(object));
 725 }
 726
 727 static CYJavaLocal<jobject> CYCastJavaObject(const CYJavaEnv &jni, JSContextRef context, JSObjectRef value) {
 728     if (CYJavaObject *internal = CYGetJavaObject(context, value))
 729         return internal->value_;
 730
 731     auto Wrapper$(jni.FindClass("Cycript$Wrapper"));
 732     auto Wrapper$$init$(jni.GetMethodID(Wrapper$, "<init>", "(J)V"));
 733     CYProtect *protect(new CYProtect(context, value));
 734     return jni.NewObject(Wrapper$, Wrapper$$init$, reinterpret_cast<jlong>(protect));
 735 }
 736
 737 static CYJavaLocal<jobject> CYCastJavaObject(const CYJavaEnv &jni, JSContextRef context, JSValueRef value) {
 738     switch (JSValueGetType(context, value)) {
 739         case kJSTypeNull:
 740             return {jni, NULL};
 741         case kJSTypeBoolean:
 742             return CYCastJavaBoolean(jni, context, value);
 743         case kJSTypeNumber:
 744             return CYCastJavaDouble(jni, context, value);
 745         case kJSTypeString:
 746             return CYCastJavaString(jni, context, CYJSString(context, value));
 747         case kJSTypeObject:
 748             return CYCastJavaObject(jni, context, CYCastJSObject(context, value));
 749
 750         case kJSTypeUndefined:
 751             // XXX: I am currently relying on this for dynamic proxy of void method
 752             return {jni, NULL};
 753         default:
 754             _assert(false);
 755     }
 756 }
 757
 758 static JSObjectRef CYGetJavaClass(JSContextRef context, const CYJavaRef<jclass> &value) {
 759     CYJavaEnv jni(value);
 760     CYJavaFrame frame(jni, 64);
 761
 762     JSObjectRef global(CYGetGlobalObject(context));
 763     JSObjectRef cy(CYCastJSObject(context, CYGetProperty(context, global, cy_s)));
 764
 765     auto Class$(jni.FindClass("java/lang/Class"));
 766     auto Class$getName(jni.GetMethodID(Class$, "getName", "()Ljava/lang/String;"));
 767
 768     CYJSString name(jni.CallObjectMethod<jstring>(value, Class$getName));
 769     JSValueRef cached(CYGetProperty(context, cy, name));
 770     if (!JSValueIsUndefined(context, cached))
 771         return CYCastJSObject(context, cached);
 772
 773     JSObjectRef constructor;
 774     JSObjectRef prototype;
 775
 776     {
 777
 778     auto Class$isInterface(jni.GetMethodID(Class$, "isInterface", "()Z"));
 779
 780     auto Class$getDeclaredConstructors(jni.GetMethodID(Class$, "getDeclaredConstructors", "()[Ljava/lang/reflect/Constructor;"));
 781     auto Class$getDeclaredFields(jni.GetMethodID(Class$, "getDeclaredFields", "()[Ljava/lang/reflect/Field;"));
 782     auto Class$getDeclaredMethods(jni.GetMethodID(Class$, "getDeclaredMethods", "()[Ljava/lang/reflect/Method;"));
 783
 784     auto Constructor$(jni.FindClass("java/lang/reflect/Constructor"));
 785     //auto Constructor$getModifiers(jni.GetMethodID(Constructor$, "getModifiers", "()I"));
 786     auto Constructor$getParameterTypes(jni.GetMethodID(Constructor$, "getParameterTypes", "()[Ljava/lang/Class;"));
 787
 788     auto Field$(jni.FindClass("java/lang/reflect/Field"));
 789     auto Field$getModifiers(jni.GetMethodID(Field$, "getModifiers", "()I"));
 790     auto Field$getName(jni.GetMethodID(Field$, "getName", "()Ljava/lang/String;"));
 791     auto Field$getType(jni.GetMethodID(Field$, "getType", "()Ljava/lang/Class;"));
 792
 793     auto Method$(jni.FindClass("java/lang/reflect/Method"));
 794     auto Method$getModifiers(jni.GetMethodID(Method$, "getModifiers", "()I"));
 795     auto Method$getName(jni.GetMethodID(Method$, "getName", "()Ljava/lang/String;"));
 796     auto Method$getParameterTypes(jni.GetMethodID(Method$, "getParameterTypes", "()[Ljava/lang/Class;"));
 797     auto Method$getReturnType(jni.GetMethodID(Method$, "getReturnType", "()Ljava/lang/Class;"));
 798
 799     auto Modifier$(jni.FindClass("java/lang/reflect/Modifier"));
 800     auto Modifier$isStatic(jni.GetStaticMethodID(Modifier$, "isStatic", "(I)Z"));
 801
 802     auto interface(jni.CallBooleanMethod(value, Class$isInterface));
 803     auto table(new CYJavaClass(value, interface));
 804
 805     for (CYJavaLocal<jclass> prototype(value); prototype; prototype = jni.GetSuperclass(prototype)) {
 806         auto fields(jni.CallObjectMethod<jobjectArray>(prototype, Class$getDeclaredFields));
 807
 808         for (jsize i(0), e(jni.GetArrayLength(fields)); i != e; ++i) {
 809             auto field(jni.GetObjectArrayElement<jobject>(fields, e - i - 1));
 810             auto modifiers(jni.CallIntMethod(field, Field$getModifiers));
 811             auto instance(!jni.CallStaticBooleanMethod(Modifier$, Modifier$isStatic, modifiers));
 812             auto &map(instance ? table->instance_ : table->static_);
 813             CYJavaUTF8String name(jni.CallObjectMethod<jstring>(field, Field$getName));
 814             auto id(jni.FromReflectedField(field));
 815             auto type(jni.CallObjectMethod<jclass>(field, Field$getType));
 816             map.insert(std::make_pair(std::string(name), CYJavaField{id, CYJavaGetPrimitive(context, type, Class$getName)}));
 817         }
 818     }
 819
 820     constructor = JSObjectMake(context, CYJavaClass::Class_, table);
 821
 822     prototype = JSObjectMake(context, NULL, NULL);
 823     CYSetProperty(context, constructor, prototype_s, prototype, kJSPropertyAttributeDontEnum);
 824
 825     auto constructors(jni.CallObjectMethod<jobjectArray>(value, Class$getDeclaredConstructors));
 826
 827     for (jsize i(0), e(jni.GetArrayLength(constructors)); i != e; ++i) {
 828         auto constructor(jni.GetObjectArrayElement<jobject>(constructors, i));
 829         auto parameters(jni.CallObjectMethod<jobjectArray>(constructor, Constructor$getParameterTypes));
 830         CYJavaShorty shorty(CYJavaGetShorty(context, parameters, Class$getName));
 831         auto id(jni.FromReflectedMethod(constructor));
 832         table->overload_.insert(CYJavaSignature(constructor, id, CYJavaPrimitiveObject, shorty));
 833     }
 834
 835     auto methods(jni.CallObjectMethod<jobjectArray>(value, Class$getDeclaredMethods));
 836
 837     std::map<std::pair<bool, std::string>, CYJavaOverload> entries;
 838
 839     for (jsize i(0), e(jni.GetArrayLength(methods)); i != e; ++i) {
 840         auto method(jni.GetObjectArrayElement<jobject>(methods, i));
 841         auto modifiers(jni.CallIntMethod(method, Method$getModifiers));
 842         auto instance(!jni.CallStaticBooleanMethod(Modifier$, Modifier$isStatic, modifiers));
 843         CYJavaUTF8String name(jni.CallObjectMethod<jstring>(method, Method$getName));
 844         auto parameters(jni.CallObjectMethod<jobjectArray>(method, Method$getParameterTypes));
 845         CYJavaShorty shorty(CYJavaGetShorty(context, parameters, Class$getName));
 846         auto type(jni.CallObjectMethod<jclass>(method, Method$getReturnType));
 847         auto primitive(CYJavaGetPrimitive(context, type, Class$getName));
 848         auto id(jni.FromReflectedMethod(method));
 849         entries[std::make_pair(instance, std::string(name))].insert(CYJavaSignature(method, id, primitive, shorty));
 850     }
 851
 852     for (const auto &entry : entries) {
 853         bool instance(entry.first.first);
 854         CYJSString name(entry.first.second);
 855         auto &overload(entry.second);
 856         if (instance)
 857             CYSetProperty(context, prototype, name, CYJavaMethod::Make(context, overload), kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete);
 858         else
 859             CYSetProperty(context, constructor, name, CYJavaStaticMethod::Make(context, overload), kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete);
 860     }
 861
 862     }
 863
 864     // XXX: for some reason kJSPropertyAttributeDontEnum doesn't work if there's already a property with the same name
 865     // by not linking the prototypes until after we set the properties, we hide the parent property from this issue :(
 866
 867     if (auto super = jni.GetSuperclass(value)) {
 868         JSObjectRef parent(CYGetJavaClass(context, super));
 869         CYSetPrototype(context, constructor, parent);
 870         CYSetPrototype(context, prototype, CYGetProperty(context, parent, prototype_s));
 871     }
 872
 873     CYSetProperty(context, cy, name, constructor);
 874     return constructor;
 875 }
 876
 877 static void CYCastJavaNumeric(jvalue &value, CYJavaPrimitive primitive, JSContextRef context, JSValueRef argument) {
 878     switch (primitive) {
 879 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
 880         case CYJavaPrimitive ## Type: \
 881             value.t = static_cast<j ## type>(CYCastDouble(context, argument)); \
 882             break;
 883 CYJavaForEachPrimitive
 884 #undef CYJavaForEachPrimitive_
 885         default:
 886             _assert(false);
 887     }
 888 }
 889
 890 static bool CYCastJavaArguments(const CYJavaFrame &frame, const CYJavaShorty &shorty, JSContextRef context, const JSValueRef arguments[], jvalue *array) {
 891     CYJavaEnv jni(frame);
 892
 893     for (size_t index(0); index != shorty.size(); ++index) {
 894         JSValueRef argument(arguments[index]);
 895         JSType type(JSValueGetType(context, argument));
 896         jvalue &value(array[index]);
 897
 898         switch (CYJavaPrimitive primitive = shorty[index]) {
 899             case CYJavaPrimitiveObject:
 900                 // XXX: figure out a way to tie this in to the CYJavaFrame
 901                 value.l = CYCastJavaObject(jni, context, argument).leak();
 902             break;
 903
 904             case CYJavaPrimitiveBoolean:
 905                 if (type != kJSTypeBoolean)
 906                     return false;
 907                 value.z = CYCastBool(context, argument);
 908             break;
 909
 910             case CYJavaPrimitiveCharacter:
 911                 if (type == kJSTypeNumber)
 912                     CYCastJavaNumeric(value, primitive, context, argument);
 913                 else if (type != kJSTypeString)
 914                     return false;
 915                 else {
 916                     CYJSString string(context, argument);
 917                     if (JSStringGetLength(string) != 1)
 918                         return false;
 919                     else
 920                         value.c = JSStringGetCharactersPtr(string)[0];
 921                 }
 922             break;
 923
 924             case CYJavaPrimitiveByte:
 925             case CYJavaPrimitiveShort:
 926             case CYJavaPrimitiveInteger:
 927             case CYJavaPrimitiveLong:
 928             case CYJavaPrimitiveFloat:
 929             case CYJavaPrimitiveDouble:
 930                 if (type != kJSTypeNumber)
 931                     return false;
 932                 CYCastJavaNumeric(value, primitive, context, argument);
 933             break;
 934
 935             default:
 936                 _assert(false);
 937         }
 938     }
 939
 940     return true;
 941 }
 942
 943 static JSValueRef JavaMethod_callAsFunction(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
 944     auto internal(CYJavaMethod::Get(context, object));
 945     CYJavaObject *self(CYGetJavaObject(context, _this));
 946     _assert(self != NULL);
 947     CYJavaEnv jni(self->value_);
 948
 949     CYJavaSignature bound(count);
 950     for (auto overload(internal->overload_.lower_bound(bound)), e(internal->overload_.upper_bound(bound)); overload != e; ++overload) {
 951         CYJavaFrame frame(jni, count + 16);
 952         jvalue array[count];
 953         if (!CYCastJavaArguments(frame, overload->shorty_, context, arguments, array))
 954             continue;
 955         jvalue *values(array);
 956         switch (overload->primitive_) {
 957             case CYJavaPrimitiveObject:
 958                 return CYCastJSValue(context, jni.CallObjectMethodA<jobject>(self->value_, overload->method_, values));
 959             case CYJavaPrimitiveVoid:
 960                 jni.CallVoidMethodA(self->value_, overload->method_, values);
 961                 return CYJSUndefined(context);
 962 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
 963             case CYJavaPrimitive ## Type: \
 964                 return CYJavaCastJSValue(context, jni.Call ## Typ ## MethodA(self->value_, overload->method_, values));
 965 CYJavaForEachPrimitive
 966 #undef CYJavaForEachPrimitive_
 967             default: _assert(false);
 968         }
 969     }
 970
 971     CYThrow("invalid method call");
 972 } CYCatch(NULL) }
 973
 974 static JSValueRef JavaStaticMethod_callAsFunction(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
 975     auto internal(CYJavaStaticMethod::Get(context, object));
 976     CYJavaClass *table(CYGetJavaTable(context, _this));
 977     CYJavaEnv jni(table->value_);
 978
 979     CYJavaSignature bound(count);
 980     for (auto overload(internal->overload_.lower_bound(bound)), e(internal->overload_.upper_bound(bound)); overload != e; ++overload) {
 981         CYJavaFrame frame(jni, count + 16);
 982         jvalue array[count];
 983         if (!CYCastJavaArguments(frame, overload->shorty_, context, arguments, array))
 984             continue;
 985         jvalue *values(array);
 986         switch (overload->primitive_) {
 987             case CYJavaPrimitiveObject:
 988                 return CYCastJSValue(context, jni.CallStaticObjectMethodA<jobject>(table->value_, overload->method_, values));
 989             case CYJavaPrimitiveVoid:
 990                 jni.CallStaticVoidMethodA(table->value_, overload->method_, values);
 991                 return CYJSUndefined(context);
 992 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
 993             case CYJavaPrimitive ## Type: \
 994                 return CYJavaCastJSValue(context, jni.CallStatic ## Typ ## MethodA(table->value_, overload->method_, values));
 995 CYJavaForEachPrimitive
 996 #undef CYJavaForEachPrimitive_
 997             default: _assert(false);
 998         }
 999     }
1000
1001     CYThrow("invalid method call");
1002 } CYCatch(NULL) }
1003
1004 static JSObjectRef JavaClass_callAsConstructor(JSContextRef context, JSObjectRef object, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
1005     auto table(CYJavaClass::Get(context, object));
1006     CYJavaEnv jni(table->value_);
1007     jclass _class(table->value_);
1008
1009     if (table->interface_ && count == 1) {
1010         auto Cycript$(jni.FindClass("Cycript"));
1011         auto Cycript$Make(jni.GetStaticMethodID(Cycript$, "proxy", "(Ljava/lang/Class;LCycript$Wrapper;)Ljava/lang/Object;"));
1012         return CYCastJSObject(context, jni.CallObjectMethod<jobject>(Cycript$, Cycript$Make, _class, CYCastJavaObject(jni, context, CYCastJSObject(context, arguments[0])).get()));
1013     }
1014
1015     CYJavaSignature bound(count);
1016     for (auto overload(table->overload_.lower_bound(bound)), e(table->overload_.upper_bound(bound)); overload != e; ++overload) {
1017         CYJavaFrame frame(jni, count + 16);
1018         jvalue array[count];
1019         if (!CYCastJavaArguments(frame, overload->shorty_, context, arguments, array))
1020             continue;
1021         jvalue *values(array);
1022         auto object(jni.NewObjectA(_class, overload->method_, values));
1023         return CYCastJSObject(context, object);
1024     }
1025
1026     CYThrow("invalid constructor call");
1027 } CYCatch(NULL) }
1028
1029 static bool JavaStaticInterior_hasProperty(JSContextRef context, JSObjectRef object, JSStringRef property) {
1030     auto internal(CYJavaStaticInterior::Get(context, object));
1031     CYJavaClass *table(internal->table_);
1032     CYPool pool;
1033     auto name(CYPoolUTF8String(pool, context, property));
1034     auto field(table->static_.find(name));
1035     if (field == table->static_.end())
1036         return false;
1037     return true;
1038 }
1039
1040 static JSValueRef JavaStaticInterior_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1041     auto internal(CYJavaStaticInterior::Get(context, object));
1042     CYJavaClass *table(internal->table_);
1043     CYJavaEnv jni(table->value_);
1044     CYPool pool;
1045     auto name(CYPoolUTF8String(pool, context, property));
1046     auto field(table->static_.find(name));
1047     if (field == table->static_.end())
1048         return NULL;
1049
1050     switch (field->second.primitive_) {
1051         case CYJavaPrimitiveObject:
1052             return CYCastJSValue(context, jni.GetStaticObjectField<jobject>(table->value_, field->second.field_));
1053 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1054         case CYJavaPrimitive ## Type: \
1055             return CYJavaCastJSValue(context, jni.GetStatic ## Typ ## Field(table->value_, field->second.field_));
1056 CYJavaForEachPrimitive
1057 #undef CYJavaForEachPrimitive_
1058         default: _assert(false);
1059     }
1060 } CYCatch(NULL) }
1061
1062 static bool JavaStaticInterior_setProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef value, JSValueRef *exception) { CYTry {
1063     auto internal(CYJavaStaticInterior::Get(context, object));
1064     CYJavaClass *table(internal->table_);
1065     CYJavaEnv jni(table->value_);
1066     CYPool pool;
1067     auto name(CYPoolUTF8String(pool, context, property));
1068     auto field(table->static_.find(name));
1069     if (field == table->static_.end())
1070         return false;
1071
1072     switch (field->second.primitive_) {
1073         case CYJavaPrimitiveObject:
1074             jni.SetStaticObjectField(table->value_, field->second.field_, CYCastJavaObject(jni, context, value));
1075 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1076         case CYJavaPrimitive ## Type: \
1077             jni.SetStatic ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value)); \
1078             break;
1079 CYJavaForEachPrimitive
1080 #undef CYJavaForEachPrimitive_
1081         default: _assert(false);
1082     }
1083
1084     return true;
1085 } CYCatch(false) }
1086
1087 static void JavaStaticInterior_getPropertyNames(JSContextRef context, JSObjectRef object, JSPropertyNameAccumulatorRef names) {
1088     auto internal(CYJavaStaticInterior::Get(context, object));
1089     CYJavaClass *table(internal->table_);
1090     for (const auto &field : table->static_)
1091         JSPropertyNameAccumulatorAddName(names, CYJSString(field.first));
1092 }
1093
1094 static JSValueRef JavaClass_getProperty_class(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1095     auto table(CYJavaClass::Get(context, object));
1096     return CYCastJSValue(context, table->value_);
1097 } CYCatch(NULL) }
1098
1099 static bool JavaInterior_hasProperty(JSContextRef context, JSObjectRef object, JSStringRef property) {
1100     auto internal(CYJavaInterior::Get(context, object));
1101     CYJavaClass *table(internal->table_);
1102     CYPool pool;
1103     auto name(CYPoolUTF8String(pool, context, property));
1104     auto field(table->instance_.find(name));
1105     if (field == table->instance_.end())
1106         return false;
1107     return true;
1108 }
1109
1110 static JSValueRef JavaInterior_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1111     auto internal(CYJavaInterior::Get(context, object));
1112     CYJavaEnv jni(internal->value_);
1113     CYJavaClass *table(internal->table_);
1114     CYPool pool;
1115     auto name(CYPoolUTF8String(pool, context, property));
1116     auto field(table->instance_.find(name));
1117     if (field == table->instance_.end())
1118         return NULL;
1119
1120     switch (field->second.primitive_) {
1121         case CYJavaPrimitiveObject:
1122             return CYCastJSValue(context, jni.GetObjectField<jobject>(internal->value_, field->second.field_));
1123 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1124         case CYJavaPrimitive ## Type: \
1125             return CYJavaCastJSValue(context, jni.Get ## Typ ## Field(internal->value_, field->second.field_));
1126 CYJavaForEachPrimitive
1127 #undef CYJavaForEachPrimitive_
1128         default: _assert(false);
1129     }
1130 } CYCatch(NULL) }
1131
1132 static bool JavaInterior_setProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef value, JSValueRef *exception) { CYTry {
1133     auto internal(CYJavaInterior::Get(context, object));
1134     CYJavaEnv jni(internal->value_);
1135     CYJavaClass *table(internal->table_);
1136     CYPool pool;
1137     auto name(CYPoolUTF8String(pool, context, property));
1138     auto field(table->instance_.find(name));
1139     if (field == table->instance_.end())
1140         return false;
1141
1142     switch (field->second.primitive_) {
1143         case CYJavaPrimitiveObject:
1144             jni.SetObjectField(table->value_, field->second.field_, CYCastJavaObject(jni, context, value));
1145 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1146         case CYJavaPrimitive ## Type: \
1147             jni.Set ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value)); \
1148             break;
1149 CYJavaForEachPrimitive
1150 #undef CYJavaForEachPrimitive_
1151         default: _assert(false);
1152     }
1153
1154     return true;
1155 } CYCatch(false) }
1156
1157 static void JavaInterior_getPropertyNames(JSContextRef context, JSObjectRef object, JSPropertyNameAccumulatorRef names) {
1158     auto internal(CYJavaInterior::Get(context, object));
1159     CYJavaClass *table(internal->table_);
1160     for (const auto &field : table->instance_)
1161         JSPropertyNameAccumulatorAddName(names, CYJSString(field.first));
1162 }
1163
1164 static JSValueRef JavaObject_getProperty_constructor(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1165     auto internal(CYJavaObject::Get(context, object));
1166     CYJavaEnv jni(internal->value_);
1167     return CYGetJavaClass(context, jni.GetObjectClass(internal->value_));
1168 } CYCatch(NULL) }
1169
1170 static JSValueRef JavaClass_getProperty_$cyi(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1171     auto internal(CYJavaClass::Get(context, object));
1172     return CYJavaStaticInterior::Make(context, internal->value_, internal);
1173 } CYCatch(NULL) }
1174
1175 static JSValueRef JavaObject_getProperty_$cyi(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1176     auto internal(CYJavaObject::Get(context, object));
1177     return CYJavaInterior::Make(context, internal->value_, internal->table_);
1178 } CYCatch(NULL) }
1179
1180 static JSValueRef JavaClass_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
1181     auto internal(CYJavaClass::Get(context, _this));
1182     CYJavaEnv jni(internal->value_);
1183     auto Class$(jni.FindClass("java/lang/Class"));
1184     auto Class$getCanonicalName(jni.GetMethodID(Class$, "getCanonicalName", "()Ljava/lang/String;"));
1185     return CYCastJSValue(context, CYJSString(jni.CallObjectMethod<jstring>(internal->value_, Class$getCanonicalName)));
1186 } CYCatch(NULL) }
1187
1188 static JSValueRef JavaMethod_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
1189     std::ostringstream cyon;
1190     return CYCastJSValue(context, CYJSString(cyon.str()));
1191 } CYCatch(NULL) }
1192
1193 static JSValueRef JavaStaticMethod_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
1194     std::ostringstream cyon;
1195     return CYCastJSValue(context, CYJSString(cyon.str()));
1196 } CYCatch(NULL) }
1197
1198 static JSValueRef JavaArray_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1199     auto internal(CYJavaArray::Get(context, object));
1200     CYJavaEnv jni(internal->value_);
1201     if (JSStringIsEqual(property, length_s))
1202         return CYCastJSValue(context, jni.GetArrayLength(internal->value_));
1203
1204     CYPool pool;
1205     ssize_t offset;
1206     if (!CYGetOffset(pool, context, property, offset))
1207         return NULL;
1208
1209     if (internal->primitive_ == CYJavaPrimitiveObject)
1210         return CYCastJSValue(context, jni.GetObjectArrayElement<jobject>(static_cast<jobjectArray>(internal->value_.value_), offset));
1211     else switch (internal->primitive_) {
1212 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1213         case CYJavaPrimitive ## Type: { \
1214             j ## type element; \
1215             jni.Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element); \
1216             return CYJavaCastJSValue(context, element); \
1217         } break;
1218 CYJavaForEachPrimitive
1219 #undef CYJavaForEachPrimitive_
1220         default: _assert(false);
1221     }
1222 } CYCatch(NULL) }
1223
1224 static bool JavaArray_setProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef value, JSValueRef *exception) { CYTry {
1225     auto internal(CYJavaArray::Get(context, object));
1226     CYJavaEnv jni(internal->value_);
1227
1228     CYPool pool;
1229     ssize_t offset;
1230     if (!CYGetOffset(pool, context, property, offset))
1231         return false;
1232
1233     if (internal->primitive_ == CYJavaPrimitiveObject)
1234         jni.SetObjectArrayElement(static_cast<jobjectArray>(internal->value_.value_), offset, CYCastJavaObject(jni, context, value));
1235     else switch (internal->primitive_) {
1236 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1237         case CYJavaPrimitive ## Type: { \
1238             j ## type element; \
1239             jni.Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element); \
1240             return CYJavaCastJSValue(context, element); \
1241         } break;
1242 CYJavaForEachPrimitive
1243 #undef CYJavaForEachPrimitive_
1244         default: _assert(false);
1245     }
1246
1247     return true;
1248 } CYCatch(false) }
1249
1250 static JNIEnv *GetJNI(JSContextRef context, JNIEnv *&env);
1251
1252 static JSValueRef JavaPackage_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
1253     auto internal(CYJavaPackage::Get(context, _this));
1254     std::ostringstream name;
1255     for (auto &package : internal->package_)
1256         name << package << '.';
1257     name << '*';
1258     return CYCastJSValue(context, CYJSString(name.str()));
1259 } CYCatch(NULL) }
1260
1261 static bool CYJavaPackage_hasProperty(JSContextRef context, JSObjectRef object, JSStringRef property) {
1262     return true;
1263 }
1264
1265 static JSValueRef CYJavaPackage_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
1266     auto internal(CYJavaPackage::Get(context, object));
1267     CYJavaPackage::Path package(internal->package_);
1268
1269     CYPool pool;
1270     const char *next(CYPoolCString(pool, context, property));
1271
1272     std::ostringstream name;
1273     for (auto &package : internal->package_)
1274         name << package << '/';
1275     name << next;
1276
1277     if (internal->jni_ == NULL)
1278         GetJNI(context, internal->jni_);
1279     JNIEnv *jni(internal->jni_);
1280
1281     if (auto _class = jni->FindClass(name.str().c_str()))
1282         return CYGetJavaClass(context, CYJavaLocal<jclass>(jni, _class));
1283     jni->ExceptionClear();
1284
1285     package.push_back(next);
1286     return CYJavaPackage::Make(context, jni, package);
1287 } CYCatch(NULL) }
1288
1289 static void Cycript_delete(JNIEnv *env, jclass api, jlong jprotect) { CYJavaTry {
1290     delete &protect;
1291 } CYJavaCatch() }
1292
1293 static jobject Cycript_handle(JNIEnv *env, jclass api, jlong jprotect, jstring property, jobjectArray jarguments) { CYJavaTry {
1294     JSValueRef function(CYGetProperty(context, object, CYJSString(CYJavaRef<jstring>(jni, property))));
1295     if (JSValueIsUndefined(context, function))
1296         return NULL;
1297
1298     size_t count(jarguments == NULL ? 0 : jni.GetArrayLength(jarguments));
1299     JSValueRef arguments[count];
1300     for (size_t index(0); index != count; ++index)
1301         arguments[index] = CYCastJSValue(context, jni.GetObjectArrayElement<jobject>(jarguments, index));
1302
1303     return CYCastJavaObject(jni, context, CYCallAsFunction(context, CYCastJSObject(context, function), object, count, arguments)).leak();
1304 } CYJavaCatch(NULL) }
1305
1306 static JNINativeMethod Cycript_[] = {
1307     {(char *) "delete", (char *) "(J)V", (void *) &Cycript_delete},
1308     {(char *) "handle", (char *) "(JLjava/lang/String;[Ljava/lang/Object;)Ljava/lang/Object;", (void *) &Cycript_handle},
1309 };
1310
1311 template <typename Type_>
1312 static _finline void dlset(Type_ &function, const char *name, void *handle) {
1313     function = reinterpret_cast<Type_>(dlsym(handle, name));
1314 }
1315
1316 jint CYJavaVersion(JNI_VERSION_1_4);
1317
1318 static JavaVM *CYGetJavaVM(jint (*$JNI_GetCreatedJavaVMs)(JavaVM **, jsize, jsize *)) {
1319     jsize capacity(16);
1320     JavaVM *jvms[capacity];
1321     jsize size;
1322     _jnicall($JNI_GetCreatedJavaVMs(jvms, capacity, &size));
1323     if (size == 0)
1324         return NULL;
1325     return jvms[0];
1326 }
1327
1328 static JavaVM *CYGetJavaVM(JSContextRef context) {
1329     CYPool pool;
1330     void *handle(RTLD_DEFAULT);
1331     std::string library;
1332
1333     jint (*$JNI_GetCreatedJavaVMs)(JavaVM **jvms, jsize capacity, jsize *size);
1334     dlset($JNI_GetCreatedJavaVMs, "JNI_GetCreatedJavaVMs", handle);
1335
1336     if ($JNI_GetCreatedJavaVMs != NULL) {
1337         if (JavaVM *jvm = CYGetJavaVM($JNI_GetCreatedJavaVMs))
1338             return jvm;
1339     } else {
1340         std::vector<const char *> guesses;
1341
1342 #ifdef __ANDROID__
1343         char android[PROP_VALUE_MAX];
1344         if (__system_property_get("persist.sys.dalvik.vm.lib", android) != 0)
1345             guesses.push_back(android);
1346 #endif
1347
1348         guesses.push_back("/Library/Internet Plug-Ins/JavaAppletPlugin.plugin/Contents/Home/lib/jli/libjli.dylib");
1349         //guesses.push_back("/System/Library/Frameworks/JavaVM.framework/JavaVM");
1350         guesses.push_back("libjvm.dylib");
1351
1352         guesses.push_back("libart.so");
1353         guesses.push_back("libdvm.so");
1354         guesses.push_back("libjvm.so");
1355
1356         for (const char *guess : guesses) {
1357             handle = dlopen(guess, RTLD_LAZY | RTLD_GLOBAL);
1358             if (handle != NULL) {
1359                 library = guess;
1360                 break;
1361             }
1362         }
1363
1364         if (library.size() == 0)
1365             return NULL;
1366
1367         dlset($JNI_GetCreatedJavaVMs, "JNI_GetCreatedJavaVMs", handle);
1368         if (JavaVM *jvm = CYGetJavaVM($JNI_GetCreatedJavaVMs))
1369             return jvm;
1370     }
1371
1372     std::vector<JavaVMOption> options;
1373
1374     {
1375         std::ostringstream option;
1376         option << "-Djava.class.path=";
1377         option << CYPoolLibraryPath(pool) << "/libcycript.jar";
1378         if (const char *classpath = getenv("CLASSPATH"))
1379             option << ':' << classpath;
1380         options.push_back(JavaVMOption{pool.strdup(option.str().c_str()), NULL});
1381     }
1382
1383     // To use libnativehelper to access JNI_GetCreatedJavaVMs, you need JniInvocation.
1384     // ...but there can only be one JniInvocation, and assuradely the other VM has it.
1385     // Essentially, this API makes no sense. We need it for AndroidRuntime, though :/.
1386
1387     if (void *libnativehelper = dlopen("libnativehelper.so", RTLD_LAZY | RTLD_GLOBAL)) {
1388         class JniInvocation$;
1389         JniInvocation$ *(*JniInvocation$$init$)(JniInvocation$ *self)(NULL);
1390         bool (*JniInvocation$Init)(JniInvocation$ *self, const char *library)(NULL);
1391         JniInvocation$ *(*JniInvocation$finalize)(JniInvocation$ *self)(NULL);
1392
1393         dlset(JniInvocation$$init$, "_ZN13JniInvocationC1Ev", libnativehelper);
1394         dlset(JniInvocation$Init, "_ZN13JniInvocation4InitEPKc", libnativehelper);
1395         dlset(JniInvocation$finalize, "_ZN13JniInvocationD1Ev", libnativehelper);
1396
1397         if (JniInvocation$$init$ == NULL)
1398             dlclose(libnativehelper);
1399         else {
1400             // XXX: we should attach a pool to the VM itself and deallocate this there
1401             //auto invocation(pool.calloc<JniInvocation$>(1, 1024));
1402             //_assert(JniInvocation$finalize != NULL);
1403             //pool.atexit(reinterpret_cast<void (*)(void *)>(JniInvocation$finalize), invocation);
1404
1405             auto invocation(static_cast<JniInvocation$ *>(calloc(1, 1024)));
1406             JniInvocation$$init$(invocation);
1407
1408             _assert(JniInvocation$Init != NULL);
1409             JniInvocation$Init(invocation, NULL);
1410
1411             dlset($JNI_GetCreatedJavaVMs, "JNI_GetCreatedJavaVMs", libnativehelper);
1412             if (JavaVM *jvm = CYGetJavaVM($JNI_GetCreatedJavaVMs))
1413                 return jvm;
1414         }
1415     }
1416
1417     JavaVM *jvm;
1418     JNIEnv *env;
1419
1420     if (void *libandroid_runtime = dlopen("libandroid_runtime.so", RTLD_LAZY | RTLD_GLOBAL)) {
1421         class AndroidRuntime$;
1422         AndroidRuntime$ *(*AndroidRuntime$$init$)(AndroidRuntime$ *self, char *args, unsigned int size)(NULL);
1423         int (*AndroidRuntime$startVm)(AndroidRuntime$ *self, JavaVM **jvm, JNIEnv **env)(NULL);
1424         int (*AndroidRuntime$startReg)(JNIEnv *env)(NULL);
1425         int (*AndroidRuntime$addOption)(AndroidRuntime$ *self, const char *option, void *extra)(NULL);
1426         int (*AndroidRuntime$addVmArguments)(AndroidRuntime$ *self, int, const char *const argv[])(NULL);
1427         AndroidRuntime$ *(*AndroidRuntime$finalize)(AndroidRuntime$ *self)(NULL);
1428
1429         dlset(AndroidRuntime$$init$, "_ZN7android14AndroidRuntimeC1EPcj", libandroid_runtime);
1430         dlset(AndroidRuntime$startVm, "_ZN7android14AndroidRuntime7startVmEPP7_JavaVMPP7_JNIEnv", libandroid_runtime);
1431         dlset(AndroidRuntime$startReg, "_ZN7android14AndroidRuntime8startRegEP7_JNIEnv", libandroid_runtime);
1432         dlset(AndroidRuntime$addOption, "_ZN7android14AndroidRuntime9addOptionEPKcPv", libandroid_runtime);
1433         dlset(AndroidRuntime$addVmArguments, "_ZN7android14AndroidRuntime14addVmArgumentsEiPKPKc", libandroid_runtime);
1434         dlset(AndroidRuntime$finalize, "_ZN7android14AndroidRuntimeD1Ev", libandroid_runtime);
1435
1436         // XXX: it would also be interesting to attach this to a global pool
1437         AndroidRuntime$ *runtime(pool.calloc<AndroidRuntime$>(1, 1024));
1438
1439         _assert(AndroidRuntime$$init$ != NULL);
1440         AndroidRuntime$$init$(runtime, NULL, 0);
1441
1442         if (AndroidRuntime$addOption == NULL) {
1443             _assert(AndroidRuntime$addVmArguments != NULL);
1444             std::vector<const char *> arguments;
1445             for (const auto &option : options)
1446                 arguments.push_back(option.optionString);
1447             AndroidRuntime$addVmArguments(runtime, arguments.size(), arguments.data());
1448         } else for (const auto &option : options)
1449             AndroidRuntime$addOption(runtime, option.optionString, option.extraInfo);
1450
1451         int failure;
1452
1453         _assert(AndroidRuntime$startVm != NULL);
1454         failure = AndroidRuntime$startVm(runtime, &jvm, &env);
1455         _assert(failure == 0);
1456
1457         _assert(AndroidRuntime$startReg != NULL);
1458         failure = AndroidRuntime$startReg(env);
1459         _assert(failure == 0);
1460
1461         return jvm;
1462     }
1463
1464     jint (*$JNI_CreateJavaVM)(JavaVM **jvm, void **, void *);
1465     dlset($JNI_CreateJavaVM, "JNI_CreateJavaVM", handle);
1466
1467     JavaVMInitArgs args;
1468     memset(&args, 0, sizeof(args));
1469     args.version = CYJavaVersion;
1470     args.nOptions = options.size();
1471     args.options = options.data();
1472     _jnicall($JNI_CreateJavaVM(&jvm, reinterpret_cast<void **>(&env), &args));
1473     return jvm;
1474 }
1475
1476 static JNIEnv *GetJNI(JSContextRef context, JNIEnv *&env) {
1477     auto jvm(CYGetJavaVM(context));
1478     _assert(jvm != NULL);
1479     _jnicall(jvm->GetEnv(reinterpret_cast<void **>(&env), CYJavaVersion));
1480     CYJavaEnv jni(env);
1481
1482     // XXX: this happens once per stub :/
1483
1484     auto Cycript$(jni.FindClass("Cycript"));
1485     jni.RegisterNatives(Cycript$, Cycript_, sizeof(Cycript_) / sizeof(Cycript_[0]));
1486
1487     JSObjectRef java(CYGetCachedObject(context, CYJSString("Java")));
1488     JSValueRef arguments[1];
1489     arguments[0] = CYCastJSValue(context, CYJSString("setup"));
1490     CYCallAsFunction(context, CYCastJSObject(context, CYGetProperty(context, java, CYJSString("emit"))), java, 1, arguments);
1491
1492     return env;
1493 }
1494
1495 static JSStaticValue JavaClass_staticValues[3] = {
1496     {"class", &JavaClass_getProperty_class, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1497     {"$cyi", &JavaClass_getProperty_$cyi, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1498     {NULL, NULL, NULL, 0}
1499 };
1500
1501 static JSStaticFunction JavaClass_staticFunctions[2] = {
1502     {"toCYON", &JavaClass_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1503     {NULL, NULL, 0}
1504 };
1505
1506 static JSStaticValue JavaObject_staticValues[3] = {
1507     {"constructor", &JavaObject_getProperty_constructor, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1508     {"$cyi", &JavaObject_getProperty_$cyi, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1509     {NULL, NULL, NULL, 0}
1510 };
1511
1512 static JSStaticFunction JavaMethod_staticFunctions[2] = {
1513     {"toCYON", &JavaMethod_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1514     {NULL, NULL, 0}
1515 };
1516
1517 static JSStaticFunction JavaStaticMethod_staticFunctions[2] = {
1518     {"toCYON", &JavaStaticMethod_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1519     {NULL, NULL, 0}
1520 };
1521
1522 static JSStaticFunction JavaPackage_staticFunctions[2] = {
1523     {"toCYON", &JavaPackage_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
1524     {NULL, NULL, 0}
1525 };
1526
1527 void CYJava_Initialize() {
1528     Primitives_.insert(std::make_pair("void", CYJavaPrimitiveVoid));
1529 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1530     Primitives_.insert(std::make_pair(#type, CYJavaPrimitive ## Type));
1531 CYJavaForEachPrimitive
1532 #undef CYJavaForEachPrimitive_
1533
1534     JSClassDefinition definition;
1535
1536     definition = kJSClassDefinitionEmpty;
1537     definition.className = "JavaClass";
1538     definition.staticValues = JavaClass_staticValues;
1539     definition.staticFunctions = JavaClass_staticFunctions;
1540     definition.callAsConstructor = &JavaClass_callAsConstructor;
1541     definition.finalize = &CYFinalize;
1542     CYJavaClass::Class_ = JSClassCreate(&definition);
1543
1544     definition = kJSClassDefinitionEmpty;
1545     definition.attributes = kJSClassAttributeNoAutomaticPrototype;
1546     definition.className = "JavaInterior";
1547     definition.hasProperty = &JavaInterior_hasProperty;
1548     definition.getProperty = &JavaInterior_getProperty;
1549     definition.setProperty = &JavaInterior_setProperty;
1550     definition.getPropertyNames = &JavaInterior_getPropertyNames;
1551     definition.finalize = &CYFinalize;
1552     CYJavaInterior::Class_ = JSClassCreate(&definition);
1553
1554     definition = kJSClassDefinitionEmpty;
1555     definition.className = "JavaMethod";
1556     definition.staticFunctions = JavaMethod_staticFunctions;
1557     definition.callAsFunction = &JavaMethod_callAsFunction;
1558     definition.finalize = &CYFinalize;
1559     CYJavaMethod::Class_ = JSClassCreate(&definition);
1560
1561     definition = kJSClassDefinitionEmpty;
1562     definition.className = "JavaStaticMethod";
1563     definition.staticFunctions = JavaStaticMethod_staticFunctions;
1564     definition.callAsFunction = &JavaStaticMethod_callAsFunction;
1565     definition.finalize = &CYFinalize;
1566     CYJavaStaticMethod::Class_ = JSClassCreate(&definition);
1567
1568     definition = kJSClassDefinitionEmpty;
1569     definition.attributes = kJSClassAttributeNoAutomaticPrototype;
1570     definition.className = "JavaObject";
1571     definition.staticValues = JavaObject_staticValues;
1572     definition.finalize = &CYFinalize;
1573     CYJavaObject::Class_ = JSClassCreate(&definition);
1574
1575     definition = kJSClassDefinitionEmpty;
1576     definition.className = "JavaArray";
1577     definition.getProperty = &JavaArray_getProperty;
1578     definition.setProperty = &JavaArray_setProperty;
1579     definition.finalize = &CYFinalize;
1580     CYJavaArray::Class_ = JSClassCreate(&definition);
1581
1582     definition = kJSClassDefinitionEmpty;
1583     definition.className = "JavaPackage";
1584     definition.staticFunctions = JavaPackage_staticFunctions;
1585     definition.hasProperty = &CYJavaPackage_hasProperty;
1586     definition.getProperty = &CYJavaPackage_getProperty;
1587     definition.finalize = &CYFinalize;
1588     CYJavaPackage::Class_ = JSClassCreate(&definition);
1589
1590     definition = kJSClassDefinitionEmpty;
1591     definition.attributes = kJSClassAttributeNoAutomaticPrototype;
1592     definition.className = "JavaStaticInterior";
1593     definition.hasProperty = &JavaStaticInterior_hasProperty;
1594     definition.getProperty = &JavaStaticInterior_getProperty;
1595     definition.setProperty = &JavaStaticInterior_setProperty;
1596     definition.getPropertyNames = &JavaStaticInterior_getPropertyNames;
1597     definition.finalize = &CYFinalize;
1598     CYJavaStaticInterior::Class_ = JSClassCreate(&definition);
1599 }
1600
1601 void CYJava_SetupContext(JSContextRef context) {
1602     JSObjectRef global(CYGetGlobalObject(context));
1603     JSObjectRef cy(CYCastJSObject(context, CYGetProperty(context, global, cy_s)));
1604     JSObjectRef cycript(CYCastJSObject(context, CYGetProperty(context, global, CYJSString("Cycript"))));
1605     JSObjectRef all(CYCastJSObject(context, CYGetProperty(context, cycript, CYJSString("all"))));
1606     //JSObjectRef alls(CYCastJSObject(context, CYGetProperty(context, cycript, CYJSString("alls"))));
1607
1608     JSObjectRef Java(JSObjectMake(context, NULL, NULL));
1609     CYSetProperty(context, cycript, CYJSString("Java"), Java);
1610     CYSetProperty(context, cy, CYJSString("Java"), Java);
1611
1612     JSObjectRef Packages(CYJavaPackage::Make(context, nullptr, CYJavaPackage::Path()));
1613     CYSetProperty(context, all, CYJSString("Packages"), Packages, kJSPropertyAttributeDontEnum);
1614
1615     for (auto name : (const char *[]) {"java", "javax", "android", "com", "net", "org"}) {
1616         CYJSString js(name);
1617         CYSetProperty(context, all, js, CYJavaPackage::Make(context, nullptr, CYJavaPackage::Path(1, name)), kJSPropertyAttributeDontEnum);
1618     }
1619 }
1620
1621 static CYHook CYJavaHook = {
1622     NULL,
1623     NULL,
1624     NULL,
1625     &CYJava_Initialize,
1626     &CYJava_SetupContext,
1627     NULL,
1628 };
1629
1630 CYRegisterHook CYJava(&CYJavaHook);