tests: intro tests for the jvm module

Signed-off-by: Romain Chanoir <chanoir.romain@courrier.uqam.ca>

diff --git a/tests/sav/test_jvm.res b/tests/sav/test_jvm.res
new file mode 100644 (file)
index 0000000..2972528
--- /dev/null
+++ b/tests/sav/test_jvm.res
@@ -0,0 +1,17 @@
+From java, pushing premier
+From java, pushing deuxi?me
+From java, pushing troisi?me
+From java, popping premier
+From java, popping deuxi?me
+From java, popping troisi?me
+Compilation des classes Java ...
+Initialisation de la JVM ...
+---------------------Test 1----------------------
+premier
+deuxième
+troisième
+--------------------Test 2---------------------
+true
+D
+10
+15.5

diff --git a/tests/test_jvm.nit b/tests/test_jvm.nit
new file mode 100644 (file)
index 0000000..87c7bc2
--- /dev/null
+++ b/tests/test_jvm.nit
@@ -0,0 +1,140 @@
+# This file is part of NIT ( http://www.nitlanguage.org ).
+#
+# Copyright 2014 Alexis Laferrière <alexis.laf@xymus.net>
+# Copyright 2014 Romain Chanoir <romain.chanoir@courrier.uqam.ca>
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#   http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+# Manipulats the Java Virtual Machine
+#
+# See: http://docs.oracle.com/javase/1.5.0/docs/guide/jni/spec/jniTOC.html
+import jvm
+
+print "Compilation des classes Java ..."
+assert sys.system("javac test_jvm/Queue.java") == 0
+assert sys.system("javac test_jvm/Test2.java") == 0
+assert sys.system("javac test_jvm/TestJvm.java") == 0
+
+print "Initialisation de la JVM ..."
+
+var env_ref = new JniEnvRef
+var jvm = new JavaVM(env_ref)
+var env = env_ref.jni_env
+assert env != null
+
+print "---------------------Test 1----------------------"
+# get the class
+var queue_c = env.find_class("test_jvm/Queue")
+if queue_c.address_is_null then print("Error, Queue class not found")
+
+# get the methods of the class
+var f_init = env.get_method_id(queue_c, "<init>", "()V")
+if f_init.address_is_null then print("Error, fInit not found")
+
+var f_push = env.get_method_id(queue_c, "push", "(Ljava/lang/String;)V")
+if f_push.address_is_null then print("Error, fPush not found")
+
+var f_pop = env.get_method_id(queue_c, "pop", "()Ljava/lang/String;")
+if f_pop.address_is_null then print("Error, fPop not found")
+
+var element1 = "premier"
+var element2 = "deuxième"
+var element3 = "troisième"
+
+# instanciate class
+var queue = env.new_object(queue_c, f_init)
+if queue.address_is_null then print("Error, object not initialized")
+
+var arg_tab = new Array[Object].with_items(element1)
+
+# first call to push method
+env.call_void_method(queue, f_push, arg_tab)
+arg_tab = new Array[Object].with_items(element2)
+env.call_void_method(queue, f_push, arg_tab)
+arg_tab = new Array[Object].with_items(element3)
+env.call_void_method(queue, f_push, arg_tab)
+
+var el = env.call_string_method(queue, f_pop, null)
+print el.to_s
+el = env.call_string_method(queue, f_pop, null)
+print el.to_s
+el = env.call_string_method(queue, f_pop, null)
+print el.to_s
+
+print "--------------------Test 2---------------------"
+
+var test_c = env.find_class("test_jvm/TestJvm")
+if test_c.address_is_null then print("Error, TestJvm class not found")
+
+f_init = env.get_method_id(test_c, "<init>", "()V")
+if f_init.address_is_null then print("Error, finit not found")
+
+# Get the different methods ids
+var m_bool = env.get_method_id(test_c, "isBool", "()Z") 
+if m_bool.address_is_null then print("Error, mbool not found")
+var m_char = env.get_method_id(test_c, "getC", "()C")
+if m_char.address_is_null then print("Error, mchar not found")
+var m_i = env.get_method_id(test_c, "getI", "()I")
+if m_i.address_is_null then print ("Error, mi not found")
+var m_f = env.get_method_id(test_c, "getF", "()F")
+if m_f.address_is_null then print("Error, mf not found")
+var m_test = env.get_method_id(test_c, "getTest", "()Ltest_jvm/Test2;")
+if m_test.address_is_null then print("Error, mtest not found")
+
+# Get the Field ids
+var f_bool =env.get_field_id(test_c, "bool", "Z")
+if f_bool.address_is_null then print("Error, fbool not found")
+var f_char = env.get_field_id(test_c, "c", "C")
+if f_char.address_is_null then print("Error, fchar not found")
+var f_i =env.get_field_id(test_c, "i", "I")
+if f_i.address_is_null then print("Error, fi not found")
+var f_f = env.get_field_id(test_c, "f", "F")
+if f_f.address_is_null then print("Error, ff not found")
+var f_test = env.get_field_id(test_c, "test", "Ltest_jvm/TestJvm;")
+
+# Instanciate
+var test = env.new_object(test_c, f_init)
+if test.address_is_null then print("Error, object test not initialized")
+
+# Retrieve field value with field ids
+var v_bool = env.get_boolean_field(test, f_bool)
+if v_bool == null then print("Error, vbool not found")
+var v_char = env.get_char_field(test, f_char)
+if v_char == null then print("Error, vchar not found")
+var v_i = env.get_int_field(test, f_i)
+if v_i == null then print("Error, vi not found")
+var v_f = env.get_float_field(test, f_f)
+if v_f == null then print("Error, vf not found")
+var v_test1 = env.get_object_field(test, f_test)
+if v_test1 == null then print("Error, vtest1 not found")
+
+# Set the new values for the fields
+env.set_boolean_field(test, f_bool, true)
+env.set_char_field(test, f_char, 'D')
+env.set_int_field(test, f_i, 10)
+env.set_float_field(test, f_f, 15.5)
+env.set_object_field(test, f_test, test)
+
+# get the values using getter method
+v_bool = env.call_boolean_method(test, m_bool, null)
+v_char = env.call_char_method(test, m_char, null)
+v_i = env.call_int_method(test, m_i, null)
+v_f = env.call_float_method(test, m_f, null)
+var v_test2 = env.call_object_method(test, m_test, null)
+if v_test2 == null then print("Error, vtest2 not found")
+
+# assert the values of the fields
+print v_bool
+print v_char
+print v_i
+print v_f

diff --git a/tests/test_jvm/Makefile b/tests/test_jvm/Makefile
new file mode 100644 (file)
index 0000000..41e9390
--- /dev/null
+++ b/tests/test_jvm/Makefile
@@ -0,0 +1,3 @@
+java:
+       javac Queue.java
+       javac Test2.java TestJvm.java

diff --git a/tests/test_jvm/Queue.java b/tests/test_jvm/Queue.java
new file mode 100644 (file)
index 0000000..c3e84d1
--- /dev/null
+++ b/tests/test_jvm/Queue.java
@@ -0,0 +1,48 @@
+package test_jvm;
+
+import java.util.*;
+
+class Queue
+{
+    // function pointer
+    public native void printError( String errorMsg );
+
+    // internal list
+    private LinkedList<String> list;
+
+    public Queue()
+    {
+        list = new LinkedList<String>();
+    }
+
+    public void push( String element )
+    {
+        System.out.print( "From java, pushing " );
+        System.out.print( element );
+        System.out.print( "\n" );
+        list.addLast( element );
+    }
+
+    public String pop() // knows where is native printError
+    {
+        String element;
+
+        try
+        {
+            element = list.removeFirst();
+        }
+        catch ( NoSuchElementException e )
+        {
+            printError( "From java, empty queue." );
+            element = null;
+            throw e;
+        }
+
+        System.out.print( "From java, popping " );
+        System.out.print( element );
+        System.out.print( "\n" );
+
+        return element;
+    }
+}
+

diff --git a/tests/test_jvm/Test2.java b/tests/test_jvm/Test2.java
new file mode 100644 (file)
index 0000000..4bd5344
--- /dev/null
+++ b/tests/test_jvm/Test2.java
@@ -0,0 +1,8 @@
+package test_jvm;
+
+public class Test2
+{
+       int i;
+
+       public Test2(){this.i = 10;}
+}

diff --git a/tests/test_jvm/TestJvm.java b/tests/test_jvm/TestJvm.java
new file mode 100644 (file)
index 0000000..034c409
--- /dev/null
+++ b/tests/test_jvm/TestJvm.java
@@ -0,0 +1,29 @@
+package test_jvm;
+
+public class TestJvm
+{
+
+       private Test2 test;
+       private boolean bool;
+       private char c;
+       private int i;
+       private float f;
+
+
+       public TestJvm(){
+       this.bool = false;
+       this.c = 'C';
+       this.i = 0;
+       this.f = 0;
+       this.test = null;
+       this.test = new Test2();
+       }
+
+
+       public Test2 getTest(){return this.test;}
+       public boolean isBool(){return this.bool;}
+       public char getC(){return this.c;}
+       public int getI(){return this.i;}
+       public float getF(){return this.f;}
+}
+