rubeus 0.0.2-java → 0.0.3-java

data/examples/notepad.rb

@@ -0,0 +1,33 @@
+include Java
+
+require 'rubygems'
+gem 'rubeus'
+require 'rubeus'
+
+Rubeus::Swing.irb
+
+import 'java.io.FileInputStream'
+import 'java.io.FileOutputStream'
+
+rtf_editor_kit = RTFEditorKit.new
+
+JFrame.new('Notepad') do |frame|
+	JScrollPane.new do |pane|
+		pane.vertical_scroll_bar_policy = ScrollPaneConstants::VERTICAL_SCROLLBAR_AS_NEEDED
+		pane.horizontal_scroll_bar_policy = ScrollPaneConstants::HORIZONTAL_SCROLLBAR_NEVER
+		@text_pane = JTextPane.new
+		@text_pane.document = DefaultStyledDocument.new StyleContext.new
+	end
+
+  file_path = File.join(File.dirname(__FILE__), 'notepad.rtf')
+	rtf_editor_kit.read FileInputStream.new(file_path), @text_pane.document, 0
+	
+	@text_pane.listen(:key, :key_released) do |event|
+		rtf_editor_kit.write FileOutputStream.new(file_path), @text_pane.document, 0, @text_pane.document.length
+	end
+
+	frame.default_close_operation = JFrame::EXIT_ON_CLOSE
+	frame.set_size(300, 200)
+	frame.set_location_relative_to(nil)
+	frame.visible = true
+end

data/examples/notepad.rtf

@@ -0,0 +1,39 @@
+{\rtf1\ansi\ansicpg932\cocoartf949\cocoasubrtf330
+{\fonttbl\f0\fnil\fcharset128 HiraKakuPro-W3;}
+{\colortbl;\red255\green255\blue255;\red255\green6\blue12;\red12\green21\blue237;\red237\green9\blue17;
+\red179\green176\blue39;\red237\green12\blue9;}
+\margl1440\margr1440\margb1800\margt1800\vieww9000\viewh8400\viewkind0
+\deftab708
+\pard\tx560\tx1120\tx1680\tx2240\tx2800\tx3360\tx3920\tx4480\tx5040\tx5600\tx6160\tx6720\pardeftab708\ql\qnatural\pardirnatural
+
+\f0\fs24 \cf0 \expnd0\expndtw0\kerning0
+\
+\
+
+\b\fs36 \cf2 \kerning1\expnd0\expndtw0 Rubeus
+\b0\fs24 \cf0 \expnd0\expndtw0\kerning0
+ provides you an easy access to 
+\b\fs36 \cf3 \kerning1\expnd0\expndtw0 Java
+\b0\fs24 \cf0 \expnd0\expndtw0\kerning0
+ objects from 
+\b\fs36 \cf4 \kerning1\expnd0\expndtw0 Ruby
+\b0\fs24 \cf0 \expnd0\expndtw0\kerning0
+ scripts on 
+\b\fs36 \cf5 \kerning1\expnd0\expndtw0 JRuby
+\b0\fs24 \cf0 \expnd0\expndtw0\kerning0
+. Currently, we're working on Swing libralies. With 
+\b\fs36 \cf6 \kerning1\expnd0\expndtw0 Rubeus
+\b0\fs24 \cf0 \expnd0\expndtw0\kerning0
+ swing-extension, you'll be free from messy chank of codes. It makes everything about Swing surprisingly simple ! JDBC supports will come next !\
+\
+Google Group: 
+\fs28 http://groups.google.com/group/rubeus
+\fs24 \
+\
+example_code01:\
+\
+    with_rubeus: http://code.google.com/p/rubeus/source/browse/trunk/examples/rubeus_swing_example01.rb \
+\
+    with_java: http://code.google.com/p/rubeus/source/browse/trunk/examples/JavaSwingExample01.java \
+\
+}

data/examples/rubeus_swing_example01.rb

@@ -0,0 +1,40 @@
+include Java
+
+require 'rubygems'
+gem "rubeus"
+require "rubeus"
+
+Rubeus::Swing.irb
+
+# JFrameなどのコンテナのnewに渡されたブロックの中でnewされたコンポーネントは
+# 自動的にaddされます。
+JFrame.new("Rubeus Swing Example 01") do |frame|
+  frame.layout = BoxLayout.new(:Y_AXIS)
+  JSplitPane.new(JSplitPane::VERTICAL_SPLIT) do
+    JPanel.new do |panel|
+      panel.layout = BoxLayout.new(:X_AXIS)
+      # キーのイベントもメソッドを指定してハンドリングできます。
+      # newにブロックを渡すとlisten(:key, :pressed)が実行されます。
+      @text_field = JTextField.new do |event|
+        if event.key_code == 10 # RETURN
+          @textpane.text += @text_field.text + "\n"
+          @text_field.text = ''
+        end
+      end
+      # 以下のように書くこともできますです
+      # @text_field = JTextField.new
+      # @text_field.listen(:key, :key_pressed, :key_code => 10) do |event|
+      #   @textpane.text += @text_field.text + "\n"
+      #   @text_field.text = ''
+      # end
+      JButton.new("append") do
+        @textpane.text += @text_field.text
+        @text_field.text = ''
+      end
+    end
+    JScrollPane.new(:preferred_size => [400, 250]) do |pane|
+      @textpane = JTextPane.new
+    end
+  end
+  frame.visible = true
+end

data/examples/rubeus_swing_example01_with_class.rb

@@ -0,0 +1,45 @@
+include Java
+
+require 'rubygems'
+gem "rubeus"
+require "rubeus"
+
+class Example01
+  extend Rubeus::Swing
+  
+  def show
+    # JFrameなどのコンテナのnewに渡されたブロックの中でnewされたコンポーネントは
+    # 自動的にaddされます。
+    JFrame.new("Rubeus Swing Example 01") do |frame|
+      frame.layout = BoxLayout.new(:Y_AXIS)
+      JSplitPane.new(JSplitPane::VERTICAL_SPLIT) do
+        JPanel.new do |panel|
+          panel.layout = BoxLayout.new(:X_AXIS)
+          # キーのイベントもメソッドを指定してハンドリングできます。
+          # newにブロックを渡すとlisten(:key, :pressed)が実行されます。
+          @text_field = JTextField.new do |event|
+            if event.key_code == 10 # RETURN
+              @textpane.text += @text_field.text + "\n"
+              @text_field.text = ''
+            end
+          end
+          # 以下のように書くこともできますです
+          # @text_field = JTextField.new
+          # @text_field.listen(:key, :key_pressed, :key_code => 10) do |event|
+          #   @textpane.text += @text_field.text + "\n"
+          #   @text_field.text = ''
+          # end
+          JButton.new("append") do
+            @textpane.text += @text_field.text + "\n"
+            @text_field.text = ''
+          end
+        end
+        JScrollPane.new(:preferred_size => [400, 250]) do |pane|
+          @textpane = JTextPane.new
+        end
+      end
+      frame.visible = true
+    end
+  end
+end
+Example01.new.show

data/lib/rubeus.rb

@@ -5,6 +5,7 @@ require "active_support/core_ext/string"
 
 module Rubeus
   VERSION = "0.0.2"
+  autoload :Extensions, "rubeus/extensions"
   autoload :Awt, "rubeus/awt"
   autoload :Swing, "rubeus/swing"
 end

data/lib/rubeus/awt.rb

@@ -1,14 +1,10 @@
 require "rubeus/component_loader"
 
 module Rubeus
-  extensions_path = File.join(File.dirname(__FILE__), "awt", "extensions")
-  Awt = ComponentLoader.new("java.awt", extensions_path) do
-    base_path = File.expand_path(File.join(File.dirname(__FILE__), '..'))
-    Dir.glob(File.join(base_path, 'rubeus', 'awt', '*.rb')) do |file|
-      rel_path = file.gsub("#{base_path}/", '')
-      autoload(File.basename(rel_path, '.*').camelize, rel_path.gsub(/\.rb$/, ''))
-    end
-  end
+  Awt = ComponentLoader.new("java.awt")
 end
 
-require "rubeus/awt/extensions"
+require "rubeus/awt/attributes"
+require "rubeus/awt/nestable"
+require "rubeus/awt/event"
+require "rubeus/awt/setters"

data/lib/rubeus/component_loader.rb

@@ -1,33 +1,50 @@
 module Rubeus
   class ComponentLoader < Module
-    attr_reader :java_package, :ruby_module_path, :base_path
 
-    def self.find_base_path(path)
-      path = File.expand_path(path)
-      $LOAD_PATH.detect{|load_path| path.include?(File.expand_path(load_path))}
+    def self.class_names(*package_names)
+      patterns = Regexp.union(
+        *package_names.map{|package_name|
+          Regexp.new(package_name.gsub(/\./, "/"))})
+      classlist = File.join(ENV_JAVA["java.home"], "lib", "classlist")
+      classes = []
+      open(classlist) do |f|
+        f.each do |line|
+          classes << line.gsub(/\//, '.').strip if patterns =~ line
+        end
+      end
+      classes
     end
     
-    def initialize(java_package, ruby_module_path, base_path = nil, &block)
-      @java_package, @ruby_module_path, @base_path =
-        java_package, ruby_module_path, base_path
-      @base_path ||= ComponentLoader.find_base_path(ruby_module_path)
-      @ruby_module_holder_name = File.basename(ruby_module_path).camelize
+    attr_reader :java_package
+    attr_reader :class_to_package
+
+    def initialize(java_package, &block)
+      @java_package = java_package
+      build_class_to_package_table
       super(&block)
     end
     
-    def ruby_module_holder
-       @ruby_module_holder ||= (self.const_get(@ruby_module_holder_name) rescue nil)
-      unless @ruby_module_holder
-        self.const_set(@ruby_module_holder_name, Module.new)
-        @ruby_module_holder =  self.const_get(@ruby_module_holder_name)
+    def build_class_to_package_table
+      class_names = ::Rubeus::ComponentLoader.class_names(@java_package)
+      @class_to_package = {}
+      class_names.each do |fqn|
+        parts = fqn.split('.')
+        class_name = parts.pop
+        # インナークラスの拡張はその持ち主のクラスの責任とします。
+        # JVM上でも同じタイミングでロードされるし。
+        next if class_name.include?('$')
+        package = parts.join('.')
+        @class_to_package[class_name] = @class_to_package.key?(class_name) ?
+          [@class_to_package[class_name], package] : package
       end
-      @ruby_module_holder
     end
-    
+   
     def extended(object)
       mod = Module.new do
         def const_missing(java_class_name)
           @loader.const_get(java_class_name)
+        rescue
+          super
         end
       end
       object.instance_variable_set("@loader", self)
@@ -48,56 +65,60 @@ module Rubeus
     
     def const_missing(java_class_name)
       if autoload?(java_class_name)
-        feature = autolodings.delete(java_class_name.to_s) 
+        feature = autolodings.delete(java_class_name.to_s)
         require(feature)
         return const_get(java_class_name)
       end
-      if java_class_name.to_s == @ruby_module_holder_name.to_s
-        raise NameError, java_class_name
+      package = @class_to_package[java_class_name.to_s]
+      raise NameError, java_class_name unless package
+      if package.is_a?(Array)
+        raise NameError, "cannot specified package name for #{java_class_name}: #{package.join(', ')}"
       end
-      if java_class_name.to_s.include?('::')
-        names = java_class_name.to_s.split('::', 2)
-        package = names.first
-        mod = ComponentLoader.new(
-          [@java_package, package.underscore].join('.'),
-          File.join(@ruby_module_path, package.underscore),
-          @base_path)
-        self.const_set(package.camelize, mod)
-        mod.const_get(names.last)
-      else
-        begin
-          require(File.join(@ruby_module_path, java_class_name.to_s.underscore))
-        rescue LoadError => e
-          # puts "warning: #{e}"
+      java_fqn = package.empty? ? java_class_name.to_s : "#{package}.#{java_class_name.to_s}"
+      extension = extension_for(java_fqn)
+      if extension
+        JavaUtilities.extend_proxy(java_fqn) do
+          include extension
         end
-        java_fqn = to_java_fqn(java_class_name)
-        extension = nil
-        begin
-          extension = self.ruby_module_holder.const_get(java_class_name)
-        rescue
-          # puts "warning: #{$!.inspect}"
-        end
-        if extension
-          JavaUtilities.extend_proxy(java_fqn) do
-            include extension 
-          end
-        end
-        result = instance_eval(java_fqn)
-        self.const_set(java_class_name, result)
-        result
       end
+      result = instance_eval(java_fqn)
+      self.const_set(java_class_name, result)
+      result
     rescue
       puts $!
       puts $!.backtrace.join("\n  ")
       super
     end
 
-    def to_java_fqn(java_class_name)
-      "#{java_package}.#{java_class_name}"
-    end
-    
     def depend_on(*java_class_names)
       java_class_names.each{|java_class_name| self.const_get(java_class_name)}
     end
+
+    def extension_path_for(java_fqn_or_parts)
+      parts = java_fqn_or_parts.is_a?(Array) ? java_fqn_or_parts : java_fqn_or_parts.split('.')
+      "rubeus/extensions/%s" % parts.map{|part|part.underscore}.join('/')
+    end
+
+    def extension_class_name_for(java_fqn_or_parts)
+      parts = java_fqn_or_parts.is_a?(Array) ? java_fqn_or_parts : java_fqn_or_parts.split('.')
+      "Rubeus::Extensions::%s" % parts.map{|part|part.camelize}.join('::')
+    end
+
+    def extension_for(java_fqn)
+      parts = java_fqn.split('.')
+      extension_path = extension_path_for(parts)
+      begin
+        require(extension_path)
+      rescue LoadError => e
+        # puts "warning: #{e}"
+        return nil
+      end
+      begin
+        instance_eval(extension_class_name_for(parts))
+      rescue NameError => e
+        # puts "warning: #{e}"
+        return nil
+      end
+    end
   end
 end

data/lib/rubeus/extensions.rb

@@ -0,0 +1,6 @@
+module Rubeus
+  module Extensions
+    autoload :Java, 'rubeus/extensions/java'
+    autoload :Javax, 'rubeus/extensions/javax'
+  end
+end

data/lib/rubeus/extensions/java.rb

@@ -0,0 +1,5 @@
+module Rubeus::Extensions
+  module Java
+    autoload :Awt, 'rubeus/extensions/java/awt'
+  end
+end

data/lib/rubeus/extensions/java/awt.rb

@@ -0,0 +1,4 @@
+module Rubeus::Extensions::Java
+  module Awt
+  end
+end

data/lib/rubeus/{awt/extensions → extensions/java/awt}/component.rb

@@ -1,6 +1,6 @@
 Rubeus::Awt.depend_on("Dimension")
 
-module Rubeus::Awt::Extensions
+module Rubeus::Extensions::Java::Awt
   module Component
     def self.included(base)
       base.module_eval do

data/lib/rubeus/{awt/extensions → extensions/java/awt}/container.rb

@@ -1,6 +1,6 @@
 Rubeus::Awt.depend_on("Component")
 
-module Rubeus::Awt::Extensions
+module Rubeus::Extensions::Java::Awt
   module Container
   end
 end

data/lib/rubeus/{awt/extensions → extensions/java/awt}/dimension.rb

@@ -1,4 +1,4 @@
-module Rubeus::Awt::Extensions
+module Rubeus::Extensions::Java::Awt
   module Dimension
     def self.included(base)
       base.extend ClassMethods
@@ -21,4 +21,3 @@ module Rubeus::Awt::Extensions
     end
   end
 end
-

data/lib/rubeus/extensions/javax.rb

@@ -0,0 +1,5 @@
+module Rubeus::Extensions
+  module Javax
+    autoload :Swing, 'rubeus/extensions/javax/swing'
+  end
+end

data/lib/rubeus/extensions/javax/swing.rb

@@ -0,0 +1,4 @@
+module Rubeus::Extensions::Javax
+  module Swing
+  end
+end

data/lib/rubeus/{swing/extensions → extensions/javax/swing}/box_layout.rb

@@ -1,4 +1,4 @@
-module Rubeus::Swing::Extensions
+module Rubeus::Extensions::Javax::Swing
   module BoxLayout
     def self.included(base)
       base.extend(ClassMethods)

data/lib/rubeus/{swing/extensions → extensions/javax/swing}/j_applet.rb

@@ -1,4 +1,4 @@
-module Rubeus::Swing::Extensions
+module Rubeus::Extensions::Javax::Swing
   module JApplet
     def self.included(klass)
       klass.perform_as_container

data/lib/rubeus/{swing/extensions → extensions/javax/swing}/j_component.rb

@@ -1,6 +1,6 @@
 Rubeus::Awt.depend_on("Container")
 
-module Rubeus::Swing::Extensions
+module Rubeus::Extensions::Javax::Swing
   module JComponent
     
     def self.included(base)

data/lib/rubeus/{swing/extensions → extensions/javax/swing}/j_frame.rb

@@ -1,7 +1,7 @@
 Rubeus::Awt.depend_on('Container', 'Window', 'Frame')
 Rubeus::Swing.depend_on('JPanel')
 
-module Rubeus::Swing::Extensions
+module Rubeus::Extensions::Javax::Swing
   module JFrame
     def self.included(base)
       base.perform_as_container

data/lib/rubeus/{swing/extensions → extensions/javax/swing}/j_panel.rb

@@ -1,6 +1,6 @@
 Rubeus::Swing.depend_on("JComponent")
 
-module Rubeus::Swing::Extensions
+module Rubeus::Extensions::Javax::Swing
   module JPanel
     def self.included(base)
       base.perform_as_container

data/lib/rubeus/swing.rb

@@ -1,8 +1,14 @@
 require "rubeus/component_loader"
+require "rubeus/awt"
 
 module Rubeus
-  extensions_path = File.join(File.dirname(__FILE__), "swing", "extensions")
-  Swing = ComponentLoader.new("javax.swing", extensions_path) do
+  Swing = ComponentLoader.new("javax.swing") do
+    class_to_package.update(
+      # $JAVA_HOME/lib/classlistにないものリスト
+      'JTextPane' => 'javax.swing',
+      'RTFEditorKit' => 'javax.swing.text.rtf'
+      )
+    class_to_package['DefaultStyledDocument'] ||= 'javax.swing.text' # Windowsにない
     
     def self.irb
       Object.send(:extend, self)
@@ -10,12 +16,6 @@ module Rubeus
   end
 end
 
-require "rubeus/swing/extensions"
-
-require "rubeus/awt/attributes"
-require "rubeus/awt/nestable"
-require "rubeus/awt/event"
-
 
 =begin
 import "javax.swing.JFrame"

metadata

@@ -3,37 +3,39 @@ extensions: []
 homepage: http://code.google.com/p/rubeus/
 executables: []
 version: !ruby/object:Gem::Version
-  version: 0.0.2
+  version: 0.0.3
 post_install_message: 
 date: 2008-06-28 15:00:00 +00:00
 files: 
-- lib/rubeus
 - lib/rubeus.rb
-- lib/rubeus/awt
 - lib/rubeus/awt.rb
 - lib/rubeus/component_loader.rb
-- lib/rubeus/swing
+- lib/rubeus/extensions.rb
 - lib/rubeus/swing.rb
 - lib/rubeus/awt/attributes.rb
 - lib/rubeus/awt/event.rb
-- lib/rubeus/awt/extensions
-- lib/rubeus/awt/extensions.rb
 - lib/rubeus/awt/nestable.rb
 - lib/rubeus/awt/setters.rb
-- lib/rubeus/awt/extensions/component.rb
-- lib/rubeus/awt/extensions/container.rb
-- lib/rubeus/awt/extensions/dimension.rb
-- lib/rubeus/swing/extensions
-- lib/rubeus/swing/extensions.rb
-- lib/rubeus/swing/extensions/box_layout.rb
-- lib/rubeus/swing/extensions/j_applet.rb
-- lib/rubeus/swing/extensions/j_component.rb
-- lib/rubeus/swing/extensions/j_frame.rb
-- lib/rubeus/swing/extensions/j_panel.rb
-- lib/rubeus/swing/extensions/j_scroll_pane.rb
-- lib/rubeus/swing/extensions/j_split_pane.rb
-- lib/rubeus/swing/extensions/j_text_field.rb
-- lib/rubeus/swing/extensions/j_window.rb
+- lib/rubeus/extensions/java.rb
+- lib/rubeus/extensions/javax.rb
+- lib/rubeus/extensions/java/awt.rb
+- lib/rubeus/extensions/java/awt/component.rb
+- lib/rubeus/extensions/java/awt/container.rb
+- lib/rubeus/extensions/java/awt/dimension.rb
+- lib/rubeus/extensions/javax/swing.rb
+- lib/rubeus/extensions/javax/swing/box_layout.rb
+- lib/rubeus/extensions/javax/swing/j_applet.rb
+- lib/rubeus/extensions/javax/swing/j_component.rb
+- lib/rubeus/extensions/javax/swing/j_frame.rb
+- lib/rubeus/extensions/javax/swing/j_panel.rb
+- lib/rubeus/extensions/javax/swing/j_scroll_pane.rb
+- lib/rubeus/extensions/javax/swing/j_split_pane.rb
+- lib/rubeus/extensions/javax/swing/j_text_field.rb
+- lib/rubeus/extensions/javax/swing/j_window.rb
+- examples/notepad.rb
+- examples/rubeus_swing_example01.rb
+- examples/rubeus_swing_example01_with_class.rb
+- examples/notepad.rtf
 rubygems_version: 1.1.1
 rdoc_options: []
 signing_key: 

data/lib/rubeus/awt/extensions.rb

@@ -1,4 +0,0 @@
-module Rubeus::Awt
-  module Extensions
-  end
-end

data/lib/rubeus/swing/extensions.rb

@@ -1,4 +0,0 @@
-module Rubeus::Swing
-  module Extensions
-  end
-end