javaclass 0.0.2 → 0.0.3

data/test/test_class_entry.rb

@@ -0,0 +1,198 @@
+require File.dirname(__FILE__) + '/setup'
+require 'javaclass/classlist/class_entry'
+
+module TestJavaClass
+  module TestClassList
+    
+    class TestClassEntry < Test::Unit::TestCase
+      
+      attr_reader :version
+      
+      def test_update
+        # fake methods for zentest, tested in all other tests
+        assert(true)
+      end
+      
+      def test_public_eh
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg.Class', true, 0)
+        assert(ce.public?)
+        
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg.Class', false, 0)
+        assert(!ce.public?)
+      end
+      
+      def test_version
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg.Class', true, 0)
+        assert_equal([0], ce.version)
+
+        ce.update(1)
+        assert_equal([0,1], ce.version)
+
+        ce.update(2)
+        assert_equal([0,1,2], ce.version)
+      end
+      
+      def test_to_full_qualified_s_first
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg.Class', true, 0)
+        
+        # new class in 0
+        assert_equal("pkg.Class - \n", ce.to_full_qualified_s(0,0))
+        # class only in 0, package in 1
+        assert_equal("pkg.Class [only 0] - \n", ce.to_full_qualified_s(0,1))
+        # class also in 1
+        ce.update(1)
+        assert_equal("pkg.Class - \n", ce.to_full_qualified_s(0,1))
+        # dropped in 2
+        assert_equal("pkg.Class [-1] - \n", ce.to_full_qualified_s(0,2)) 
+        # class also in 2
+        ce.update(2)
+        assert_equal("pkg.Class - \n", ce.to_full_qualified_s(0,2))
+      end
+      
+      def test_to_full_qualified_s_package
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg.Class', false, 0)
+        # new class in 0
+        assert_equal("pkg.Class [p] - \n", ce.to_full_qualified_s(0,0))
+        # class only in 0, package in 1
+        assert_equal("pkg.Class [only 0p] - \n", ce.to_full_qualified_s(0,1))
+        # class also in 1
+        ce.update(1)
+        assert_equal("pkg.Class [p] - \n", ce.to_full_qualified_s(0,1))
+        # dropped in 2
+        assert_equal("pkg.Class [-1p] - \n", ce.to_full_qualified_s(0,2)) 
+        # class also in 2
+        ce.update(2)
+        assert_equal("pkg.Class [p] - \n", ce.to_full_qualified_s(0,2))
+      end
+      
+      def test_to_full_qualified_s_later
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg.Class', true, 1)
+        
+        # list is only for 1
+        assert_equal("pkg.Class - \n", ce.to_full_qualified_s(1,1))
+        # new class in 1
+        assert_equal("pkg.Class [1] - \n", ce.to_full_qualified_s(0,1))
+        # new class in 1, not in 2
+        assert_equal("pkg.Class [only 1] - \n", ce.to_full_qualified_s(0,2))
+        # new class in 1, also in 2
+        ce.update(2)
+        assert_equal("pkg.Class [1] - \n", ce.to_full_qualified_s(0,2))
+        # dropped in 3
+        assert_equal("pkg.Class [1-2] - \n", ce.to_full_qualified_s(0,3))
+      end
+      
+      def test_to_full_qualified_s_later_package
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg.Class', false, 1)
+        
+        # list is only for 1
+        assert_equal("pkg.Class [1p] - \n", ce.to_full_qualified_s(1,1))
+        # new class in 1
+        assert_equal("pkg.Class [1p] - \n", ce.to_full_qualified_s(0,1))
+        # new class in 1, not in 2
+        assert_equal("pkg.Class [only 1p] - \n", ce.to_full_qualified_s(0,2))
+        # new class in 1, also in 2
+        ce.update(2)
+        assert_equal("pkg.Class [1p] - \n", ce.to_full_qualified_s(0,2))
+        # dropped in 3
+        assert_equal("pkg.Class [1-2p] - \n", ce.to_full_qualified_s(0,3))
+      end
+      
+      def test_to_package_shortcut_s
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg2.Class2', true, 0)
+        
+        # new class in 0
+        @version = [0] 
+        assert_equal("   Class2 - \n", ce.to_package_shortcut_s)
+        
+        # class only in 0, package in 1
+        @version = [0,1] 
+        assert_equal("   Class2 [only 0] - \n", ce.to_package_shortcut_s)
+        
+        # class also in 1
+        ce.update(1)
+        assert_equal("   Class2 - \n", ce.to_package_shortcut_s)
+        
+        # class dropped in 2, package exists
+        @version = [0,1,2] 
+        assert_equal("   Class2 [-1] - \n", ce.to_package_shortcut_s)
+        
+        # class also in 2
+        ce.update(2)
+        assert_equal("   Class2 - \n", ce.to_package_shortcut_s)
+      end
+      
+      def test_to_package_shortcut_s_package
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg2.Class2', false, 0)
+        
+        # new class in 0
+        @version = [0] 
+        assert_equal("   Class2 [p] - \n", ce.to_package_shortcut_s)
+        
+        # class only in 0, package in 1
+        @version = [0,1] 
+        assert_equal("   Class2 [only 0p] - \n", ce.to_package_shortcut_s)
+        
+        # class also in 1
+        ce.update(1)
+        assert_equal("   Class2 [p] - \n", ce.to_package_shortcut_s)
+        
+        # class dropped in 2, package exists
+        @version = [0,1,2] 
+        assert_equal("   Class2 [-1p] - \n", ce.to_package_shortcut_s)
+        
+        # class also in 2
+        ce.update(2)
+        assert_equal("   Class2 [p] - \n", ce.to_package_shortcut_s)
+      end
+      
+      def test_to_package_shortcut_s_later
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg2.Class2', true, 1)
+        
+        # list is only for 1
+        @version = [1] 
+        assert_equal("   Class2 - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1
+        @version = [0,1] 
+        assert_equal("   Class2 [1] - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1, not in 2
+        @version = [0,1,2] 
+        assert_equal("   Class2 [only 1] - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1, also in 2
+        ce.update(2)
+        assert_equal("   Class2 [1] - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1 and 2, not in 3
+        @version = [0,1,2,3] 
+        assert_equal("   Class2 [1-2] - \n", ce.to_package_shortcut_s)
+      end
+      
+      def test_to_package_shortcut_s_later_package
+        ce = JavaClass::ClassList::ClassEntry.new(self, 'pkg2.Class2', false, 1)
+        
+        # list is only for 1
+        @version = [1] 
+        assert_equal("   Class2 [1p] - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1
+        @version = [0,1] 
+        assert_equal("   Class2 [1p] - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1, not in 2
+        @version = [0,1,2] 
+        assert_equal("   Class2 [only 1p] - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1, also in 2
+        ce.update(2)
+        assert_equal("   Class2 [1p] - \n", ce.to_package_shortcut_s)
+        
+        # new class in 1 and 2, not in 3
+        @version = [0,1,2,3] 
+        assert_equal("   Class2 [1-2p] - \n", ce.to_package_shortcut_s)
+      end
+      
+    end
+  end
+end

data/test/test_class_version.rb

@@ -1,59 +1,61 @@
 require File.dirname(__FILE__) + '/setup'
-require 'javaclass/class_version'
+require 'javaclass/classfile/class_version'
 
 module TestJavaClass
-  
-  class TestClassVersion < Test::Unit::TestCase
+  module TestClassFile
     
-    def setup
-      @v = (0..6).collect do |i| 
-        JavaClass::ClassVersion.new(load_class("ClassVersionTest1#{i}")) 
+    class TestClassVersion < Test::Unit::TestCase
+      
+      def setup
+        @v = (0..6).collect do |i| 
+          JavaClass::ClassFile::ClassVersion.new(load_class("class_version/ClassVersionTest1#{i}")) 
+        end
       end
-    end
-    
-    # Assert the list of +v+ against the list of _expectations_ when invoking the given block.
-    def assert_classes(expectations)
-      expectations.values_at.each do |i|
-        assert_equal(expectations[i], yield(@v[i]), "#{i}. element")
+      
+      # Assert the list of +v+ against the list of _expectations_ when invoking the given block.
+      def assert_classes(expectations)
+        expectations.values_at.each do |i|
+          assert_equal(expectations[i], yield(@v[i]), "#{i}. element")
+        end
       end
-    end
-    
-    def test_major
-      assert_classes([45, 45, 46, 47, 48, 49, 50]) {|v| v.major}
-    end
-    
-    def test_minor
-      assert_classes([3, 3, 0, 0, 0, 0, 0]) {|v| v.minor}
-      assert_equal(3, @v[1].minor) # shouldn't it be > 45.3  
-    end
-    
-    def test_to_s
-      assert_equal('50.0', @v[6].to_s)
-      assert_equal('45.3', @v[0].to_s)
-    end
-    
-    def test_dump
-      assert_equal(["  minor version: 0", "  major version: 50"], @v[6].dump)
-    end
-    
-    def test_to_f
-      assert_equal(50.0, @v[6].to_f)
-      assert_equal(45.3, @v[0].to_f)
       
-      v = JavaClass::ClassVersion.new("....\000\xff\0002")
-      assert_equal(50.255, v.to_f) 
+      def test_major
+        assert_classes([45, 45, 46, 47, 48, 49, 50]) {|v| v.major}
+      end
       
-      v = JavaClass::ClassVersion.new("....\xff\xff\0002")
-      assert_equal(50.65535, v.to_f) 
-    end
-    
-    def test_jdk_version
-      assert_classes(%w[1.0 1.0 1.2 1.3 1.4 1.5 1.6]) {|v| v.jdk_version}
+      def test_minor
+        assert_classes([3, 3, 0, 0, 0, 0, 0]) {|v| v.minor}
+        assert_equal(3, @v[1].minor) # shouldn't it be > 45.3  
+      end
+      
+      def test_to_s
+        assert_equal('50.0', @v[6].to_s)
+        assert_equal('45.3', @v[0].to_s)
+      end
+      
+      def test_dump
+        assert_equal(['  minor version: 0', '  major version: 50'], @v[6].dump)
+      end
+      
+      def test_to_f
+        assert_equal(50.0, @v[6].to_f)
+        assert_equal(45.3, @v[0].to_f)
+        
+        v = JavaClass::ClassFile::ClassVersion.new("....\000\xff\0002")
+        assert_equal(50.255, v.to_f) 
+        
+        v = JavaClass::ClassFile::ClassVersion.new("....\xff\xff\0002")
+        assert_equal(50.65535, v.to_f) 
+      end
+      
+      def test_jdk_version
+        assert_classes(%w[1.0 1.0 1.2 1.3 1.4 1.5 1.6]) {|v| v.jdk_version}
+        
+        v = JavaClass::ClassFile::ClassVersion.new("....\000\xff\0002")
+        assert_equal('unknown', v.jdk_version)
+      end
       
-      v = JavaClass::ClassVersion.new("....\000\xff\0002")
-      assert_equal('unknown', v.jdk_version)
     end
     
   end
-  
 end

data/test/test_composite_classpath.rb

@@ -0,0 +1,68 @@
+require File.dirname(__FILE__) + '/setup'
+require 'javaclass/classpath/composite_classpath'
+
+module TestJavaClass
+  module TestClasspath
+    
+    class TestCompositeClasspath < Test::Unit::TestCase
+      
+      def setup
+        @cpe = JavaClass::Classpath::CompositeClasspath.new
+        @cpe.add_file_name "#{TEST_DATA_PATH}/jar_classpath/JarClasspathTestManifest.jar"
+      end
+      
+      def test_add_element
+        # fake methods for zentest, tested in setup and add_file_name
+        assert(true)
+      end
+      
+      def test_add_file_name
+        @cpe.add_file_name "#{TEST_DATA_PATH}/folder_classpath/JarClasspathTestFolder"
+        assert_equal(2+1+2, @cpe.count)
+      end
+      
+      def test_additional_classpath
+        assert_equal([], @cpe.additional_classpath)
+      end
+      
+      def test_jar_eh
+        assert(!@cpe.jar?)
+      end
+      
+      def test_count
+        assert_equal(2+1, @cpe.count)
+      end
+      
+      def test_elements
+        assert_equal(2, @cpe.elements.size)
+        assert_equal("#{TEST_DATA_PATH}/jar_classpath/JarClasspathTest.jar", @cpe.elements[1].to_s)
+      end
+      
+      def test_includes_eh
+        assert(@cpe.includes?('ClassVersionTest11.class'))
+        assert(@cpe.includes?('ClassVersionTest11'))
+        assert(@cpe.includes?('ClassVersionTest10.class'))
+        assert(@cpe.includes?('ClassVersionTest10'))
+      end
+      
+      def test_load_binary
+        assert_equal(load_class('class_version/ClassVersionTest11'), @cpe.load_binary('ClassVersionTest11'))
+        assert_equal(load_class('class_version/ClassVersionTest10'), @cpe.load_binary('ClassVersionTest10'))
+        assert_equal(load_class('class_version/ClassVersionTest11'), @cpe.load_binary('package/ClassVersionTest11.class'))
+      end
+      
+      def test_names
+        assert_equal(['ClassVersionTest11.class', 'ClassVersionTest10.class', 'package/ClassVersionTest11.class'], @cpe.names)
+      end
+      
+      def test_find_jars
+        @cpe = JavaClass::Classpath::CompositeClasspath.new
+        @cpe.find_jars("#{TEST_DATA_PATH}/jar_classpath")
+        assert_equal(4, @cpe.elements.size)
+        assert_equal(File.expand_path("#{TEST_DATA_PATH}/jar_classpath/JarClasspathTest.zip"), @cpe.elements[1].to_s)
+      end
+      
+    end
+    
+  end
+end

data/test/test_constant_pool.rb

@@ -1,12 +1,13 @@
 require File.dirname(__FILE__) + '/setup'
-require 'javaclass/constant_pool'
+require 'javaclass/classfile/constant_pool'
 
 module TestJavaClass
-  
-  class TestConstantPool < Test::Unit::TestCase
+  module TestClassFile
     
-    # 1.6.0_11 javap.exe output of test class, only tweaked the float value a bit...
-    JAVAP_OUTPUT = '  Constant pool:
+    class TestConstantPool < Test::Unit::TestCase
+      
+      # 1.6.0_11 javap.exe output of test class, only tweaked the float value a bit...
+      JAVAP_OUTPUT = '  Constant pool:
 const #1 = Method       #15.#33;        //  java/lang/Object."<init>":()V
 const #2 = String       #34;    //  String field
 const #3 = Field        #14.#35;        //  ConstantPoolTest.stringField:Ljava/lang/String;
@@ -48,43 +49,50 @@ const #40 = NameAndType #27:#28;//  doubleField:D
 const #41 = Asciz       ConstantPoolTest;
 const #42 = Asciz       java/lang/Object;
 const #43 = Asciz       java/lang/Runnable;'
-    
-    def setup
-      @cp = JavaClass::ConstantPool.new(load_class('ConstantPoolTest'))
-    end
-    
-    def test_index
-      assert_equal('Method', @cp[1].name)
-      assert_equal('Field', @cp[10].name)
-    end
-    
-    def test_size
-      assert_equal(331, @cp.size)
-    end
-    
-    def test_item_count
-      assert_equal(43, @cp.item_count)
-    end
-    
-    def test_dump
-      # puts @cp.dump.join("\n")
-      assert_equal(JAVAP_OUTPUT.gsub(/ +/,' ').gsub(/"</,'<').gsub(/>"/,'>'), @cp.dump.join("\n").gsub(/( |\t)+/,' '))
-    end
-    
-    def test_items
-      pool = @cp.items
-      assert_equal(41, pool.size) # 2 double
-      assert_equal('Method', pool[0].name)
-      assert_equal('stringField', pool[14].value)
-    end
-    
-    def test_find
-      found = @cp.find(JavaClass::ConstantPool::STRING_TAG)
-      assert_equal(1, found.size)
-      assert_equal('String', found[0].name)
-      assert_equal(34, found[0].string_index)
+      
+      def setup
+        @cp = JavaClass::ClassFile::ConstantPool.new(load_class('constant_pool/ConstantPoolTest'))
+      end
+      
+      def test_index
+        assert_equal('Method', @cp[1].name)
+        assert_equal('Field', @cp[10].name)
+      end
+      
+      def test_size
+        assert_equal(331, @cp.size)
+      end
+      
+      def test_item_count
+        assert_equal(43, @cp.item_count)
+      end
+      
+      def test_dump
+        # puts @cp.dump.join("\n")
+        assert_equal(JAVAP_OUTPUT.gsub(/ +/, ' ').gsub(/"</, '<').gsub(/>"/, '>'), @cp.dump.join("\n").gsub(/( |\t)+/,' '))
+      end
+      
+      def test_items
+        pool = @cp.items
+        assert_equal(41, pool.size) # 2 double
+        assert_equal('Method', pool[0].name)
+        assert_equal('stringField', pool[14].value)
+      end
+      
+      def test_find
+        found = @cp.find(JavaClass::ClassFile::ConstantPool::STRING_TAG)
+        assert_equal(1, found.size)
+        assert_equal('String', found[0].name)
+        assert_equal(34, found[0].string_index)
+      end
+      
+      def test_strings
+        found = @cp.strings
+        assert_equal(1, found.size)
+        assert_equal('String', found[0].name)
+      end
+      
     end
     
   end
-  
 end

data/test/test_folder_classpath.rb

@@ -0,0 +1,45 @@
+require File.dirname(__FILE__) + '/setup'
+require 'javaclass/classpath/folder_classpath'
+
+module TestJavaClass
+  module TestClasspath
+    
+    class TestFolderClasspath < Test::Unit::TestCase
+      
+      def setup
+        @cpe = JavaClass::Classpath::FolderClasspath.new("#{TEST_DATA_PATH}/folder_classpath/JarClasspathTestFolder")
+      end
+      
+      def test_count
+        assert_equal(2, @cpe.count)
+      end
+      
+      def test_additional_classpath
+        assert_equal([], @cpe.additional_classpath)
+      end
+      
+      def test_jar_eh
+        assert(!@cpe.jar?)
+      end
+      
+      def test_includes_eh
+        assert(@cpe.includes?('ClassVersionTest10.class'))
+        assert(@cpe.includes?('ClassVersionTest10'))
+        assert(!@cpe.includes?('ClassVersionTest11.class'))
+        assert(!@cpe.includes?('ClassVersionTest11'))
+        assert(@cpe.includes?('package/ClassVersionTest11.class'))
+        assert(@cpe.includes?('package/ClassVersionTest11'))
+      end
+      
+      def test_load_binary
+        assert_equal(load_class('class_version/ClassVersionTest10'), @cpe.load_binary('ClassVersionTest10'))
+      end
+      
+      def test_names
+        assert_equal(['ClassVersionTest10.class', 'package/ClassVersionTest11.class'], @cpe.names)
+      end
+      
+    end
+    
+  end
+end

data/test/test_jar_classpath.rb

@@ -0,0 +1,57 @@
+require File.dirname(__FILE__) + '/setup'
+require 'javaclass/classpath/jar_classpath'
+
+module TestJavaClass
+  module TestClasspath
+    
+    class TestJarClasspath < Test::Unit::TestCase
+      
+      def setup
+        @folder = "#{TEST_DATA_PATH}/jar_classpath"
+        @cpe = JavaClass::Classpath::JarClasspath.new("#{@folder}/JarClasspathTest.jar")
+      end
+      
+      def test_count
+        assert_equal(2, @cpe.count)
+      end
+      
+      def test_additional_classpath
+        assert_equal([], @cpe.additional_classpath)
+        
+        @cpe = JavaClass::Classpath::JarClasspath.new("#{@folder}/JarClasspathTestManifest.jar")
+        assert_equal(["#{@folder}/JarClasspathTest.jar"], @cpe.additional_classpath)
+        
+        @cpe = JavaClass::Classpath::JarClasspath.new("#{@folder}/JarClasspathTestMultiManifest.jar")
+        assert_equal(["#{@folder}/lib/httpunit-1.6.2.jar", "#{@folder}/lib/nekohtml-0.9.1.jar", 
+          "#{@folder}/lib/xercesImpl-2.5.jar", "#{@folder}/lib/js-1.5R4.1.jar"], @cpe.additional_classpath)
+      end
+      
+      def test_jar_eh
+        assert(@cpe.jar?)
+        
+        @cpe = JavaClass::Classpath::JarClasspath.new("#{@folder}/JarClasspathTest.zip")
+        assert(!@cpe.jar?)
+      end
+      
+      def test_includes_eh
+        assert(@cpe.includes?('ClassVersionTest10.class'))
+        assert(@cpe.includes?('ClassVersionTest10'))
+        assert(!@cpe.includes?('ClassVersionTest11.class'))
+        assert(!@cpe.includes?('ClassVersionTest11'))
+      end
+      
+      def test_load_binary
+        assert_equal(load_class('class_version/ClassVersionTest10'), @cpe.load_binary('ClassVersionTest10'))
+        
+        @cpe = JavaClass::Classpath::JarClasspath.new("#{@folder}/JarClasspathTest.zip")
+        assert_equal(load_class('class_version/ClassVersionTest10'), @cpe.load_binary('ClassVersionTest10'))
+      end
+      
+      def test_names
+        assert_equal(['ClassVersionTest10.class', 'package/ClassVersionTest11.class'], @cpe.names)
+      end
+      
+    end
+    
+  end
+end

data/test/test_jar_searcher.rb

@@ -0,0 +1,93 @@
+require File.dirname(__FILE__) + '/setup'
+require 'javaclass/classlist/jar_searcher'
+require 'javaclass/classpath/jar_classpath'
+
+module TestJavaClass
+  module TestClassList
+    class TestJarSearcher < Test::Unit::TestCase
+      
+      PACKAGE_CLASS = "packagename/PackageClass.class"
+      INNER_CLASS = "packagename/PublicClass$InnerClass.class"
+      PUBLIC_CLASS = "packagename/PublicClass.class"
+      PUBLIC_INTERFACE = "packagename/PublicInterface.class"
+      CLASSES = [INNER_CLASS, PUBLIC_CLASS, PUBLIC_INTERFACE, PACKAGE_CLASS]
+      
+      def setup
+        @cs = JavaClass::ClassList::JarSearcher.new
+      end
+      
+      def test_filter_classes
+        @cs.skip_inner_classes = false
+        classes = @cs.filter_classes(CLASSES)
+        assert_equal(4, classes.size)
+        assert_equal(INNER_CLASS, classes[0])
+        assert_equal(PUBLIC_CLASS, classes[1])
+        assert_equal(PUBLIC_INTERFACE, classes[2])
+        assert_equal(PACKAGE_CLASS, classes[3])
+      end
+      
+      def test_skip_inner_classes_equals
+        # @cs.skip_inner_classes = true # default
+        classes = @cs.filter_classes(CLASSES)
+        assert_equal(3, classes.size)
+        assert_equal(PUBLIC_CLASS, classes[0])
+        assert_equal(PUBLIC_INTERFACE, classes[1])
+        assert_equal(PACKAGE_CLASS, classes[2])
+      end
+      
+      def test_filters_equals
+        @cs.filters = ['packagename/']
+        classes = @cs.filter_classes(CLASSES)
+        assert_equal(0, classes.size)
+      end
+      
+      def test_public_eh
+        @cpe = JavaClass::Classpath::JarClasspath.new(File.expand_path("#{TEST_DATA_PATH}/jar_searcher/JarClassListTest.jar"))
+        assert(!@cs.public?(@cpe, PACKAGE_CLASS))
+        assert(!@cs.public?(@cpe, INNER_CLASS))
+        assert(@cs.public?(@cpe, PUBLIC_CLASS))
+      end
+      
+      class MockList # ZenTest SKIP mock class
+        attr_reader :versions
+        attr_reader :modifiers
+        attr_reader :entries
+        def initialize
+          @versions = []
+          @modifiers = []
+          @size = 0
+          @entries = []
+        end
+        
+        def add_class(entry, is_public, version)
+          @entries << entry
+          @modifiers << is_public
+          @versions << version
+        end
+        
+        def size
+          @entries.size
+        end
+      end
+      
+      def test_compile_list
+        list = @cs.compile_list(2, "#{TEST_DATA_PATH}/jar_searcher", MockList.new )
+        
+        assert_equal(3, list.size)
+        assert_equal([PACKAGE_CLASS, PUBLIC_CLASS, PUBLIC_INTERFACE], list.entries)
+        assert_equal([false, true, true], list.modifiers)
+        assert_equal([2, 2, 2], list.versions)
+      end
+      
+      def test_skip_package_classes_equals
+        @cs.skip_package_classes = true
+        list = @cs.compile_list(3, "#{TEST_DATA_PATH}/jar_searcher", MockList.new )
+        
+        assert_equal(2, list.size)
+        assert_equal([PUBLIC_CLASS, PUBLIC_INTERFACE], list.entries)
+      end
+      
+    end
+    
+  end
+end