javaclass 0.0.2 → 0.0.3

data/lib/javaclass/constants/single_reference.rb

@@ -1,58 +0,0 @@
-require 'javaclass/constants/base'
-
-module JavaClass 
-  module Constants # :nodoc:
-    
-    # Superclass of single reference constants like +ConstantClass+ (+Class+) in the constant pool. 
-    # Author::   Peter Kofler
-    class SingleReference < Base
-      
-      attr_reader :first_index
-      
-      # Define a single reference into _pool_ from _data_ beginning at _start_
-      def initialize(pool, data, start, name=nil)
-        super(name)
-        @tag = data.u1(start)
-        
-        @enclosing_pool = pool
-        @first_index = data.u2(start+1)
-      end
-      
-      # Return the value, which is the referenced value from the pool.
-      def first_value
-        get(@first_index)
-      end
-      alias to_s first_value
-      
-      # Return part of debug output.
-      def dump
-        super + "##{@first_index};\t//  #{to_s}"
-      end
-      
-      protected
-      
-      # Get a reference _ref_ from the +enclosing_pool+
-      def get(ref)
-        @enclosing_pool[ref].to_s
-      end
-      
-    end
-    
-    class ConstantClass < SingleReference
-      alias name_index first_index
-      def initialize(pool, data, start)
-        super(pool, data, start, "class")
-      end
-      alias class_name first_value
-    end
-    
-    class ConstantString < SingleReference
-      alias string_index first_index
-      def initialize(pool, data, start) 
-        super(pool, data, start)
-      end
-      alias string_value first_value
-    end
-    
-  end
-end

data/lib/javaclass/constants/value.rb

@@ -1,114 +0,0 @@
-require 'javaclass/constants/base'
-
-module JavaClass 
-  module Constants # :nodoc:
-    
-    # Superclass of value constants like +ConstantInt+ (+Integer+) in the constant pool. 
-    # Author::   Peter Kofler
-    class Value < Base
-      
-      attr_reader :value
-      
-      # Create a constant value with an optional downcase _name_
-      def initialize(name=self.class.to_s[/::[^:]+$/][10..-1].downcase)
-        super(name)
-      end
-      
-      # Return the value as string.
-      def to_s
-        @value.to_s
-      end
-      
-      # Return part of debug output.
-      def dump
-        super + "#{@value}"
-      end
-      
-      protected
-      
-      # Define a +value+ from _data_ beginning at position _start_ with the _size_ in bytes and _slots_ (1 or 2).
-      def get_value(data, start, size, slots=1)
-        @tag = data.u1(start)
-        @size = size
-        @slots = slots
-        
-        data[start+1..start+size-1]
-      end
-      
-      # Dummy method to "fix" unused warning of param _pool_ in Eclipse.
-      def silence_unused_warning(pool)
-        raise "pool is nil" unless pool
-      end
-      
-    end
-    
-    class ConstantInt < Value
-      def initialize(pool, data, start) 
-        super()
-        silence_unused_warning(pool)
-        @value = get_value(data, start, 5).u4
-      end
-      
-      def dump
-        super + ';'
-      end
-    end
-    
-    class ConstantFloat < Value
-      def initialize(pool, data, start) 
-        super()
-        silence_unused_warning(pool)
-        @value = get_value(data, start, 5).single 
-      end
-      def to_s
-        super.upcase # sprintf('%E',@value)
-      end
-      def dump
-        super + 'f;'
-      end
-    end
-    
-    class ConstantLong < Value
-      def initialize(pool, data, start) 
-        super()
-        silence_unused_warning(pool)
-        @value = get_value(data, start, 9, 2).u8
-      end
-      def dump
-        super + 'l;'
-      end
-    end
-    
-    class ConstantDouble < Value
-      def initialize(pool, data, start) 
-        super()
-        silence_unused_warning(pool)
-        @value = get_value(data, start, 9, 2).double
-      end
-      def to_s
-        @value.to_s.upcase # sprintf('%E',@value)
-      end
-      def dump
-        super + 'd;'
-      end
-    end
-    
-    class ConstantAsciz < Value
-      alias string value
-      def initialize(pool, data, start) 
-        super('Asciz')
-        silence_unused_warning(pool)
-        @tag = data.u1(start)
-        
-        @length = data.u2(start+1)
-        @size = 3 + @length
-        @value = data[start+3..start+3+@length-1]
-      end
-      
-      def dump
-        super + ';'
-      end
-    end
-    
-  end
-end

data/lib/javaclass/java_class_header.rb

@@ -1,88 +0,0 @@
-require 'javaclass/string_ux'
-require 'javaclass/class_magic'
-require 'javaclass/class_version'
-require 'javaclass/constant_pool'
-require 'javaclass/references'
-require 'javaclass/access_flags'
-
-module JavaClass 
-  
-  # Provide all information of a Java class file. 
-  # Author::          Peter Kofler
-  class JavaClassHeader
-    
-    attr_reader :magic    
-    attr_reader :version
-    attr_reader :constant_pool
-    attr_reader :access_flags
-    attr_reader :references
-    
-    # Create a header with the binary _data_ from the class file.
-    def initialize(data)
-      
-      #  ClassFile {
-      #    u4 magic;
-      #    u2 minor_version;
-      #    u2 major_version;
-      #    u2 constant_pool_count;
-      #    cp_info constant_pool[constant_pool_count-1];
-      #    u2 access_flags;
-      #    u2 this_class;
-      #    u2 super_class;
-      #    u2 interfaces_count;
-      #    u2 interfaces[interfaces_count];
-      #    u2 fields_count;
-      #    field_info fields[fields_count];
-      #    u2 methods_count;
-      #    method_info methods[methods_count];
-      #    u2 attributes_count;
-      #    attribute_info attributes[attributes_count];
-      #  }
-      
-      @magic = ClassMagic.new(data)
-      @version = ClassVersion.new(data)
-      
-      @constant_pool = ConstantPool.new(data)
-      pos = 8 + @constant_pool.size
-      
-      @access_flags = AccessFlags.new(data, pos)
-      pos += 2
-      
-      idx = data.u2(pos)
-      pos += 2
-      @this_class_idx = idx
-      
-      @references = References.new(@constant_pool, @this_class_idx)
-      
-      idx = data.u2(pos)
-      pos += 2
-      @super_class_idx = idx
-    end
-    
-    # Return the name of this class.
-    def this_class
-      @constant_pool[@this_class_idx].to_s
-    end
-    
-    # Return the name of the superclass of this class or +nil+.
-    def super_class
-      if @super_class_idx>0
-        @constant_pool[@super_class_idx].to_s
-      else
-        nil
-      end
-    end
-    
-    # Return a debug output of this class that looks similar to +javap+ output.
-    def dump
-      d = []
-      # dump << "  SourceFile: \"#{@value}\""
-      # dump << "Compiled from \"#{@value}\""
-      d += @version.dump 
-      d += @constant_pool.dump
-      d
-    end
-    
-  end
-  
-end

data/lib/javaclass/references.rb

@@ -1,31 +0,0 @@
-require 'javaclass/constant_pool'
-
-module JavaClass
-  
-  # Container class for list of all classes, methods and fields referenced by this class.
-  # Author::   Peter Kofler
-  class References
-    
-    # Create a references container with the constant _pool_ and skip references to _classidx_ which is the host class itself.  
-    def initialize(pool, classidx)
-      @constant_pool = pool
-      @class_idx = classidx
-    end
-    
-    # Return the constants referring to fields (Constants::ConstantField). 
-    # If _includeown_ is +true+ then fields of this class are returned also. 
-    def referenced_fields(includeown=false)
-      @constant_pool.find(ConstantPool::FIELD_TAG).find_all { |field| includeown || field.class_index != @class_idx }
-    end
-    
-    # Return the constants referring to methods (Constants::ConstantMethod) in classes or interfaces. 
-    # If _includeown_ is +true+ then methods of this class are returned also. 
-    def referenced_methods(includeown=false)
-      @constant_pool.find(ConstantPool::METHOD_TAG, ConstantPool::INTERFACE_METHOD_TAG).find_all do |method| 
-        includeown || method.class_index != @class_idx 
-      end
-    end
-    
-  end
-  
-end

data/test/data/AccessFlagsTestPublic.java

@@ -1,7 +0,0 @@
-package packagename;
-
-public class AccessFlagsTestPublic {
-
-   class InnerClass { }
-
-}