force_bind 0.1.0

data/README

@@ -0,0 +1,34 @@
+= force_bind
+
+Adds UnboundMethod#force_bind to bind an unbound method to class (or any object of any type).
+It basically bypasses the argument type checking that #bind has.
+
+== Example
+
+Bind an instance method to its class (making it act like a class method):
+
+    class Foo
+      def bar
+        puts "I'm inside #{self}"
+      end
+    end
+    
+    Foo.new.bar
+    #=> "I'm inside #<Foo:0x123456>"
+    
+    meth = Foo.instance_method(:bar).force_bind(Foo)
+    meth.call
+    #=> "I'm inside Foo"
+    
+You can also use this to rebind the instance method of any object to any
+other object:
+
+    class A
+      def foo; self end
+    end
+    
+    class B; end
+    
+    meth = A.instance_method(:foo).force_bind(B.new)
+    meth.call
+    #=> #<B:0x123456>

data/Rakefile

@@ -0,0 +1,18 @@
+require 'rubygems'
+require 'rake/gempackagetask'
+
+WINDOWS = (PLATFORM =~ /win32|cygwin/ ? true : false) rescue false
+SUDO = WINDOWS ? '' : 'sudo'
+
+load 'force_bind.gemspec'
+Rake::GemPackageTask.new(SPEC) do |pkg|
+  pkg.gem_spec = SPEC
+  pkg.need_zip = true
+  pkg.need_tar = true
+end
+
+desc "Install the gem locally"
+task :install => :package do 
+  sh "#{SUDO} gem install pkg/#{SPEC.name}-#{SPEC.version}.gem --local"
+  sh "rm -rf pkg/#{SPEC.name}-#{SPEC.version}" unless ENV['KEEP_FILES']
+end

data/ext/extconf.rb

@@ -0,0 +1,5 @@
+require 'mkmf'
+$CPPFLAGS += " -DRUBY_19" if RUBY_VERSION =~ /1.9/
+ext = 'force_bind'
+dir_config(ext)
+create_makefile(ext)

data/ext/force_bind.c

@@ -0,0 +1,29 @@
+#include "ruby.h"
+
+struct METHOD {
+    VALUE oclass;
+    VALUE rclass;
+    VALUE recv;
+    ID id, oid;
+    struct RNode *body;
+};
+
+static VALUE
+umethod_force_bind(VALUE method, VALUE recv)
+{
+    struct METHOD *data, *bound;
+
+    Data_Get_Struct(method, struct METHOD, data);
+    method = Data_Make_Struct(rb_cMethod, struct METHOD, free, -1, bound);
+    *bound = *data;
+    bound->recv = recv;
+    bound->rclass = TYPE(recv) == T_CLASS ? RCLASS(recv) : CLASS_OF(recv);
+
+    return method;
+}
+
+void
+Init_force_bind()
+{
+    rb_define_method(rb_cUnboundMethod, "force_bind", umethod_force_bind, 1);
+}

data/test/test_force_bind.rb

@@ -0,0 +1,25 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../force_bind'
+
+class Mock
+  def the_method; self end
+end
+
+class TestForceBind < Test::Unit::TestCase
+  def test_force_bind_class
+    proc = Mock.instance_method(:the_method).force_bind(Mock)
+    assert_equal Mock, proc.call
+  end
+  
+  def test_force_bind_object
+    mock = Mock.new
+    proc = Mock.instance_method(:the_method).force_bind(mock)
+    assert_equal mock, proc.call
+  end
+  
+  def test_force_bind_object_from_other_class
+    arr = Array.new
+    proc = Mock.instance_method(:the_method).force_bind(arr)
+    assert_equal arr, proc.call
+  end
+end

metadata

@@ -0,0 +1,59 @@
+--- !ruby/object:Gem::Specification 
+name: force_bind
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Loren Segal
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-07-15 00:00:00 -04:00
+default_executable: 
+dependencies: []
+
+description: 
+email: lsegal@soen.ca
+executables: []
+
+extensions: 
+- ext/extconf.rb
+extra_rdoc_files: []
+
+files: 
+- Rakefile
+- README
+- ext/force_bind.c
+- ext/extconf.rb
+- test/test_force_bind.rb
+has_rdoc: false
+homepage: http://github.com/lsegal/force_bind
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Adds UnboundMethod#force_bind to bind an unbound method to class (or any object of any type)
+test_files: []
+