rubeus 0.0.3-java → 0.0.4-java

data/examples/notepad.rb

@@ -1,7 +1,6 @@
 include Java
 
 require 'rubygems'
-gem 'rubeus'
 require 'rubeus'
 
 Rubeus::Swing.irb

data/examples/nyanco_viewer/nyanco_disp_label.rb

@@ -0,0 +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

data/examples/nyanco_viewer/nyanco_viewer_rubeus.rb

@@ -0,0 +1,39 @@
+#!/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
+  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

data/examples/rubeus_swing_example01.rb

@@ -1,32 +1,21 @@
 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 = ''

data/examples/rubeus_swing_example01_with_class.rb

@@ -1,34 +1,23 @@
 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 = ''

data/lib/rubeus/awt/attributes.rb

@@ -18,6 +18,7 @@ module Rubeus::Awt
         else
           attributes.each do |attr, value|
             begin
+              value = (self.const_get(value) rescue value) if value.is_a?(Symbol)
               result.send("#{attr.to_s}=", value)
             rescue
               raise ArgumentError, "Failed setting #{value.inspect} to #{attr.inspect} cause of #{$!.to_s}"

data/lib/rubeus/awt.rb

@@ -1,7 +1,12 @@
 require "rubeus/component_loader"
 
 module Rubeus
-  Awt = ComponentLoader.new("java.awt")
+  Awt = ComponentLoader.new("java.awt") do
+    class_to_package.update(
+      # $JAVA_HOME/lib/classlistにないものリスト
+      'DnDConstants' => 'java.awt.dnd'
+      )
+  end
 end
 
 require "rubeus/awt/attributes"

data/lib/rubeus/component_loader.rb

@@ -19,13 +19,16 @@ module Rubeus
     attr_reader :class_to_package
 
     def initialize(java_package, &block)
-      @java_package = java_package
-      build_class_to_package_table
+      build_class_to_package_table(java_package)
+      java_package = JavaUtilities.get_package_module_dot_format(java_package)
+      class << java_package
+        include Rubeus::JavaPackage
+      end
       super(&block)
     end
     
-    def build_class_to_package_table
-      class_names = ::Rubeus::ComponentLoader.class_names(@java_package)
+    def build_class_to_package_table(java_package)
+      class_names = ::Rubeus::ComponentLoader.class_names(java_package)
       @class_to_package = {}
       class_names.each do |fqn|
         parts = fqn.split('.')
@@ -38,29 +41,35 @@ module Rubeus
           [@class_to_package[class_name], package] : package
       end
     end
+    
+    def included(mod)
+      mod.extend(self)
+    end
    
     def extended(object)
-      mod = Module.new do
-        def const_missing(java_class_name)
-          @loader.const_get(java_class_name)
+      class_name_for_method = self.name.underscore.gsub('/', '_')
+      const_missing_with = "const_missing_with_#{class_name_for_method}"
+      const_missing_without = "const_missing_without_#{class_name_for_method}"
+      return if object.singleton_methods.include?(const_missing_with)
+      loader_name = "@loader_#{class_name_for_method}".to_sym
+      mod = Module.new 
+      mod.send(:define_method, const_missing_with) do |const_name|
+        begin
+          instance_variable_get(loader_name).const_get(const_name)
         rescue
-          super
+          send(const_missing_without, const_name)
         end
       end
-      object.instance_variable_set("@loader", self)
       object.extend(mod)
+      object.instance_variable_set(loader_name, self)
+      object.instance_eval <<-EOS
+        alias :#{const_missing_without} :const_missing
+        alias :const_missing :#{const_missing_with}
+      EOS
     end
-    
-    def autolodings
-      @autolodings ||= {}
-    end
-    
-    def autoload(const_name, feature = nil)
-      autolodings[const_name.to_s] = feature ||"#{self.name}::#{java_class_name.to_s}".underscore
-    end
-    
-    def autoload?(const_name)
-      autolodings[const_name.to_s]
+
+    def extend_with(mod = Object)
+      mod.send(:extend, self)
     end
     
     def const_missing(java_class_name)
@@ -75,12 +84,6 @@ module Rubeus
         raise NameError, "cannot specified package name for #{java_class_name}: #{package.join(', ')}"
       end
       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
-      end
       result = instance_eval(java_fqn)
       self.const_set(java_class_name, result)
       result
@@ -90,35 +93,54 @@ module Rubeus
       super
     end
 
+    def autolodings
+      @autolodings ||= {}
+    end
+    
+    def autoload(const_name, feature = nil)
+      autolodings[const_name.to_s] = feature ||"#{self.name}::#{java_class_name.to_s}".underscore
+    end
+    
+    def autoload?(const_name)
+      autolodings[const_name.to_s]
+    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
+  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('::')
+  module JavaPackage
+    def self.included(object)
+      raise "JavaPackage must be extended by a Module" unless object.is_a?(Module)
+      object.module_eval do
+        alias :method_missing_without_rubeus :method_missing
+        alias :method_missing :method_missing_with_rubeus
+        alias :const_missing_without_rubeus :const_missing
+        alias :const_missing :const_missing_with_rubeus
+      end
     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
+    def method_missing_with_rubeus(method, *args)
+      java_fqn = "#{@package_name}#{method.to_s}"
+      extension = Rubeus::Extensions.find_for(java_fqn)
+      if extension
+        JavaUtilities.extend_proxy(java_fqn) do
+          include extension
+        end
       end
-      begin
-        instance_eval(extension_class_name_for(parts))
-      rescue NameError => e
-        # puts "warning: #{e}"
-        return nil
+      result = method_missing_without_rubeus(method, *args)
+      class << result
+        include ::Rubeus::JavaPackage
       end
+      result
+    end
+
+    def const_missing_with_rubeus(const_name)
+      result = const_missing_without_rubeus(const_name)
+      puts("#{self.name}.const_missing(#{const_name.inspect}) => #{result.inspect}")
+      result
     end
   end
 end

data/lib/rubeus/extensions/java/sql/connection.rb

@@ -0,0 +1,13 @@
+module Rubeus::Extensions::Java::Sql
+  module Connection
+    include Rubeus::Jdbc::CloseableResource
+
+    def statement(*args, &block)
+      with_close(create_statement(*args), &block)
+    end
+
+    def query(sql, &block)
+      statement{|st| st.query(sql, &block)}
+    end
+  end
+end

data/lib/rubeus/extensions/java/sql/driver_manager.rb

@@ -0,0 +1,9 @@
+module Rubeus::Extensions::Java::Sql
+  module DriverManager
+    extend Rubeus::Jdbc::CloseableResource
+
+    def connect(url, user, password, &block)
+      with_close(get_connection(url, user, password), &block)
+    end
+  end
+end

data/lib/rubeus/extensions/java/sql/result_set.rb

@@ -0,0 +1,30 @@
+module Rubeus::Extensions::Java::Sql
+  module ResultSet
+    include Enumerable
+    
+    def each(&block)
+      return unless block_given?
+      yield(self) while self.next
+    end
+    
+    def each_array
+      each{|rs| yield(rs.to_a)}
+    end
+    
+    def each_hash
+      each{|rs| yield(rs.to_hash)}
+    end
+    
+    def to_a(default_value = nil)
+      meta_data.map{|i| get_object(i) || default_value}
+    end
+    
+    def to_hash
+      column_names = meta_data.column_names
+      meta_data.inject({}) do |dest, i| 
+        dest[column_names[i]] = get_object(i)
+        dest
+      end
+    end
+  end
+end

data/lib/rubeus/extensions/java/sql/result_set_meta_data.rb

@@ -0,0 +1,36 @@
+module Rubeus::Extensions::Java::Sql
+  module ResultSetMetaData
+    include Enumerable
+    
+    def each(&block)
+      return unless block_given?
+      @column_count ||= get_column_count
+      (1..@column_count).each(&block)
+    end
+    
+    def columns
+      @columns ||= build_columns
+    end
+    
+    def column_names
+      @column_names ||= columns.inject({}) do |dest, column|
+        dest[column.index] = column.name
+        dest
+      end
+    end
+    
+    private
+    def build_columns
+      result = []
+      attrs = Rubeus::Jdbc::Column::ATTRIBUTES
+      each do |i|
+        column_hash = attrs.inject({}) do |dest, attr|
+          dest[attr] = send(attr, i)
+          dest
+        end
+        result << Rubeus::Jdbc::Column.new(i,column_hash)
+      end
+      result
+    end
+  end
+end

data/lib/rubeus/extensions/java/sql/statement.rb

@@ -0,0 +1,9 @@
+module Rubeus::Extensions::Java::Sql
+  module Statement
+    include Rubeus::Jdbc::CloseableResource
+
+    def query(sql, &block)
+      with_close(execute_query(sql), &block)
+    end
+  end
+end

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

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

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

@@ -7,7 +7,7 @@ module Rubeus::Extensions::Javax::Swing
       base.perform_as_container
       base.default_attributes = {
         :size => [400, 300],
-        :default_close_operation => javax.swing.JFrame::EXIT_ON_CLOSE
+        :default_close_operation => :EXIT_ON_CLOSE
       }
       if ENV_JAVA["java.specification.version"] == "1.6"
         base.module_eval do

data/lib/rubeus/extensions.rb

@@ -2,5 +2,34 @@ module Rubeus
   module Extensions
     autoload :Java, 'rubeus/extensions/java'
     autoload :Javax, 'rubeus/extensions/javax'
+
+    class << self
+      def 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 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 find_for(java_fqn)
+        parts = java_fqn.split('.')
+        extension_path = path_for(parts)
+        begin
+          require(extension_path)
+        rescue LoadError => e
+          # puts "warning: #{e}"
+          return nil
+        end
+        begin
+          instance_eval(class_name_for(parts))
+        rescue NameError => e
+          # puts "warning: #{e}"
+          return nil
+        end
+      end
+    end
   end
 end

data/lib/rubeus/jdbc/closeable_resource.rb

@@ -0,0 +1,16 @@
+module Rubeus::Jdbc
+  module CloseableResource
+    def with_close(resource)
+      if block_given?
+        begin
+          yield(resource) 
+        ensure
+          resource.close
+        end
+        return nil
+      else
+        resource
+      end
+    end
+  end
+end

data/lib/rubeus/jdbc/column.rb

@@ -0,0 +1,53 @@
+module Rubeus::Jdbc
+  # ResultSetMetaDataから生成されます
+  class Column
+    ATTRIBUTES = [
+      :column_index       , # 
+      :catalog_name       , # String  # 指定された列のテーブルのカタログ名を取得します。
+      :column_class_name  , # String  # Java クラスの完全指定された名前を返します。
+      :column_display_size, # int     # 指定された列の通常の最大幅を文字数で示します。
+      :column_label       , # String  # 印刷や表示に使用する、指定された列の推奨タイトルを取得します。
+      :column_name        , # String  # 指定された列の名前を取得します。
+      :column_type        , # int     # 指定された列の SQL 型を取得します。
+      :column_typeName    , # String  # 指定された列のデータベース固有の型名を取得します。
+      :precision          , # int     # 指定された列の 10 進桁数を取得します。
+      :scale              , # int     # 指定された列の小数点以下の桁数を取得します。
+      :schema_name        , # String  # 指定された列のテーブルのスキーマを取得します。
+      :table_name         , # String  # 指定された列のテーブル名を取得します。
+      :auto_increment     , # boolean # 指定された列が自動的に番号付けされて読み取り専用として扱われるかどうかを示します。
+      :case_sensitive     , # boolean # 列の大文字と小文字が区別されるかどうかを示します。
+      :currency           , # boolean # 指定された列がキャッシュの値かどうかを示します。
+      :definitely_writable, # boolean # 指定された列の書き込みが必ず成功するかどうかを示します。
+      :nullable           , # int     # 指定された列に NULL をセットできるかどうかを示します。
+      :read_only          , # boolean # 指定された列が絶対的に書き込み可能でないかどうかを示します。
+      :searchable         , # boolean # 指定された列を where 節で使用できるかどうかを示します。
+      :signed             , # boolean # 指定された列の値が符号付き数値かどうかを示します。
+      :writable             # boolean # 指定された列への書き込みを成功させることができるかどうかを示します。
+    ]
+    attr_reader(*ATTRIBUTES)
+
+    alias_method :index       , :column_index
+    alias_method :class_name  , :column_class_name
+    alias_method :display_size, :column_display_size
+    alias_method :label       , :column_label
+    alias_method :name        , :column_name
+    alias_method :type_name   , :column_type_name
+    
+    alias_method :auto_increment?     , :auto_increment
+    alias_method :case_sensitive?     , :case_sensitive
+    alias_method :currency?           , :currency
+    alias_method :definitely_writable?, :definitely_writable
+    # alias_method :nullable?
+    alias_method :read_only?          , :read_only
+    alias_method :searchable?         , :searchable
+    alias_method :signed?             , :signed
+    alias_method :writable?           , :writable
+    
+    def initialize(index, attributes = {})
+      @index = index
+      attributes.each do |key, value|
+        instance_variable_set("@#{key.to_s}", value)
+      end
+    end
+  end
+end

data/lib/rubeus/jdbc.rb

@@ -0,0 +1,6 @@
+module Rubeus
+  module Jdbc
+    autoload :CloseableResource, 'rubeus/jdbc/closeable_resource'
+    autoload :Column, 'rubeus/jdbc/column'
+  end
+end

data/lib/rubeus/swing.rb

@@ -11,10 +11,12 @@ module Rubeus
     class_to_package['DefaultStyledDocument'] ||= 'javax.swing.text' # Windowsにない
     
     def self.irb
-      Object.send(:extend, self)
+      Rubeus::Awt.extend_with
+      self.extend_with
     end
   end
 end
+Rubeus::Swing.depend_on('JComponent')
 
 
 =begin

data/lib/rubeus.rb

@@ -4,8 +4,9 @@ gem "activesupport", ">=2.0.2"
 require "active_support/core_ext/string"
 
 module Rubeus
-  VERSION = "0.0.2"
-  autoload :Extensions, "rubeus/extensions"
+  VERSION = "0.0.4"
   autoload :Awt, "rubeus/awt"
   autoload :Swing, "rubeus/swing"
+  # autoload :Jdbc, "rubeus/jdbc"
 end
+require "rubeus/extensions"

metadata

@@ -3,14 +3,15 @@ extensions: []
 homepage: http://code.google.com/p/rubeus/
 executables: []
 version: !ruby/object:Gem::Version
-  version: 0.0.3
+  version: 0.0.4
 post_install_message: 
-date: 2008-06-28 15:00:00 +00:00
+date: 2008-07-07 15:00:00 +00:00
 files: 
 - lib/rubeus.rb
 - lib/rubeus/awt.rb
 - lib/rubeus/component_loader.rb
 - lib/rubeus/extensions.rb
+- lib/rubeus/jdbc.rb
 - lib/rubeus/swing.rb
 - lib/rubeus/awt/attributes.rb
 - lib/rubeus/awt/event.rb
@@ -19,9 +20,15 @@ files:
 - lib/rubeus/extensions/java.rb
 - lib/rubeus/extensions/javax.rb
 - lib/rubeus/extensions/java/awt.rb
+- lib/rubeus/extensions/java/sql.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/java/sql/connection.rb
+- lib/rubeus/extensions/java/sql/driver_manager.rb
+- lib/rubeus/extensions/java/sql/result_set.rb
+- lib/rubeus/extensions/java/sql/result_set_meta_data.rb
+- lib/rubeus/extensions/java/sql/statement.rb
 - lib/rubeus/extensions/javax/swing.rb
 - lib/rubeus/extensions/javax/swing/box_layout.rb
 - lib/rubeus/extensions/javax/swing/j_applet.rb
@@ -32,10 +39,15 @@ files:
 - 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
+- lib/rubeus/jdbc/closeable_resource.rb
+- lib/rubeus/jdbc/column.rb
 - examples/notepad.rb
 - examples/rubeus_swing_example01.rb
 - examples/rubeus_swing_example01_with_class.rb
+- examples/nyanco_viewer/nyanco_disp_label.rb
+- examples/nyanco_viewer/nyanco_viewer_rubeus.rb
 - examples/notepad.rtf
+- examples/nyanco_viewer/nekobean_s.png
 rubygems_version: 1.1.1
 rdoc_options: []
 signing_key: 
@@ -77,6 +89,7 @@ email: rubeus@googlegroups.com
 authors: 
 - Takeshi Akima
 extra_rdoc_files: []
-requirements: []
+requirements: 
+- none
 rubyforge_project: rubybizcommons
-autorequire: 
+autorequire: rubeus