active_support_alias_class_method 1.0.0

data/.gitignore

@@ -0,0 +1,18 @@
+*~
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in active_support_alias_class_method.gemspec
+gemspec

data/LICENSE

@@ -0,0 +1,22 @@
+Copyright (c) 2012 Kenta Murata
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,52 @@
+# ActiveSupportAliasClassMethod
+
+A supplementary library of activesupport to provide ```alias_class_method``` and ```alias_class_method_chain```.
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'active_support_alias_class_method'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install active_support_alias_class_method
+
+## Usage
+
+```ruby
+require 'active_support_alias_class_method/core_ext/module'
+
+class Foo
+  def self.foo
+    :foo
+  end
+
+  alias_class_method :bar, :foo
+end
+
+Foo.foo #=> :foo
+Foo.bar #=> :foo
+
+class Foo
+  def self.foo_with_baz
+    [:baz, foo_without_baz]
+  end
+
+  alias_class_method_chain :foo, :baz
+end
+
+Foo.foo #=> [:baz, :foo]
+```
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Added some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1,11 @@
+#!/usr/bin/env rake
+require "bundler/gem_tasks"
+require 'rake/testtask'
+
+task :default => :test
+Rake::TestTask.new do |t|
+  t.libs << 'test'
+  t.pattern = 'test/**/*_test.rb'
+  t.warning = true
+  t.verbose = true
+end

data/active_support_alias_class_method.gemspec

@@ -0,0 +1,22 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path('../lib/active_support_alias_class_method/version', __FILE__)
+
+Gem::Specification.new do |gem|
+  gem.authors       = ["Kenta Murata"]
+  gem.email         = ["mrkn@cookpad.com"]
+  gem.description   = %q{A supplementary library of activesupport to provide alias_class_method and alias_class_method_chain}
+  gem.summary       = %q{Providing alias_class_method and alias_class_method_chain}
+  gem.homepage      = ""
+
+  gem.files         = `git ls-files`.split($\)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.name          = "active_support_alias_class_method"
+  gem.require_paths = ["lib"]
+  gem.version       = ActiveSupportAliasClassMethod::VERSION
+
+  gem.add_dependency('activesupport', '~> 3.0.0')
+
+  gem.add_development_dependency('rake')
+  gem.add_development_dependency('test-unit')
+end

data/lib/active_support_alias_class_method.rb

@@ -0,0 +1,5 @@
+require "active_support_alias_class_method/version"
+
+module ActiveSupportAliasClassMethod
+  # Your code goes here...
+end

data/lib/active_support_alias_class_method/core_ext/module.rb

@@ -0,0 +1 @@
+require 'active_support_alias_class_method/core_ext/module/aliasing'

data/lib/active_support_alias_class_method/core_ext/module/aliasing.rb

@@ -0,0 +1,33 @@
+require 'active_support/core_ext/kernel/singleton_class'
+
+class Module
+  def alias_class_method(new, original)
+    singleton_class.class_eval do
+      alias_method new, original
+    end
+  end
+
+  def alias_class_method_chain(target, feature)
+    # Strip out punctuation on predicates or bang methods since
+    # e.g. target?_without_feature is not a valid method name.
+    aliased_target, punctuation = target.to_s.sub(/([?!=])$/, ''), $1
+    yield(aliased_target, punctuation) if block_given?
+
+    with_method, without_method = "#{aliased_target}_with_#{feature}#{punctuation}", "#{aliased_target}_without_#{feature}#{punctuation}"
+
+    self.singleton_class.class_eval do
+      alias_method without_method, target
+      alias_method target, with_method
+
+      case
+        when public_method_defined?(without_method)
+          public target
+        when protected_method_defined?(without_method)
+          protected target
+        when private_method_defined?(without_method)
+          private target
+      end
+    end
+  end
+end
+

data/lib/active_support_alias_class_method/version.rb

@@ -0,0 +1,3 @@
+module ActiveSupportAliasClassMethod
+  VERSION = "1.0.0"
+end

data/test/abstract_unit.rb

@@ -0,0 +1,6 @@
+require 'test/unit'
+
+ENV['NO_RELOAD'] = '1'
+require 'active_support'
+
+ActiveSupport::Deprecation.debug = true

data/test/core_ext/module_test.rb

@@ -0,0 +1,198 @@
+require 'abstract_unit'
+require 'active_support_alias_class_method/core_ext/module'
+
+module BarClassMethodAliaser
+  def self.included(foo_class)
+    foo_class.class_eval do
+      extend BarClassMethods
+      alias_class_method_chain :bar, :baz
+    end
+  end
+end
+
+module BarClassMethods
+  def bar_with_baz
+    bar_without_baz << '_with_baz'
+  end
+
+  def quux_with_baz!
+    quux_without_baz! << '_with_baz'
+  end
+
+  def quux_with_baz?
+    false
+  end
+
+  def quux_with_baz=(v)
+    send(:quux_without_baz=, v) << '_with_baz'
+  end
+
+  def duck_with_orange
+    duck_without_orange << '_with_orange'
+  end
+end
+
+class ClassMethodAliasingTest < Test::Unit::TestCase
+  def setup
+    Object.const_set :FooClassWithBarClassMethod, Class.new { def self.bar() 'bar' end }
+    @class = Class.new(FooClassWithBarClassMethod)
+  end
+
+  def teardown
+    Object.instance_eval { remove_const :FooClassWithBarClassMethod }
+  end
+
+  def test_alias_class_method
+    assert_respond_to @class, :bar
+    @class.class_eval do
+      alias_class_method :foo, :bar
+    end
+    assert_respond_to @class, :foo
+  end
+
+  def test_alias_class_method_chain
+    assert @class.respond_to?(:bar)
+    feature_aliases = [:bar_with_baz, :bar_without_baz]
+
+    feature_aliases.each do |method|
+      assert !@class.respond_to?(method)
+    end
+
+    assert_equal 'bar', @class.bar
+
+    FooClassWithBarClassMethod.class_eval { include BarClassMethodAliaser }
+
+    feature_aliases.each do |method|
+      assert_respond_to @class, method
+    end
+
+    assert_equal 'bar_with_baz', @class.bar
+    assert_equal 'bar', @class.bar_without_baz
+  end
+
+  def test_alias_class_method_chain_with_punctuation_method
+    FooClassWithBarClassMethod.class_eval do
+      def self.quux!; 'quux' end
+    end
+
+    assert !@class.respond_to?(:quux_with_baz!)
+    FooClassWithBarClassMethod.class_eval do
+      include BarClassMethodAliaser
+      alias_class_method_chain :quux!, :baz
+    end
+    assert_respond_to @class, :quux_with_baz!
+
+    assert_equal 'quux_with_baz', @class.quux!
+    assert_equal 'quux', @class.quux_without_baz!
+  end
+
+  def test_alias_class_method_chain_with_same_names_between_predicates_and_bang_methods
+    FooClassWithBarClassMethod.class_eval do
+      def self.quux!; 'quux!' end
+      def self.quux?; true end
+      def self.quux=(v); 'quux=' end
+    end
+
+    assert !@class.respond_to?(:quux_with_baz!)
+    assert !@class.respond_to?(:quux_with_baz?)
+    assert !@class.respond_to?(:quux_with_baz=)
+
+    FooClassWithBarClassMethod.class_eval { include BarClassMethodAliaser }
+    assert_respond_to @class, :quux_with_baz!
+    assert_respond_to @class, :quux_with_baz?
+    assert_respond_to @class, :quux_with_baz=
+
+
+    FooClassWithBarClassMethod.alias_class_method_chain :quux!, :baz
+    assert_equal 'quux!_with_baz', @class.quux!
+    assert_equal 'quux!', @class.quux_without_baz!
+
+    FooClassWithBarClassMethod.alias_class_method_chain :quux?, :baz
+    assert_equal false, @class.quux?
+    assert_equal true,  @class.quux_without_baz?
+
+    FooClassWithBarClassMethod.alias_class_method_chain :quux=, :baz
+    assert_equal 'quux=_with_baz', @class.send(:quux=, 1234)
+    assert_equal 'quux=', @class.send(:quux_without_baz=, 1234)
+  end
+
+  def test_alias_class_method_chain_with_feature_punctuation
+    FooClassWithBarClassMethod.class_eval do
+      def self.quux; 'quux' end
+      def self.quux?; 'quux?' end
+      include BarClassMethodAliaser
+      alias_class_method_chain :quux, :baz!
+    end
+
+    assert_nothing_raised do
+      assert_equal 'quux_with_baz', @class.quux_with_baz!
+    end
+
+    assert_raise(NameError) do
+      FooClassWithBarClassMethod.alias_class_method_chain :quux?, :baz!
+    end
+  end
+
+  def test_alias_class_method_chain_yields_target_and_punctuation
+    args = nil
+
+    FooClassWithBarClassMethod.class_eval do
+      def self.quux?; end
+      extend BarClassMethods
+
+      FooClassWithBarClassMethod.alias_class_method_chain :quux?, :baz do |target, punctuation|
+        args = [target, punctuation]
+      end
+    end
+
+    assert_not_nil args
+    assert_equal 'quux', args[0]
+    assert_equal '?', args[1]
+  end
+
+  def test_alias_method_chain_preserves_private_method_status
+    FooClassWithBarClassMethod.class_eval do
+      def self.duck; 'duck' end
+      include BarClassMethodAliaser
+      private_class_method :duck
+      alias_class_method_chain :duck, :orange
+    end
+
+    assert_raise NoMethodError do
+      @class.duck
+    end
+
+    assert_equal 'duck_with_orange', @class.instance_eval { duck }
+    assert FooClassWithBarClassMethod.singleton_class.private_method_defined?(:duck)
+  end
+
+  def test_alias_method_chain_preserves_protected_method_status
+    FooClassWithBarClassMethod.class_eval do
+      def self.duck; 'duck' end
+      include BarClassMethodAliaser
+      class << self
+        protected :duck
+      end
+      alias_class_method_chain :duck, :orange
+    end
+
+    assert_raise NoMethodError do
+      @class.duck
+    end
+
+    assert_equal 'duck_with_orange', @class.instance_eval { duck }
+    assert FooClassWithBarClassMethod.singleton_class.protected_method_defined?(:duck)
+  end
+
+  def test_alias_method_chain_preserves_public_method_status
+    FooClassWithBarClassMethod.class_eval do
+      def self.duck; 'duck' end
+      include BarClassMethodAliaser
+      public_class_method :duck
+      alias_class_method_chain :duck, :orange
+    end
+
+    assert_equal 'duck_with_orange', @class.duck
+    assert FooClassWithBarClassMethod.singleton_class.public_method_defined?(:duck)
+  end
+end

metadata

@@ -0,0 +1,108 @@
+--- !ruby/object:Gem::Specification
+name: active_support_alias_class_method
+version: !ruby/object:Gem::Version
+  version: 1.0.0
+  prerelease: 
+platform: ruby
+authors:
+- Kenta Murata
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-06-04 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: activesupport
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 3.0.0
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 3.0.0
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: test-unit
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: A supplementary library of activesupport to provide alias_class_method
+  and alias_class_method_chain
+email:
+- mrkn@cookpad.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- LICENSE
+- README.md
+- Rakefile
+- active_support_alias_class_method.gemspec
+- lib/active_support_alias_class_method.rb
+- lib/active_support_alias_class_method/core_ext/module.rb
+- lib/active_support_alias_class_method/core_ext/module/aliasing.rb
+- lib/active_support_alias_class_method/version.rb
+- test/abstract_unit.rb
+- test/core_ext/module_test.rb
+homepage: ''
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.23
+signing_key: 
+specification_version: 3
+summary: Providing alias_class_method and alias_class_method_chain
+test_files:
+- test/abstract_unit.rb
+- test/core_ext/module_test.rb