rubeus 0.0.4-java → 0.0.5-java

data/bin/jirb_rubeus

@@ -0,0 +1,73 @@
+#!/usr/bin/env jruby
+#
+# IRB in swing
+#
+# Damian Steer (pldms@mac.com)
+
+require "rubygems"
+require "rubeus"
+Rubeus::Swing.irb
+
+require 'jruby'
+require 'irb'
+require 'irb/completion'
+
+# import java.awt.Color
+# import java.awt.Font
+# import javax.swing.JFrame
+# import java.awt.EventQueue
+
+# Try to find preferred font family, use otherwise -- err --  otherwise
+def find_font(otherwise, style, size, *families)
+  avail_families = java.awt.GraphicsEnvironment.local_graphics_environment.available_font_family_names
+  fontname = families.find(proc {otherwise}) { |name| avail_families.include? name }
+  Font.new(fontname, style, size)
+end
+
+text = javax.swing.JTextPane.new
+text.font = find_font('Monospaced', Font::PLAIN, 14, 'Monaco', 'Andale Mono')
+text.margin = java.awt.Insets.new(8,8,8,8)
+text.caret_color = Color.new(0xa4, 0x00, 0x00)
+text.background = Color.new(0xf2, 0xf2, 0xf2)
+text.foreground = Color.new(0xa4, 0x00, 0x00)
+
+pane = javax.swing.JScrollPane.new
+pane.viewport_view = text
+frame = JFrame.new('JRuby IRB Console (tab will autocomplete)')
+frame.default_close_operation = JFrame::EXIT_ON_CLOSE
+frame.set_size(700, 600)
+frame.content_pane.add(pane)
+tar = org.jruby.demo.TextAreaReadline.new(text,
+      " Welcome to the JRuby IRB Console [#{JRUBY_VERSION}] \n\n")
+JRuby.objectspace = true # useful for code completion
+tar.hook_into_runtime_with_streams(JRuby.runtime)
+
+# We need to show the frame on EDT,
+# to avoid deadlocks.
+
+# Once JRUBY-2449 is fixed,
+# the code will me simplifed.
+class FrameBringer
+  include java.lang.Runnable
+  def initialize(frame)
+    @frame = frame
+  end
+  def run
+    @frame.visible = true
+  end
+end
+
+EventQueue.invoke_later(FrameBringer.new(frame))
+
+# From vanilla IRB
+if __FILE__ == $0
+  IRB.start(__FILE__)
+else
+  # check -e option
+  if /^-e$/ =~ $0
+    IRB.start(__FILE__)
+  else
+    IRB.setup(__FILE__)
+  end
+end
+frame.dispose

data/bin/jirb_rubeus.bat

@@ -0,0 +1,6 @@
+@ECHO OFF
+IF NOT "%~f0" == "~f0" GOTO :WinNT
+@"jruby.bat" -S "jirb_rubeus2" %1 %2 %3 %4 %5 %6 %7 %8 %9
+GOTO :EOF
+:WinNT
+@"jruby.bat" "%~dpn0" %*

data/examples/nyanco_viewer/nyanco_disp_label.rb

@@ -1,31 +1,31 @@
-# �ɂ�񂱂т�[���[���番������
-# �h���b�O&�h���b�v�Ή��̉摜�\���p���x��
-#
-# 2008/6/22 Junya Murabe (Lancard.com)
-#
-
-include Java
-
-module DD
-  #implements interface
-  include java.awt.dnd.DropTargetListener
-  def dragEnter(e)
-    e.accept_drag java.awt.dnd.DnDConstants::ACTION_COPY
-  end
-
-  def dragExit(e); end
-  def dragOver(e); end
-  def drop(e); end
-  def dropActionChanged(e); end
-
-end
-
-class NyancoDispLabel < javax.swing.JLabel
-  include DD
-  def drop(e)
-    e.accept_drop java.awt.dnd.DnDConstants::ACTION_COPY_OR_MOVE
-    java_file_list_flavor = java.awt.datatransfer.DataFlavor.javaFileListFlavor
-    image_path = e.transferable.get_transfer_data(java_file_list_flavor)[0].absolute_path
-    self.icon = javax.swing.ImageIcon.new(image_path)
-  end
-end
+# にゃんこびゅーあーから分離した
+# ドラッグ&ドロップ対応の画像表示用ラベル
+#
+# 2008/6/22 Junya Murabe (Lancard.com)
+#
+
+include Java
+
+module DD
+  #implements interface
+  include java.awt.dnd.DropTargetListener
+  def dragEnter(e)
+    e.accept_drag java.awt.dnd.DnDConstants::ACTION_COPY
+  end
+
+  def dragExit(e); end
+  def dragOver(e); end
+  def drop(e); end
+  def dropActionChanged(e); end
+
+end
+
+class NyancoDispLabel < javax.swing.JLabel
+  include DD
+  def drop(e)
+    e.accept_drop java.awt.dnd.DnDConstants::ACTION_COPY_OR_MOVE
+    java_file_list_flavor = java.awt.datatransfer.DataFlavor.javaFileListFlavor
+    image_path = e.transferable.get_transfer_data(java_file_list_flavor)[0].absolute_path
+    self.icon = javax.swing.ImageIcon.new(image_path)
+  end
+end

data/examples/nyanco_viewer/nyanco_viewer_rubeus.rb

@@ -1,39 +1,40 @@
-#!/usr/bin/env jruby
-#
-# にゃんこびゅーあー Rubeus 0.0.3
-#
-# 2008/7/3 Junya Murabe (Lancard.com)
-#
-
-include Java
-
-require 'rubygems'
-gem 'rubeus', '=0.0.4'
-require 'rubeus'
-Rubeus::Swing.irb
-
-JFrame.new('にゃんこびゅーあー Rubeus') do |frame|
-  frame.set_size 400, 300
-  frame.default_close_operation = JFrame::EXIT_ON_CLOSE
+#!/usr/bin/env jruby
+#
+# にゃんこびゅーあー Rubeus
+#
+# 2008/7/7 Junya Murabe (Lancard.com)
+#
+
+include Java
+
+# $LOAD_PATH << File.join(File.dirname(__FILE__), '..', '..', 'lib')
+require 'rubygems'
+
+require 'rubeus'
+Rubeus::Swing.irb
+require File.join(File.dirname(__FILE__), 'nyanco_disp_label')
+
+JFrame.new('にゃんこびゅーあー Rubeus ' + Rubeus::VERSION) do |frame|
+  frame.set_size 400, 300
+  frame.default_close_operation = JFrame::EXIT_ON_CLOSE
   frame.icon_image = ImageIcon.new(File.join(File.dirname(__FILE__), 'nekobean_s.png')).image
-
-  JPanel.new do |base_pane|
-    base_pane.layout = java.awt.BorderLayout.new
-    JScrollPane.new do |sp|
-      layout = java.awt.FlowLayout.new
-      layout.alignment = java.awt.FlowLayout::LEFT
-      sp.viewport.layout = layout
-
-      require File.join(File.dirname(__FILE__), 'nyanco_disp_label')
-      lb = NyancoDispLabel.new
-
-      #ドラッグ&ドロップを有効に
-      [lb, sp].each do |dt|
-        java.awt.dnd.DropTarget.new dt, lb
-        dt.tool_tip_text = 'にゃんこの画像をここにポイッ♪'
-      end
-    end
-  end
-
-  frame.visible = true
-end
+
+  JPanel.new do |base_pane|
+    base_pane.layout = BorderLayout.new
+    JScrollPane.new do |sp|
+      layout = FlowLayout.new
+      layout.alignment = FlowLayout::LEFT
+      sp.viewport.layout = layout
+
+      lb = NyancoDispLabel.new
+
+      #ドラッグ&ドロップを有効に
+      [lb, sp].each do |dt|
+        DropTarget.new dt, lb
+        dt.tool_tip_text = 'にゃんこの画像をここにポイッ♪'
+      end
+    end
+  end
+
+  frame.visible = true
+end

data/lib/rubeus.rb

@@ -4,9 +4,12 @@ gem "activesupport", ">=2.0.2"
 require "active_support/core_ext/string"
 
 module Rubeus
-  VERSION = "0.0.4"
+  VERSION = "0.0.5"
   autoload :Awt, "rubeus/awt"
   autoload :Swing, "rubeus/swing"
   # autoload :Jdbc, "rubeus/jdbc"
 end
-require "rubeus/extensions"
+
+unless File.basename($PROGRAM_NAME) == 'gem' and ARGV.first == 'build'
+  require "rubeus/extensions"
+end

data/lib/rubeus/component_loader.rb

@@ -126,8 +126,12 @@ module Rubeus
       java_fqn = "#{@package_name}#{method.to_s}"
       extension = Rubeus::Extensions.find_for(java_fqn)
       if extension
-        JavaUtilities.extend_proxy(java_fqn) do
-          include extension
+        @extension_applied ||= [] 
+        unless @extension_applied.include?(java_fqn)
+          JavaUtilities.extend_proxy(java_fqn) do
+            include extension
+          end
+          @extension_applied << java_fqn
         end
       end
       result = method_missing_without_rubeus(method, *args)

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

@@ -1,15 +1,33 @@
-JavaUtilities.extend_proxy('javax.swing.JSplitPane') do
-  perform_as_container
+module Rubeus::Extensions::Javax::Swing
+  module JSplitPane
+    def self.included(base)
+      base.perform_as_container
+      base.extend(ClassMethods)
+      base.instance_eval do
+        alias :new_without_rubeus :new
+        alias :new :new_with_rubeus
+      end
+    end
+    
+    module ClassMethods
+      def new_with_rubeus(new_orientation, *args, &block)
+        if new_orientation.is_a?(Symbol)
+          new_orientation = const_get(new_orientation)
+        end
+        new_without_rubeus(new_orientation, *args, &block)
+      end
 
-  def self.add_new_component_to(object, &block)
-    Rubeus::Awt::Nestable::Context.add_new_component_to(object, :append_component, &block)
-  end
-  
-  def append_component(component)
-    append_method =
-      (self.orientation == javax.swing.JSplitPane::VERTICAL_SPLIT) ?
-        (top_component ? :set_bottom_component : :set_top_component) :
-        (left_component ? :set_right_component : :set_left_component)
-    send(append_method, component)
+      def add_new_component_to(object, &block)
+        Rubeus::Awt::Nestable::Context.add_new_component_to(object, :append_component, &block)
+      end
+    end
+
+    def append_component(component)
+      append_method =
+        (self.orientation == javax.swing.JSplitPane::VERTICAL_SPLIT) ?
+          (top_component ? :set_bottom_component : :set_top_component) :
+          (left_component ? :set_right_component : :set_left_component)
+      send(append_method, component)
+    end
   end
 end

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

@@ -0,0 +1,52 @@
+Rubeus::Swing.depend_on('JComponent')
+Rubeus::Swing.depend_on('DefaultTableModel')
+require 'delegate'
+
+module Rubeus::Extensions::Javax::Swing
+  module JTable
+    def self.included(base)
+      base.default_attributes = {
+        :preferred_size => [200, 150]
+      }
+      base.module_eval do
+        alias_method :get_model_without_rubeus, :get_model
+        alias_method :get_model, :get_model_with_rubeus
+        alias_method :model, :get_model
+
+        alias_method :set_model_without_rubeus, :set_model
+        alias_method :set_model, :set_model_with_rubeus
+        alias_method :model=, :set_model
+      end
+    end
+    
+    def get_model_with_rubeus
+      @model || get_model_without_rubeus
+    end
+    
+    def set_model_with_rubeus(model, *args)
+      unless model.is_a?(javax.swing.table.TableModel)
+        model = javax.swing.table.DefaultTableModel.new(model, *args)
+      end
+      delegator = DelegatableTableModel.new(model)
+      set_model_without_rubeus(@model = delegator)
+    end
+
+    class DelegatableTableModel
+      # include javax.swing.table.TableModel
+      
+      attr_accessor :readonly
+      
+      def initialize(source)
+        @source = source
+      end
+
+      def method_missing(method, *args, &block)
+        @source.__send__(method, *args, &block)
+      end
+      
+      def isCellEditable(row, col)
+        !readonly
+      end
+    end
+  end
+end

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

@@ -0,0 +1,90 @@
+Rubeus::Swing.depend_on('AbstractTableModel')
+
+module Rubeus::Extensions::Javax::Swing::Table
+  module DefaultTableModel
+    def self.included(base)
+      base.module_eval do
+        alias_method :add_row_without_rubeus, :add_row
+        alias_method :add_row, :add_row_with_rubeus
+        alias_method :insert_row_without_rubeus, :insert_row
+        alias_method :insert_row, :insert_row_with_rubeus
+      end
+      base.extend(ClassMethods)
+      base.instance_eval do 
+        alias :new_without_rubeus :new
+        alias :new :new_with_rubeus
+      end
+    end
+    
+    module ClassMethods
+      def vectorize_if_array(value)
+        value.is_a?(Array) ? java.util.Vector.new(value) : value
+      end
+
+      def new_with_rubeus(*args)
+        if args.length == 1
+          obj = args.first
+          if obj.is_a?(Array)
+            if obj.first.is_a?(Array)
+              data = vectorize_if_array(obj.map{|row| vectorize_if_array(row)})
+              column_names = vectorize_if_array((1..obj.first.size).entries)
+              return new_without_rubeus(data, column_names)
+            else
+              column_names = vectorize_if_array(obj)
+              return new_without_rubeus(column_names, 0)
+            end
+          elsif obj.is_a?(Hash)
+            options = obj
+            rows = options[:data] || options[:rows]
+            cols = options[:column_names] || options[:columns]
+            if rows.nil? or cols.nil?
+              raise ArgumentError, "DefaultTableModel needs (:data or :rows) and (:column_names or :columns) but options was #{options}"
+            end
+            data = vectorize_if_array(rows.map{|row| vectorize_if_array(row)})
+            column_names = vectorize_if_array(cols)
+            return new_without_rubeus(data, column_names)
+          end
+        elsif (args.length == 2) and (args.first.class.name == 'REXML::Document' and args.last.is_a?(Hash)) 
+          result = new_without_rubeus
+          result.load_from_xml(*args)
+          return result
+        end
+        return new_without_rubeus(*args) 
+      end
+    end
+    
+    def vectorize_if_array(value)
+      self.class.vectorize_if_array(value)
+    end
+    
+    def add_row_with_rubeus(row)
+      add_row_without_rubeus(vectorize_if_array(row))
+    end
+    
+    def insert_row_with_rubeus(index, row)
+      insert_row_without_rubeus(index, vectorize_if_array(row))
+    end
+    
+    def load_from_xml(rexml_doc, options = {:refresh_columns => false})
+      row_path = options[:row_path]
+      col_paths = options[:column_paths]
+      if row_path.nil? 
+        raise ArgumentError, "require :row_path but options was #{options}"
+      end
+      unless col_paths
+        rexml_doc.elements.each(row_path) do |row|
+          col_paths = row.elements.map{|prop| prop.name}
+          break
+        end
+      end
+      if options[:refresh_columns]
+        self.column_count = 0
+        (options[:column_names] || col_paths).each{|col_name| add_column(col_name)}
+      end
+      self.row_count = 0
+      rexml_doc.elements.each(row_path) do |row|
+        add_row(col_paths.map{|col_path| row.elements[col_path].text})
+      end
+    end
+  end
+end

data/lib/rubeus/swing.rb

@@ -6,7 +6,8 @@ module Rubeus
     class_to_package.update(
       # $JAVA_HOME/lib/classlistにないものリスト
       'JTextPane' => 'javax.swing',
-      'RTFEditorKit' => 'javax.swing.text.rtf'
+      'RTFEditorKit' => 'javax.swing.text.rtf',
+      'DefaultTableModel' => 'javax.swing.table'
       )
     class_to_package['DefaultStyledDocument'] ||= 'javax.swing.text' # Windowsにない
     

metadata

@@ -1,12 +1,16 @@
 --- !ruby/object:Gem::Specification
 extensions: []
 homepage: http://code.google.com/p/rubeus/
-executables: []
+executables: 
+- jirb_rubeus
+- jirb_rubeus.bat
 version: !ruby/object:Gem::Version
-  version: 0.0.4
+  version: 0.0.5
 post_install_message: 
-date: 2008-07-07 15:00:00 +00:00
+date: 2008-07-28 15:00:00 +00:00
 files: 
+- bin/jirb_rubeus
+- bin/jirb_rubeus.bat
 - lib/rubeus.rb
 - lib/rubeus/awt.rb
 - lib/rubeus/component_loader.rb
@@ -37,8 +41,10 @@ files:
 - 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_table.rb
 - lib/rubeus/extensions/javax/swing/j_text_field.rb
 - lib/rubeus/extensions/javax/swing/j_window.rb
+- lib/rubeus/extensions/javax/swing/table/default_table_model.rb
 - lib/rubeus/jdbc/closeable_resource.rb
 - lib/rubeus/jdbc/column.rb
 - examples/notepad.rb
@@ -48,7 +54,7 @@ files:
 - examples/nyanco_viewer/nyanco_viewer_rubeus.rb
 - examples/notepad.rtf
 - examples/nyanco_viewer/nekobean_s.png
-rubygems_version: 1.1.1
+rubygems_version: 1.2.0
 rdoc_options: []
 signing_key: 
 cert_chain: []
@@ -56,7 +62,7 @@ name: rubeus
 has_rdoc: false
 platform: java
 summary: Rubeus provides you an easy access to Java objects from Ruby scripts on JRuby
-default_executable: 
+default_executable: jirb_rubeus
 bindir: bin
 required_rubygems_version: !ruby/object:Gem::Requirement
   version: 
@@ -76,6 +82,7 @@ specification_version: 2
 test_files: []
 dependencies: 
 - !ruby/object:Gem::Dependency
+  type: :runtime
   name: activesupport
   version_requirement: 
   version_requirements: !ruby/object:Gem::Requirement