rjb 1.5.7 → 1.6.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 4a44bbac6e23b95fd5b2297053622034f4cc8027d656f546bce3d3d2e20646b4
-  data.tar.gz: 83ff490b4dd8fe79954832e355e4981e5dea72cf3dfbd8350698f869a7ca5eae
+  metadata.gz: bb67ad89857525ce2a6443cb151d5f48dc05a5338ad09e28714b1706cecaa5d6
+  data.tar.gz: 42ab7af0fab4e999d025bc4c7957771a9372699dcd0e15664a741eb0b008aea5
 SHA512:
-  metadata.gz: 9e63eb18a2302be1b83db2e10486104dd5380cbcb7d623c2a2eb6a6203de21f750c03a26c7e6bbd6002adca588ca6d475a12368d72d5790fd6052738770c3ce8
-  data.tar.gz: 426214a2feae8412362efaabb2cf0c4a49882e5701d0dceb80cb91ea24dc686eebc6c9fdee81a216e692735a86d33c99bc72bf9efaae6b0d631e43f4fa9a4b27
+  metadata.gz: ce14080ae984eaa12dafd0433fd5a902fa9dcb5d731f34e674a78d20ae9e04634512c7f40086283fcad7db1064f3a750c1b8c35802c8f1fd75add365cbcf3c0a
+  data.tar.gz: ea0a88e9752dfd8407bd9130b1548589b0fdca90d7a962bef175e504183775817e2818abcb833bae7ab65cfb88e4dcda04c666388b3f2c40235f4b93db396a56

data/ChangeLog

@@ -1,3 +1,42 @@
+Sat Aug 1 2020 arton
+ * ext/rjb.c
+	RJB_VERSION -> 1.6.2
+ * ext/load.c
+	support OpenJDK directory structure (without jre)
+ * lib/rjb.rb
+	change copyright notice
+Wed Jul 17 2019 arton
+ * ext/rjb.c
+	RJB_VERSION -> 1.6.1
+ * lib/rjb.rb
+	java_methods and methods return symbol
+	implements respond_to? for Java methods
+ * ext/rbjexception.c
+	delegate to JavaProxy for respond_to? (except for to_str and exception)
+ * test/test.rb
+	change java_methods test to adjust above change
+	add respond_to? test
+Thu Jul 11 2019 arton
+ * ext/rjb.c
+	RJB_VERSION -> 1.6.0
+ * ext/riconv.c
+	encode/decode between utf-8 and cesu-8 if char was greater than \uffff
+Sun Feb 17 2019 lamby / arton
+ * ext/rjb.c
+	RJB_VERSION -> 1.5.9
+ * ext/depend.erb
+	it set javah line by ERB
+ * ext/extconf.rb
+	change javah to javac -h if it does not exist
+ * ext/depend
+	replaced by depend.erb
+Thu Jan 17 2019 arton
+ * ext/rjbexception.c
+	restore method_missing for the exception class
+ * ext/rjb.c
+	RJB_VERSION -> 1.5.8
+ * test/test.rb
+	add #60 test
 Fri Dec 28 2018 arton
  * ext/rjbexception.c
 	fix #60; stable java derived exception class for raise

data/ext/{depend → depend.erb}

@@ -3,7 +3,7 @@ rjb.o : rjb.c jp_co_infoseek_hp_arton_rjb_RBridge.h riconv.h rjb.h
 rjbexception.o : rjbexception.c jp_co_infoseek_hp_arton_rjb_RBridge.h riconv.h rjb.h
 load.o : load.c jp_co_infoseek_hp_arton_rjb_RBridge.h
 jp_co_infoseek_hp_arton_rjb_RBridge.h : jniwrap.h ../data/rjb/jp/co/infoseek/hp/arton/rjb/RBridge.class
-	javah -classpath ../data/rjb jp.co.infoseek.hp.arton.rjb.RBridge
+	<%= javah %>
 ../data/rjb/jp/co/infoseek/hp/arton/rjb/RBridge.class : RBridge.java
 	mkdir -p ../data/rjb/jp/co/infoseek/hp/arton/rjb
 	javac -d ../data/rjb RBridge.java

data/ext/extconf.h

@@ -4,5 +4,5 @@
 #define HAVE_NL_LANGINFO 1
 #define HAVE_SETLOCALE 1
 #define HAVE_GETENV 1
-#define RJB_RUBY_VERSION_CODE 260
+#define RJB_RUBY_VERSION_CODE 271
 #endif

data/ext/extconf.rb

@@ -4,6 +4,7 @@
 # $Date: $
 #----------------------------------
 require 'mkmf'
+require 'erb'
 
 class Path
 
@@ -74,4 +75,13 @@ when /mswin32/
 when /cygwin/, /mingw/
   $defs << '-DNONAMELESSUNION'
 end
+
+if find_executable('javah')
+  javah = 'javah -classpath ../data/rjb jp.co.infoseek.hp.arton.rjb.RBridge'
+else
+  javah = 'javac -h . -classpath ../data/rjb RBridge.java'
+end
+File.open('depend', 'w') do |fout|
+  fout.write ERB.new(IO::read('depend.erb')).result
+end
 create_rjb_makefile

data/ext/load.c

@@ -1,6 +1,6 @@
 /*
  * Rjb - Ruby <-> Java Bridge
- * Copyright(c) 2004,2005,2006,2009,2010,2011 arton
+ * Copyright(c) 2004,2005,2006,2009,2010,2011,2020 arton
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public
@@ -38,9 +38,11 @@
 #if defined(_WIN32) || defined(__CYGWIN__)
  #if defined(__CYGWIN__)
   #define JVMDLL "%s/jre/bin/%s/jvm.dll"
+  #define OPENJDK_JVMDLL "%s/bin/%s/jvm.dll"
   #define DIRSEPARATOR '/'
  #else
   #define JVMDLL "%s\\jre\\bin\\%s\\jvm.dll"
+  #define OPENJDK_JVMDLL "%s\\bin\\%s\\jvm.dll"
   #define DIRSEPARATOR '\\'
   #if defined(_WIN64)
     #undef JVM_TYPE
@@ -61,6 +63,7 @@
   #define JVM_TYPE "j9vm"
 #elif defined(__hpux)
   #define JVMDLL "%s/jre/lib/%s/%s/libjvm.sl"
+  #define OPENJDK_JVMDLL "%s/lib/%s/libjvm.sl"
   #define ARCH "PA_RISC"
   #undef JVM_TYPE
   #define JVM_TYPE "server"
@@ -88,6 +91,7 @@
   #include <sys/systeminfo.h>
  #endif
  #define JVMDLL "%s/jre/lib/%s/%s/libjvm.so"
+ #define OPENJDK_JVMDLL "%s/lib/%s/libjvm.so"
  #define DIRSEPARATOR '/'
  #define CLASSPATH_SEP ':'
 #endif
@@ -123,12 +127,20 @@ static int open_jvm(char* libpath)
     size_t i;
     int state;
 
+    if (rb_funcall(rb_cFile, rb_intern("exist?"), 1, rb_str_new2(libpath)) == RUBY_Qfalse)
+    {
+        if (RTEST(ruby_verbose))
+        {
+            fprintf(stderr, "Rjb::load try to find but not exist %s\n", libpath);
+        }
+        return 0;
+    }
 #if defined(RUBINIUS)
     i = 1;
 #else
     i = 0;
 #endif
-    for (; i < COUNTOF(DLLibs); i++) 
+    for (; i < COUNTOF(DLLibs); i++)
     {
         state = 0;
         rb_protect(safe_require, rb_str_new2(DLLibs[i]), &state);
@@ -137,7 +149,7 @@ static int open_jvm(char* libpath)
         {
             if (i > 0)
             {
-                rb_raise(rb_eRuntimeError, "Constants DL and Fiddle is not defined.");
+                rb_raise(rb_eRuntimeError, "Constants DL or Fiddle is not defined.");
                 return 0;
             }
         }
@@ -163,8 +175,8 @@ static int open_jvm(char* libpath)
     }
     /* get function pointers of JNI */
 #if RJB_RUBY_VERSION_CODE < 190
-    getdefaultjavavminitargsfunc = rb_funcall(rb_funcall(rb_funcall(jvmdll, rb_intern("[]"), 2, rb_str_new2(GETDEFAULTJVMINITARGS), rb_str_new2("IP")), rb_intern("to_ptr"), 0), rb_intern("to_i"), 0); 
-    createjavavmfunc = rb_funcall(rb_funcall(rb_funcall(jvmdll, rb_intern("[]"), 2, rb_str_new2(CREATEJVM), rb_str_new2("IPPP")), rb_intern("to_ptr"), 0), rb_intern("to_i"), 0); 
+    getdefaultjavavminitargsfunc = rb_funcall(rb_funcall(rb_funcall(jvmdll, rb_intern("[]"), 2, rb_str_new2(GETDEFAULTJVMINITARGS), rb_str_new2("IP")), rb_intern("to_ptr"), 0), rb_intern("to_i"), 0);
+    createjavavmfunc = rb_funcall(rb_funcall(rb_funcall(jvmdll, rb_intern("[]"), 2, rb_str_new2(CREATEJVM), rb_str_new2("IPPP")), rb_intern("to_ptr"), 0), rb_intern("to_i"), 0);
 #else
     getdefaultjavavminitargsfunc = rb_funcall(jvmdll, rb_intern("[]"), 1, rb_str_new2(GETDEFAULTJVMINITARGS));
     createjavavmfunc = rb_funcall(jvmdll, rb_intern("[]"), 1, rb_str_new2(CREATEJVM));
@@ -184,6 +196,7 @@ static int file_exist(const char* dir, const char* file)
 
 /*
  * not completed, only valid under some circumstances.
+ * load priority: OpenJDK -> SunJDK
  */
 static int load_jvm(const char* jvmtype)
 {
@@ -236,26 +249,37 @@ static int load_jvm(const char* jvmtype)
         *(p + strlen(p) - 1) = '\0';
         jh = p;
     }
-#endif    
+#endif
     java_home = ALLOCA_N(char, strlen(jh) + 1);
     strcpy(java_home, jh);
     if (*(java_home + strlen(jh) - 1) == DIRSEPARATOR)
     {
 	*(java_home + strlen(jh) - 1) = '\0';
     }
+#if defined(__APPLE__) && defined(__MACH__)
+    libpath = ALLOCA_N(char, sizeof(JVMDLL) + strlen(java_home) + 1);
+    sprintf(libpath, JVMDLL, java_home);
+    return open_jvm(libpath);
+#else
 #if defined(_WIN32) || defined(__CYGWIN__)
     libpath = ALLOCA_N(char, sizeof(JVMDLL) + strlen(java_home)
 		       + strlen(jvmtype) + 1);
-    sprintf(libpath, JVMDLL, java_home, jvmtype);
-#elif defined(__APPLE__) && defined(__MACH__)
-    libpath = ALLOCA_N(char, sizeof(JVMDLL) + strlen(java_home) + 1);
-    sprintf(libpath, JVMDLL, java_home);
 #else /* not Windows / MAC OS-X */
     libpath = ALLOCA_N(char, sizeof(JVMDLL) + strlen(java_home)
-		       + strlen(ARCH) + strlen(jvmtype) + 1);
+                       + strlen(ARCH) + strlen(jvmtype) + 1);
+#endif
+    sprintf(libpath, OPENJDK_JVMDLL, java_home, jvmtype);
+    if (open_jvm(libpath))
+    {
+        return 1;
+    }
+#if defined(_WIN32) || defined(__CYGWIN__)
+    return 0;
+#else /* not Windows / MAC OS-X */
     sprintf(libpath, JVMDLL, java_home, ARCH, jvmtype);
 #endif
     return open_jvm(libpath);
+#endif /* __APPLE__ and __MACH */
 }
 
 static int load_bridge(JNIEnv* jenv)
@@ -269,7 +293,7 @@ static int load_bridge(JNIEnv* jenv)
     VALUE v = rb_const_get(rb_cObject, rb_intern("RjbConf"));
     v = rb_const_get(v, rb_intern("BRIDGE_FILE"));
 #else
-    VALUE v = rb_const_get_at(rb_const_get(rb_cObject, rb_intern("RjbConf")), 
+    VALUE v = rb_const_get_at(rb_const_get(rb_cObject, rb_intern("RjbConf")),
 			      rb_intern("BRIDGE_FILE"));
 #endif
     bridge = StringValuePtr(v);
@@ -352,7 +376,7 @@ int rjb_create_jvm(JNIEnv** pjenv, JavaVMInitArgs* vm_args, char* userpath, VALU
             *(p + strlen(p) - 1) = '\0';
             libjvm = p;
         }
-#endif    
+#endif
         if (libjvm == NULL || !open_jvm(libjvm))
         {
 #if defined(__APPLE__) && defined(__MACH__)
@@ -370,7 +394,7 @@ int rjb_create_jvm(JNIEnv** pjenv, JavaVMInitArgs* vm_args, char* userpath, VALU
             }
 #endif
         }
- 
+
 #if RJB_RUBY_VERSION_CODE < 190 && !defined(RUBINIUS)
         ruby_errinfo = Qnil;
 #else

data/ext/riconv.c

@@ -167,6 +167,126 @@ static void check_kcode()
         objIconvR2J = objIconvJ2R = Qnil;
     }
 }
+#else
+VALUE cEncoding = Qnil;
+VALUE encoding_utf8 = Qnil;
+static void init_encoding_vars()
+{
+    cEncoding = rb_const_get(rb_cObject, rb_intern("Encoding"));
+    encoding_utf8 = rb_const_get(cEncoding, rb_intern("UTF_8"));
+}
+static int contains_surrogate_pair(const unsigned char* p)
+{
+    while (*p)
+    {
+        switch (*p & 0xf0)
+        {
+        case 0xf0:
+            return 1;
+        case 0xe0:
+            p += 3;
+            break;
+        default:
+            p += (*p & 0x80) ? 2 : 1;
+        }
+    }
+    return 0;
+}
+static int contains_auxchar(const unsigned char* p)
+{
+    while (*p)
+    {
+      if (*p == 0xed)
+        {
+#if defined(DEBUG)
+          printf("find %02x %02x %02x %02x %02x %02x\n", *p, *(p + 1), *(p + 2), *(p + 3), *(p + 4), *(p + 5));
+#endif
+          return 1;
+        }
+        switch (*p & 0xe0)
+        {
+        case 0xe0:
+            p++;
+        case 0xc0:
+            p++;
+        default:
+            p++;
+        }
+    }
+    return 0;
+}
+
+static VALUE encode_to_cesu8(const unsigned char* p)
+{
+    size_t len = strlen(p);
+    char* newstr = ALLOCA_N(char, len + (len + 1) / 2);
+    char* dest = newstr;
+    int sval, i;
+    while (*p)
+    {
+        switch (*p & 0xf0)
+        {
+        case 0xf0:
+            sval = *p++ & 7;
+            for (i = 0; i < 3; i++)
+            {
+                sval <<= 6;
+                sval |= (*p++ & 0x3f);
+            }
+            *dest++ = '\xed';
+            *dest++ = 0xa0 | (((sval >> 16) - 1) & 0x0f);
+            *dest++ = 0x80 | ((sval >> 10) & 0x3f);
+            *dest++ = '\xed';
+            *dest++ = 0xb0 | ((sval >> 6) & 0x0f);
+            *dest++ = 0x80 | (sval & 0x3f);
+            break;
+        case 0xe0:
+            *dest++ = *p++;
+        case 0xc0:
+        case 0xc1:          
+            *dest++ = *p++;
+        default:
+            *dest++ = *p++;
+        }
+    }
+    return rb_str_new(newstr, dest - newstr);
+}
+static VALUE encode_to_utf8(const unsigned char* p)
+{
+    size_t len = strlen(p);
+    char* newstr = ALLOCA_N(char, len);
+    char* dest = newstr;
+    int sval, i;
+    while (*p)
+    {
+        if (*p == 0xed)
+        {
+            char v = *(p + 1);
+            char w = *(p + 2);
+            char y = *(p + 4);
+            char z = *(p + 5);
+            p += 6;
+            sval = 0x10000 + ((v & 0x0f) << 16) + ((w & 0x3f) << 10) + ((y & 0x0f) << 6) + (z & 0x3f);
+            sval = (((v + 1) & 0x0f) << 16) + ((w & 0x3f) << 10) + ((y & 0x0f) << 6) + (z & 0x3f);
+           *dest++ = 0xf0 | ((sval >> 18));
+           *dest++ = 0x80 | ((sval >> 12) & 0x3f);
+           *dest++ = 0x80 | ((sval >> 6) & 0x3f);
+           *dest++ = 0x80 | (sval & 0x3f);
+           continue;
+        }
+        switch (*p & 0xe0)
+        {
+        case 0xe0:
+            *dest++ = *p++;          
+        case 0xc0:
+        case 0xc1:          
+            *dest++ = *p++;                    
+        default:
+            *dest++ = *p++;                   
+        }
+    }
+    return rb_str_new(newstr, dest - newstr);
+}
 #endif
 
 #if defined(DEBUG)
@@ -177,6 +297,8 @@ static void debug_out(VALUE v)
            strlen(p), p);
     fflush(stdout);
 }
+#else
+#define debug_out(n)
 #endif
 
 VALUE exticonv_local_to_utf8(VALUE local_string)
@@ -192,23 +314,24 @@ VALUE exticonv_local_to_utf8(VALUE local_string)
         return local_string;
     }
 #else
-    VALUE cEncoding, encoding, utf8;
-    cEncoding = rb_const_get(rb_cObject, rb_intern("Encoding"));
+    VALUE encoding;
+    if (NIL_P(cEncoding))
+    {
+      init_encoding_vars();
+    }
     encoding = rb_funcall(local_string, rb_intern("encoding"), 0);
-    utf8 = rb_const_get(cEncoding, rb_intern("UTF_8"));
-    if (encoding != utf8)
+    if (encoding != encoding_utf8)
     {
-        VALUE ret = rb_funcall(local_string, rb_intern("encode"), 2, utf8, encoding);
-#if defined(DEBUG)
+        VALUE ret = rb_funcall(local_string, rb_intern("encode"), 2, encoding_utf8, encoding);
         debug_out(local_string);
         debug_out(ret);
-#endif        
-        return ret;
+        local_string = ret;
     }
-    else
+    if (contains_surrogate_pair(StringValuePtr(local_string)))
     {
-	return local_string;
+        local_string = encode_to_cesu8(StringValuePtr(local_string));
     }
+    return local_string;
 #endif
 }
 
@@ -225,6 +348,14 @@ VALUE exticonv_utf8_to_local(VALUE utf8_string)
         return utf8_string;
     }
 #else
-    return rb_funcall(utf8_string, rb_intern("force_encoding"), 1, rb_const_get(rb_cEncoding, rb_intern("UTF_8")));
+    if (NIL_P(cEncoding))
+    {
+        init_encoding_vars();
+    }
+    if (contains_auxchar(StringValuePtr(utf8_string)))
+    {
+        utf8_string = encode_to_utf8(StringValuePtr(utf8_string));
+    }
+    return rb_funcall(utf8_string, rb_intern("force_encoding"), 1, encoding_utf8);
 #endif
 }

data/ext/rjb.c

@@ -14,7 +14,7 @@
  *
  */
 
-#define RJB_VERSION "1.5.7"
+#define RJB_VERSION "1.6.2"
 
 #include "ruby.h"
 #include "extconf.h"
@@ -102,7 +102,7 @@ static VALUE primitive_conversion = Qfalse;
 /*
  * Object cache, never destroyed
  */
-/* method */ 
+/* method */
 static jmethodID method_getModifiers;
 static jmethodID method_getName;
 static jmethodID getParameterTypes;
@@ -229,7 +229,7 @@ static VALUE jstring2val(JNIEnv* jenv, jstring s)
     const char* p;
     VALUE v;
 
-    if (s == NULL) 
+    if (s == NULL)
     {
         return Qnil;
     }
@@ -317,7 +317,7 @@ static VALUE jv2rv_r(JNIEnv* jenv, jvalue val)
     Data_Get_Struct(v, struct jv_data, ptr);
     v = register_instance(jenv, v, (struct jv_data*)ptr, val.l);
     (*jenv)->DeleteLocalRef(jenv, klass);
-    (*jenv)->DeleteLocalRef(jenv, val.l);    
+    (*jenv)->DeleteLocalRef(jenv, val.l);
     return v;
 }
 
@@ -357,7 +357,7 @@ static VALUE jfloat2rv(JNIEnv* jenv, jvalue val)
 
 static VALUE jint2rv(JNIEnv* jenv, jvalue val)
 {
-    return INT2NUM(val.i);    
+    return INT2NUM(val.i);
 }
 
 static VALUE jlong2rv(JNIEnv* jenv, jvalue val)
@@ -393,13 +393,13 @@ static VALUE ja2r(J2R conv, JNIEnv* jenv, jvalue val, int depth)
     VALUE v;
     int i;
     if (!val.l) return Qnil;
-    if (depth == 1) 
+    if (depth == 1)
     {
         return conv(jenv, val);
     }
     len = (*jenv)->GetArrayLength(jenv, val.l);
     v = rb_ary_new2(len);
-    for (i = 0; i < len; i++) 
+    for (i = 0; i < len; i++)
     {
 	jvalue wrap;
 	wrap.l = (*jenv)->GetObjectArrayElement(jenv, val.l, i);
@@ -454,7 +454,7 @@ static VALUE la2rv(JNIEnv* jenv, void* p)
     return LL2NUM(*(jlong*)p);
 #else
     return LONG2NUM(*(jlong*)p);
-#endif	
+#endif
 }
 
 static VALUE sa2rv(JNIEnv* jenv, void* p)
@@ -498,7 +498,7 @@ static VALUE jbytearray2rv(JNIEnv* jenv, jvalue val)
 static VALUE jchararray2rv(JNIEnv* jenv, jvalue val)
 {
     jchar* p = (*jenv)->GetCharArrayElements(jenv, val.l, NULL);
-    return call_conv(jenv, val, sizeof(jchar), p, ca2rv, 
+    return call_conv(jenv, val, sizeof(jchar), p, ca2rv,
 			offsetof(struct JNINativeInterface_, ReleaseCharArrayElements));
 }
 static VALUE jdoublearray2rv(JNIEnv* jenv, jvalue val)
@@ -557,14 +557,14 @@ static VALUE jbooleanarray2rv(JNIEnv* jenv, jvalue val)
  */
 static jprimitive_table jpcvt[] = {
     { "java/lang/Integer", "intValue", "()I", "(I)V", NULL, 0, 0, jint2rv, },
-    { "java/lang/Long", "longValue", "()J", "(J)V", NULL, 0, 0, jlong2rv, },    
+    { "java/lang/Long", "longValue", "()J", "(J)V", NULL, 0, 0, jlong2rv, },
     { "java/lang/Double", "doubleValue", "()D", "(D)V", NULL, 0, 0, jdouble2rv, },
     { "java/lang/Boolean", "booleanValue", "()Z", "(Z)Ljava/lang/Boolean;",
       NULL, 0, 0, jboolean2rv, },
     { "java/lang/Character", "charValue", "()C", NULL, NULL, 0, 0, jchar2rv, },
     { "java/lang/Short", "intValue", "()I", NULL, NULL, 0, 0, jint2rv, },
     { "java/lang/Byte", "intValue", "()I", NULL, NULL, 0, 0, jint2rv, },
-    { "java/lang/Float", "doubleValue", "()D", NULL, NULL, 0, 0, jdouble2rv, },        
+    { "java/lang/Float", "doubleValue", "()D", NULL, NULL, 0, 0, jdouble2rv, },
 };
 
 /*
@@ -669,7 +669,7 @@ static void rv2jfloat(JNIEnv* jenv, VALUE val, jvalue* jv, const char* psig, int
 static void rv2jint(JNIEnv* jenv, VALUE val, jvalue* jv, const char* psig, int release)
 {
     if (!release)
-	jv->i = NUM2INT(val);    
+	jv->i = NUM2INT(val);
 }
 static void rv2jlong(JNIEnv* jenv, VALUE val, jvalue* jv, const char* psig, int release)
 {
@@ -693,7 +693,7 @@ static void rv2jshort(JNIEnv* jenv, VALUE val, jvalue* jv, const char* psig, int
     if (release) return;
     if (TYPE(val) == T_FIXNUM)
     {
-        int n = FIX2INT(val);    
+        int n = FIX2INT(val);
         if (abs(n) < 0x7fff)
         {
             jv->s = (short)n;
@@ -814,7 +814,7 @@ static void rv2jobject(JNIEnv* jenv, VALUE val, jvalue* jv, const char* psig, in
 		    Data_Get_Struct(val, struct rj_bridge, ptr);
 		    jv->l = ptr->proxy;
 		}
-		else if (CLASS_INHERITED(rjbc, rb_obj_class(val))) 
+		else if (CLASS_INHERITED(rjbc, rb_obj_class(val)))
 		{
 		    struct jv_data* ptr;
 		    Data_Get_Struct(val, struct jv_data, ptr);
@@ -836,13 +836,13 @@ static void rv2jobject(JNIEnv* jenv, VALUE val, jvalue* jv, const char* psig, in
 	    case T_ARRAY:
 		jv->l = r2objarray(jenv, val, "Ljava/lang/Object;");
 		break;
-#if HAVE_LONG_LONG                
+#if HAVE_LONG_LONG
             case T_BIGNUM:
                 arg.j = rb_big2ll(val);
                 jv->l = (*jenv)->NewObject(jenv, jpcvt[PRM_LONG].klass,
 				       jpcvt[PRM_LONG].ctr_id, arg);
                 break;
-#endif                
+#endif
             case T_OBJECT:
             default:
 #if defined(DEBUG)
@@ -860,7 +860,7 @@ static void rv2jobject(JNIEnv* jenv, VALUE val, jvalue* jv, const char* psig, in
     }
     else
     {
-        switch (TYPE(val)) 
+        switch (TYPE(val))
 	{
         case T_STRING:
         case T_FLOAT:
@@ -1287,7 +1287,7 @@ static J2R get_j2r(JNIEnv* jenv, jobject cls, char* psig, char* pdepth, char* pp
     const char* cname;
     const char* jname = NULL;
     jstring nm = (*jenv)->CallObjectMethod(jenv, cls, rjb_class_getName);
-    rjb_check_exception(jenv, 0);	    
+    rjb_check_exception(jenv, 0);
     cname = (*jenv)->GetStringUTFChars(jenv, nm, NULL);
 
     if (*cname == '[')
@@ -1391,7 +1391,7 @@ static void setup_methodbase(JNIEnv* jenv, struct cls_constructor* pm,
 static void register_methodinfo(struct cls_method* newpm, st_table* tbl)
 {
     struct cls_method* pm;
-    
+
     if (st_lookup(tbl, newpm->name, (st_data_t*)&pm))
     {
 	newpm->next = pm->next;
@@ -1434,7 +1434,7 @@ static int make_alias(const char* jname, char* rname)
 static void create_methodinfo(JNIEnv* jenv, st_table* tbl, jobject m, int static_method)
 {
     struct cls_method* result;
-    struct cls_method* pm;    
+    struct cls_method* pm;
     const char* jname;
     int alias;
     jstring nm;
@@ -1450,12 +1450,12 @@ static void create_methodinfo(JNIEnv* jenv, st_table* tbl, jobject m, int static
     rjb_check_exception(jenv, 0);
     setup_methodbase(jenv, &result->basic, parama, param_count);
     nm = (*jenv)->CallObjectMethod(jenv, m, method_getName);
-    rjb_check_exception(jenv, 0);	    
+    rjb_check_exception(jenv, 0);
     jname = (*jenv)->GetStringUTFChars(jenv, nm, NULL);
     rname = ALLOCA_N(char, strlen(jname) * 2 + 8);
     alias = make_alias(jname, rname);
     result->name = rb_intern(jname);
-    rjb_release_string(jenv, nm, jname);    
+    rjb_release_string(jenv, nm, jname);
     result->basic.id = (*jenv)->FromReflectedMethod(jenv, m);
     rjb_check_exception(jenv, 0);
     cls = (*jenv)->CallObjectMethod(jenv, m, getReturnType);
@@ -1470,7 +1470,7 @@ static void create_methodinfo(JNIEnv* jenv, st_table* tbl, jobject m, int static
         && (*rname == 'g' || *rname == 's') && *(rname + 1) == 'e' && *(rname + 2) == 't')
     {
         pm = clone_methodinfo(result);
-        if (*rname == 's') 
+        if (*rname == 's')
         {
             if (result->basic.arg_count == 1)
             {
@@ -1515,7 +1515,7 @@ static void create_fieldinfo(JNIEnv* jenv, st_table* tbl, jobject f, int readonl
     result = ALLOC(struct cls_field);
     memset(result, 0, sizeof(struct cls_field));
     nm = (*jenv)->CallObjectMethod(jenv, f, field_getName);
-    rjb_check_exception(jenv, 0);	    
+    rjb_check_exception(jenv, 0);
     jname = (*jenv)->GetStringUTFChars(jenv, nm, NULL);
     result->name = rb_intern(jname);
     rjb_release_string(jenv, nm, jname);
@@ -1537,7 +1537,7 @@ static void create_fieldinfo(JNIEnv* jenv, st_table* tbl, jobject f, int readonl
 static void setup_constructors(JNIEnv* jenv, struct cls_constructor*** pptr, jobjectArray methods)
 {
     int i;
-    struct cls_constructor* pc;    
+    struct cls_constructor* pc;
     jsize mcount = (*jenv)->GetArrayLength(jenv, methods);
     struct cls_constructor** tbl = ALLOC_N(struct cls_constructor*, mcount + 1);
     *pptr = tbl;
@@ -1557,21 +1557,21 @@ static void setup_constructors(JNIEnv* jenv, struct cls_constructor*** pptr, job
 	pc->id = (*jenv)->FromReflectedMethod(jenv, c);
 	(*jenv)->DeleteLocalRef(jenv, c);
     }
-    tbl[mcount] = NULL;    
+    tbl[mcount] = NULL;
 }
-			       
+
 static void setup_methods(JNIEnv* jenv, st_table** tbl, st_table** static_tbl,
 			  jobjectArray methods)
 {
     int i;
-    jint modifier;    
+    jint modifier;
     jsize mcount = (*jenv)->GetArrayLength(jenv, methods);
     *tbl = st_init_numtable_with_size(mcount);
     *static_tbl = st_init_numtable();
     for (i = 0; i < mcount; i++)
     {
 	jobject m = (*jenv)->GetObjectArrayElement(jenv, methods, i);
-	rjb_check_exception(jenv, 0);	
+	rjb_check_exception(jenv, 0);
 	modifier = (*jenv)->CallIntMethod(jenv, m, method_getModifiers);
 	if (!(modifier & ACC_STATIC))
 	{
@@ -1588,13 +1588,13 @@ static void setup_methods(JNIEnv* jenv, st_table** tbl, st_table** static_tbl,
 static void setup_fields(JNIEnv* jenv, st_table** tbl, jobjectArray flds)
 {
     int i;
-    jint modifier;    
+    jint modifier;
     jsize fcount = (*jenv)->GetArrayLength(jenv, flds);
     *tbl = st_init_numtable_with_size(fcount);
     for (i = 0; i < fcount; i++)
     {
 	jobject f = (*jenv)->GetObjectArrayElement(jenv, flds, i);
-	rjb_check_exception(jenv, 0);	
+	rjb_check_exception(jenv, 0);
 	modifier = (*jenv)->CallIntMethod(jenv, f, field_getModifiers);
 	create_fieldinfo(jenv, *tbl, f, modifier & ACC_FINAL, modifier & ACC_STATIC);
 	(*jenv)->DeleteLocalRef(jenv, f);
@@ -1640,7 +1640,7 @@ static void load_constants(JNIEnv* jenv, jclass klass, VALUE self, jobjectArray
 	    rjb_check_exception(jenv, 0);
 	    jfid = (*jenv)->GetStaticFieldID(jenv, klass, cname, sigs);
 	    rjb_check_exception(jenv, 0);
-	    switch (sig) 
+	    switch (sig)
 	    {
 	    case 'D':
 		jv.d = (*jenv)->GetStaticDoubleField(jenv, klass, jfid);
@@ -1670,14 +1670,14 @@ static void load_constants(JNIEnv* jenv, jclass klass, VALUE self, jobjectArray
 		jv.l = (*jenv)->GetStaticObjectField(jenv, klass, jfid);
 		break;
 	    }
-            pname = (char*)cname; 
+            pname = (char*)cname;
 	    if (!isupper(*cname))
 	    {
  	        pname = ALLOCA_N(char, strlen(cname) + 1);
 		strcpy(pname, cname);
 		*pname = toupper(*pname);
-		if (!isupper(*pname) 
-                    || rb_const_defined(rb_obj_class(self), rb_intern(pname))) 
+		if (!isupper(*pname)
+                    || rb_const_defined(rb_obj_class(self), rb_intern(pname)))
 		{
 	            pname = NULL;
 		}
@@ -1697,7 +1697,7 @@ static void setup_metadata(JNIEnv* jenv, VALUE self, struct jv_data* ptr, VALUE
     jmethodID mid;
     jobjectArray methods;
     jobjectArray flds;
-    
+
     jclass klass = (*jenv)->GetObjectClass(jenv, ptr->idata.obj);
     ptr->idata.klass = (*jenv)->NewGlobalRef(jenv, klass);
     rjb_check_exception(jenv, 0);
@@ -1726,7 +1726,7 @@ static void setup_metadata(JNIEnv* jenv, VALUE self, struct jv_data* ptr, VALUE
  * def load(class_path = '', vmargs = [])
  * class_path: passes for the class dir and jar name
  * vmargs: strng array of vmarg (such as -Xrs)
- * 
+ *
  * change in rjb 0.1.7, omit first argument for JNI version.
  *  because I misunderstood the number means (JVM but JNI).
  */
@@ -1769,7 +1769,7 @@ static VALUE rjb_s_load(int argc, VALUE* argv, VALUE self)
         rb_funcall(user_path, stradd, 1, rb_ary_entry(classpath, 0));
     }
     userpath = StringValueCStr(user_path);
-    
+
     if (!NIL_P(vm_argv))
     {
         Check_Type(vm_argv, T_ARRAY);
@@ -1792,31 +1792,31 @@ static VALUE rjb_s_load(int argc, VALUE* argv, VALUE self)
     RJB_LOAD_METHOD(getParameterTypes, jmethod, "getParameterTypes", "()[Ljava/lang/Class;");
     RJB_LOAD_METHOD(getReturnType, jmethod, "getReturnType", "()Ljava/lang/Class;");
     rjb_check_exception(jenv, 1);
-    
+
     RJB_FIND_CLASS(jfield, "java/lang/reflect/Field");
     RJB_LOAD_METHOD(field_getModifiers, jfield, "getModifiers", "()I");
     RJB_LOAD_METHOD(field_getName, jfield, "getName", "()Ljava/lang/String;");
     RJB_LOAD_METHOD(field_getType, jfield, "getType", "()Ljava/lang/Class;");
     rjb_check_exception(jenv, 1);
-    
+
     RJB_HOLD_CLASS(j_class, "java/lang/Class");
     RJB_LOAD_METHOD(rjb_class_getName, j_class, "getName", "()Ljava/lang/String;");
     rjb_check_exception(jenv, 1);
-    
+
     RJB_HOLD_CLASS(rjb_j_throwable, "java/lang/Throwable");
     RJB_LOAD_METHOD(rjb_throwable_getMessage, rjb_j_throwable, "getMessage", "()Ljava/lang/String;");
-    rjb_check_exception(jenv, 1);    
+    rjb_check_exception(jenv, 1);
 
     RJB_HOLD_CLASS(j_string, "java/lang/String");
     RJB_LOAD_METHOD(str_tostring, j_string, "toString", "()Ljava/lang/String;");
-    rjb_check_exception(jenv, 1);    
+    rjb_check_exception(jenv, 1);
 
     RJB_HOLD_CLASS(j_object, "java/lang/Object");
-    rjb_check_exception(jenv, 1);    
+    rjb_check_exception(jenv, 1);
 
     RJB_HOLD_CLASS(j_url, "java/net/URL");
     RJB_LOAD_METHOD(url_new, j_url, "<init>", "(Ljava/lang/String;)V");
-    rjb_check_exception(jenv, 1);    
+    rjb_check_exception(jenv, 1);
 
     for (i = PRM_INT; i < PRM_LAST; i++)
     {
@@ -1840,7 +1840,7 @@ static VALUE rjb_s_load(int argc, VALUE* argv, VALUE self)
     rb_define_method(rb_singleton_class(jklass), "forName", rjb_class_forname, -1);
     rb_define_alias(rb_singleton_class(jklass), "for_name", "forName");
     rb_gc_register_address(&jklass);
-    
+
     return Qnil;
 }
 
@@ -1874,7 +1874,7 @@ jobject get_systemloader(JNIEnv* jenv)
         RJB_HOLD_CLASS(j_classloader, "java/lang/ClassLoader");
         RJB_LOAD_STATIC_METHOD(get_system_classloader, j_classloader,
                            "getSystemClassLoader", "()Ljava/lang/ClassLoader;");
-        rjb_check_exception(jenv, 1);    
+        rjb_check_exception(jenv, 1);
     }
     return (*jenv)->CallStaticObjectMethod(jenv, j_classloader, get_system_classloader);
 }
@@ -1908,7 +1908,7 @@ static VALUE rjb_s_unload(int argc, VALUE* argv, VALUE self)
     st_foreach(RHASH(rjb_loaded_classes)->tbl, clear_classes, 0);
 #endif
 #endif
-    
+
     if (rjb_jvm)
     {
         JNIEnv* jenv = rjb_attach_current_thread();
@@ -1990,10 +1990,10 @@ static VALUE rjb_delete_ref(struct jvi_data* ptr)
  */
 static VALUE rj_bridge_free(struct rj_bridge* ptr)
 {
-    JNIEnv* jenv = rjb_attach_current_thread();    
+    JNIEnv* jenv = rjb_attach_current_thread();
     if (jenv)
     {
-        (*jenv)->DeleteLocalRef(jenv, ptr->proxy);    
+        (*jenv)->DeleteLocalRef(jenv, ptr->proxy);
         (*jenv)->DeleteLocalRef(jenv, ptr->bridge);
     }
     return Qnil;
@@ -2015,7 +2015,7 @@ static VALUE rjb_s_free(struct jv_data* ptr)
     /* class never delete
     JNIEnv* jenv = rjb_attach_current_thread();
     struct cls_constructor** c;
-    
+
     rjb_delete_ref(&ptr->idata);
     if (ptr->constructors)
     {
@@ -2030,7 +2030,7 @@ static VALUE rjb_s_free(struct jv_data* ptr)
 	st_foreach(ptr->idata.methods, (int(*)())free_method_item, 0);
 	st_free_table(ptr->idata.methods);
     }
-    (*jenv)->DeleteGlobalRef(jenv, ptr->idata.klass);	
+    (*jenv)->DeleteGlobalRef(jenv, ptr->idata.klass);
     st_delete(RHASH(rjb_loaded_classes)->tbl, clsname, NULL);
     */
     return Qnil;
@@ -2049,7 +2049,7 @@ static VALUE createinstance(JNIEnv* jenv, int argc, VALUE* argv,
     struct jv_data* jklass;
     struct jvi_data* org;
     jvalue* args = (argc) ? ALLOCA_N(jvalue, argc) : NULL;
-    
+
     Data_Get_Struct(self, struct jv_data, jklass);
     org = &jklass->idata;
 
@@ -2087,7 +2087,7 @@ static VALUE import_class(JNIEnv* jenv, jclass jcls, VALUE clsname)
     char* nm = ALLOCA_N(char, strlen(pclsname) + 1);
     strcpy(nm, pclsname);
     *nm = toupper(*nm);
-    for (pclsname = nm; *pclsname; pclsname++) 
+    for (pclsname = nm; *pclsname; pclsname++)
     {
         if (*pclsname == '.')
 	{
@@ -2116,7 +2116,7 @@ static VALUE rjb_a_missing(int argc, VALUE* argv, VALUE self)
 
 static VALUE rjb_i_prepare_proxy(VALUE self)
 {
-    return rb_funcall(self, rb_intern("instance_eval"), 1, 
+    return rb_funcall(self, rb_intern("instance_eval"), 1,
                       rb_str_new2("instance_eval(&" USER_INITIALIZE ")"));
 }
 
@@ -2175,7 +2175,7 @@ static int check_rtype(JNIEnv* jenv, VALUE* pv, char* p)
         if (strchr("IJ", *p)) return SOSO;
         return strchr("BCDFS", *p) != NULL;
     case T_BIGNUM:
-        return strchr("BCDFIJS", *p) != NULL;        
+        return strchr("BCDFIJS", *p) != NULL;
     case T_FLOAT:
         if (*p == 'D') return SOSO;
         if (*p == 'F') return SATISFIED;
@@ -2298,7 +2298,7 @@ static VALUE rjb_newinstance(int argc, VALUE* argv, VALUE self)
     int weight = 0;
     int cweight;
     JNIEnv* jenv = rjb_prelude();
-    
+
     Data_Get_Struct(self, struct jv_data, ptr);
 
     if (ptr->constructors)
@@ -2378,7 +2378,7 @@ jclass rjb_find_class(JNIEnv* jenv, VALUE name)
 {
     char* cname;
     char* jnicls;
-    
+
     Check_Type(name, T_STRING);
     cname = StringValueCStr(name);
     jnicls = ALLOCA_N(char, strlen(cname) + 1);
@@ -2455,8 +2455,8 @@ static VALUE rjb_s_bind(VALUE self, VALUE rbobj, VALUE itfname)
     VALUE result = Qnil;
     jclass itf;
     JNIEnv* jenv = rjb_prelude();
-    
-    itf = rjb_find_class(jenv, itfname); 
+
+    itf = rjb_find_class(jenv, itfname);
     rjb_check_exception(jenv, 1);
     if (itf)
     {
@@ -2582,7 +2582,7 @@ static jobject conv_jarname_to_url(JNIEnv* jenv, VALUE jarname)
 #if defined(DOSISH)
         if (strlen(jarp) > 1 && jarp[1] == ':')
         {
-            sprintf(urlp, "file:///%s", jarp);            
+            sprintf(urlp, "file:///%s", jarp);
         }
         else
 #endif
@@ -2604,7 +2604,7 @@ static jobject conv_jarname_to_url(JNIEnv* jenv, VALUE jarname)
     }
 #endif
     arg.l = (*jenv)->NewStringUTF(jenv, urlp);
-    rjb_check_exception(jenv, 0);        
+    rjb_check_exception(jenv, 0);
     url = (*jenv)->NewObject(jenv, j_url, url_new, arg);
     rjb_check_exception(jenv, 0);
     return url;
@@ -2657,7 +2657,7 @@ static VALUE rjb_s_add_jar(VALUE self, VALUE jarname)
     if (!url_loader)
     {
         args[0].l = (*jenv)->NewObjectArray(jenv, (jsize)((count == 0) ? 1 : count), j_url, NULL);
-        rjb_check_exception(jenv, 0);    
+        rjb_check_exception(jenv, 0);
         if (!count)
         {
             (*jenv)->SetObjectArrayElement(jenv, args[0].l, 0,
@@ -2732,7 +2732,7 @@ static VALUE rjb_i_class(VALUE self)
 static VALUE getter(JNIEnv* jenv, struct cls_field* pf,  struct jvi_data* ptr)
 {
     jvalue jv;
-    switch (pf->result_signature) 
+    switch (pf->result_signature)
     {
     case 'D':
         if (pf->static_field)
@@ -2839,7 +2839,7 @@ static void setter(JNIEnv* jenv, struct cls_field* pf,  struct jvi_data* ptr, VA
 {
     jvalue jv;
     pf->arg_convert(jenv, val, &jv, pf->field_signature, 0);
-    switch (*pf->field_signature) 
+    switch (*pf->field_signature)
     {
     case 'D':
         if (pf->static_field)
@@ -2960,7 +2960,7 @@ static VALUE invoke(JNIEnv* jenv, struct cls_method* pm, struct jvi_data* ptr,
         found = 0;
         if (argc == pm->basic.arg_count)
         {
-            if (sig && pm->basic.method_signature) 
+            if (sig && pm->basic.method_signature)
             {
                 if (!strcmp(sig, pm->basic.method_signature))
                 {
@@ -2999,7 +2999,7 @@ static VALUE invoke(JNIEnv* jenv, struct cls_method* pm, struct jvi_data* ptr,
     if (!prefer_pm)
     {
 	const char* tname = rb_id2name(orgpm->name);
-	if (sig) 
+	if (sig)
 	{
 	    rb_raise(rb_eRuntimeError, "Fail: unknown method name `%s(\'%s\')'", tname, sig);
 	}
@@ -3092,7 +3092,7 @@ static VALUE invoke_by_instance(ID rmid, int argc, VALUE* argv,
     {
         ret = getter(jenv, pf, ptr);
     }
-    else 
+    else
     {
         if (argc == 1 && *(tname + strlen(tname) - 1) == '=')
         {
@@ -3154,7 +3154,7 @@ static VALUE rjb_i_missing(int argc, VALUE* argv, VALUE self)
     ID rmid = rb_to_id(argv[0]);
 
     Data_Get_Struct(self, struct jvi_data, ptr);
-    
+
     return invoke_by_instance(rmid, argc -1, argv + 1, ptr, NULL);
 }
 
@@ -3217,7 +3217,7 @@ static VALUE invoke_by_class(ID rmid, int argc, VALUE* argv,
 	    rb_raise(rb_eRuntimeError, "Fail: unknown method name `%s'", tname);
 	}
     }
-    
+
     return ret;
 }
 
@@ -3259,7 +3259,7 @@ static VALUE rjb_missing(int argc, VALUE* argv, VALUE self)
 	    return r;
 	}
     }
-    
+
     Data_Get_Struct(self, struct jv_data, ptr);
     return invoke_by_class(rmid, argc - 1, argv + 1, ptr, NULL);
 }
@@ -3293,7 +3293,7 @@ void Init_rjbcore()
   #else
     rb_protect((VALUE(*)(VALUE))rb_require, (VALUE)"iconv", NULL);
   #endif
-#endif    
+#endif
     rjb_loaded_classes = rb_hash_new();
 #ifndef RUBINIUS
     OBJ_FREEZE(rjb_loaded_classes);
@@ -3323,7 +3323,7 @@ void Init_rjbcore()
     rb_define_class_variable(rjb, "@@classpath", rb_ary_new());
     cvar_classpath = rb_intern("@@classpath");
 
-    /* Java class object */    
+    /* Java class object */
     rjbc = CLASS_NEW(rb_cObject, "Rjb_JavaClass");
     rb_gc_register_address(&rjbc);
     rb_define_method(rjbc, "method_missing", rjb_missing, -1);
@@ -3334,7 +3334,7 @@ void Init_rjbcore()
     /* Java instance object */
     rjbi = CLASS_NEW(rb_cObject, "Rjb_JavaProxy");
     rb_gc_register_address(&rjbi);
-    rb_define_method(rjbi, "method_missing", rjb_i_missing, -1);    
+    rb_define_method(rjbi, "method_missing", rjb_i_missing, -1);
     rb_define_method(rjbi, "_invoke", rjb_i_invoke, -1);
     rb_define_method(rjbi, "_classname", rjb_i_class, 0);
     rb_define_method(rjbi, "_prepare_proxy", rjb_i_prepare_proxy, 0);

data/ext/rjbexception.c

@@ -26,11 +26,37 @@
 #include "riconv.h"
 #include "rjb.h"
 
+static VALUE missing_delegate(int argc, VALUE* argv, VALUE self)
+{
+    ID rmid = rb_to_id(argv[0]);
+    return rb_funcallv(rb_ivar_get(self, rb_intern("@cause")), rmid, argc - 1, argv + 1);
+}
+
 static VALUE get_cause(VALUE self)
 {
     return rb_funcall(rb_ivar_get(self, rb_intern("@cause")), rb_intern("cause"), 0);
 }
 
+static VALUE ex_respond_to(int argc, VALUE* argv, VALUE self)
+{
+    if (argc < 1 || argc > 2)
+    {
+        rb_raise(rb_eArgError, "respond_to? require 1 or 2 arguments");
+    }
+    if (rb_to_id(argv[0]) == rb_intern("to_str"))
+    {
+        return  Qfalse;
+    }
+    else  if (rb_to_id(argv[0]) == rb_intern("exception"))
+    {
+        return Qtrue;
+    }
+    else
+    {
+        return rb_funcallv(rb_ivar_get(self, rb_intern("@cause")), rb_intern("respond_to?"), argc, argv);
+    }
+}
+
 /*
  * handle Java exception
  *  At this time, the Java exception is defined without the package name.
@@ -60,6 +86,8 @@ VALUE rjb_get_exception_class(JNIEnv* jenv, jstring str)
     {
         rexp = rb_define_class(pcls, rb_eStandardError);
         rb_define_method(rexp, "cause", get_cause, 0);
+        rb_define_method(rexp, "method_missing", missing_delegate, -1);
+        rb_define_method(rexp, "respond_to?", ex_respond_to, -1);
 #if defined(HAVE_RB_HASH_ASET) || defined(RUBINIUS)
 	rb_hash_aset(rjb_loaded_classes, cname, rexp);
 #else
@@ -69,7 +97,7 @@ VALUE rjb_get_exception_class(JNIEnv* jenv, jstring str)
         st_insert(RHASH(rjb_loaded_classes)->tbl, cname, rexp);
   #endif
 #endif
-	
+
     }
     return rexp;
 }
@@ -81,7 +109,7 @@ VALUE rjb_s_throw(int argc, VALUE* argv, VALUE self)
 {
     VALUE klass;
     VALUE message;
-    JNIEnv* jenv = NULL; 
+    JNIEnv* jenv = NULL;
 
     rjb_load_vm_default();
 

data/lib/rjb.rb

@@ -1,5 +1,5 @@
 =begin
-  Copyright(c) 2006-2010,2012 arton
+  Copyright(c) 2006-2010,2012,2020 arton
 =end
 
 require 'rbconfig'
@@ -86,7 +86,7 @@ module Rjb
       (org + klass.getMethods.select do |m|
          blk.call(m)
       end.map do |m|
-        m.name
+        m.name.to_sym
       end).uniq
     end
     def format_sigs(s)
@@ -98,6 +98,19 @@ module Rjb
         "[#{s.map{|m|m.nil? ? 'void' : m}.join(', ')}]"
       end
     end
+    def make_snake(nm)
+      nm.gsub(/(.)([A-Z])/) { "#{$1}_#{$2.downcase}" }
+    end
+    alias :rjb_org_respond_to? :respond_to?
+    def rjb_respond_to?(sym, klass, priv)
+      return true if (klass ? self : getClass).getMethods.select do |m|
+        (klass && !instance_method?(m) && (priv || public_method?(m))) ||
+          (!klass && instance_method?(m) && (priv || public_method?(m)))
+      end.map do |m|
+        [m.name.to_sym, make_snake(m.name).to_sym]
+      end.flatten.include?(sym.to_sym)
+      rjb_org_respond_to?(sym, priv)
+    end
   end
 
   class Rjb_JavaClass
@@ -119,6 +132,9 @@ module Rjb
         "#{m}(#{format_sigs(self.static_sigs(m))})"
       end
     end
+    def respond_to?(sym, priv = false)
+      rjb_respond_to?(sym, true, priv)
+    end
   end
   class Rjb_JavaProxy
     include JMethod
@@ -141,6 +157,9 @@ module Rjb
         "#{m}(#{format_sigs(getClass.sigs(m))})"
       end
     end
+    def respond_to?(sym, priv = false)
+      rjb_respond_to?(sym, false, priv)
+    end
   end
   class Rjb_JavaBridge
     def method_missing(name, *args)

data/test/test.rb

@@ -216,17 +216,28 @@ class TestRjb < Test::Unit::TestCase
   end
 
   def test_combination_charcters
-    teststr = "\xc7\x96\xc3\xbc\xcc\x84\x75\xcc\x88\xcc\x84\xed\xa1\xa9\xed\xba\xb2\xe3\x81\x8b\xe3\x82\x9a"
+    teststr = "\xc7\x96\xc3\xbc\xcc\x84\x75\xcc\x88\xcc\x84𪚲\xe3\x81\x8b\xe3\x82\x9a"
     test = import('jp.co.infoseek.hp.arton.rjb.Test').new
     s = test.getUmlaut()
     if Object::const_defined?(:Encoding) #>=1.9
-      teststr = teststr.force_encoding(Encoding::UTF_8)
-      assert_equal(s, teststr)
+=begin
+      n = [teststr.bytes.length, s.bytes.length].max
+      puts "org:#{teststr.bytes.length}, ret:#{s.bytes.length}"
+      0.upto(n - 1) do |i|
+        b0 = teststr.getbyte(i)
+        b0 = 0 unless b0
+        b1 = s.getbyte(i)
+        b1 = 0 unless b1
+        puts sprintf("%02X - %02X\n", b0, b1)
+      end
+=end
+      assert_equal(teststr.bytes.length, s.bytes.length)
+      assert_equal(teststr, s)
     else
       default_kcode = $KCODE
       begin
 	$KCODE = "utf8"
-	assert_equal(s, teststr)
+	assert_equal(teststr, s)
       ensure
 	$KCODE = default_kcode
       end
@@ -715,19 +726,19 @@ class TestRjb < Test::Unit::TestCase
   end
   def test_methods_extension
     m = @jString.new('').methods
-    assert m.include?('indexOf')
+    assert m.include?(:indexOf)
   end
   def test_class_methods_extension
     m = @jString.methods
-    assert m.include?('format')
+    assert m.include?(:format)
   end
   def test_pmethods_extension
     m = @jString.new('').public_methods
-    assert m.include?('indexOf')
+    assert m.include?(:indexOf)
   end
   def test_class_pmethods_extension
     m = @jString.public_methods
-    assert m.include?('format')
+    assert m.include?(:format)
   end
   def test_java_methods
     indexof = @jString.new('').java_methods.find do |m|
@@ -933,5 +944,36 @@ class TestRjb < Test::Unit::TestCase
     assert_equal org.size, len
     assert_equal org, buffer[0...len]
   end
-end
 
+  def test_re_raise
+    begin
+      @jInteger.parseInt('blabla')
+      flunk('no exception')
+    rescue NumberFormatException => e
+      begin
+        raise
+      rescue => e
+        assert_equal(NumberFormatException, e.class)
+        # OK
+      end
+    end
+  end
+
+  def test_java_utf8
+    y = @jString.new('𠮷野家')
+    assert_equal '𠮷野家', y.toString
+  end
+
+  def test_respond_to
+    str = @jString.new('blabla')
+    assert str.respond_to? :substring
+    assert_false str.respond_to? :unknown_method
+    begin
+      @jInteger.parseInt('blabla')
+    rescue => e
+      assert e.respond_to? :print_stack_trace
+      assert e.respond_to? :printStackTrace
+      assert_false e.respond_to? :unknown_method
+    end
+  end
+end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: rjb
 version: !ruby/object:Gem::Version
-  version: 1.5.7
+  version: 1.6.2
 platform: ruby
 authors:
 - arton
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2018-12-27 00:00:00.000000000 Z
+date: 2020-08-01 00:00:00.000000000 Z
 dependencies: []
 description: 'RJB is a bridge program that connect between Ruby and Java with Java
   Native Interface.
@@ -24,7 +24,7 @@ files:
 - ChangeLog
 - data/rjb/jp/co/infoseek/hp/arton/rjb/RBridge.class
 - ext/RBridge.java
-- ext/depend
+- ext/depend.erb
 - ext/extconf.h
 - ext/extconf.rb
 - ext/jniwrap.h
@@ -74,7 +74,7 @@ files:
 - test/x.rb
 homepage: https://www.artonx.org/collabo/backyard/?RubyJavaBridge
 licenses:
-- LGPL
+- LGPL-2.1-or-later
 metadata: {}
 post_install_message: 
 rdoc_options: []
@@ -93,7 +93,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements:
 - none
 - JDK 5.0
-rubygems_version: 3.0.1
+rubygems_version: 3.1.2
 signing_key: 
 specification_version: 4
 summary: Ruby Java bridge