visitor 0.0.1

data/.gitignore

@@ -0,0 +1,4 @@
+*.gem
+.bundle
+Gemfile.lock
+pkg/*

data/.rspec

@@ -0,0 +1 @@
+--colour

data/.rvmrc

@@ -0,0 +1 @@
+rvm use 1.9.3@visitor --create

data/.travis.yml

@@ -0,0 +1,8 @@
+language: ruby
+rvm:
+  - 1.8.7
+  - 1.9.2
+  - 1.9.3
+  - jruby-18mode # JRuby in 1.8 mode
+  - jruby-19mode # JRuby in 1.9 mode
+  - rbx-18mode

data/Gemfile

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

data/MIT-LICENCE

@@ -0,0 +1,19 @@
+Copyright (C) 2012 by Dmitriy Kiriyenko.
+
+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,3 @@
+[![Build Status](https://secure.travis-ci.org/dmitriy-kiriyenko/Visitor.png)](http://travis-ci.org/dmitriy-kiriyenko/Visitor)
+
+Just an implementation of Visitor design patter in Ruby. As far as double dispatch is applicable for a language with dynamic typing.

data/Rakefile

@@ -0,0 +1,10 @@
+require 'rubygems'
+require 'bundler/setup'
+
+require 'bundler/gem_tasks'
+require 'rspec/core/rake_task'
+
+task :default => :spec
+
+RSpec::Core::RakeTask.new(:spec) do |t|
+end

data/lib/visitor.rb

@@ -0,0 +1,7 @@
+require "visitor/version"
+
+require "visitor/base"
+
+module Visitor
+  # Your code goes here...
+end

data/lib/visitor/base.rb

@@ -0,0 +1,40 @@
+class Visitor::Base
+  class << self
+    def visitor_for *klasses, &block
+      klasses.each do |klass|
+        define_method(:"visit_#{to_class_name(klass)}", block)
+      end
+    end
+
+    def add_accept_method! *args
+      name, options = parse_accept_args(args)
+      klasses = Array(options[:to] || Object)
+      visitor_klass = self
+      klasses.each do |klass|
+        klass.send :define_method, name do
+          visitor_klass.new.visit(self)
+        end
+      end
+    end
+
+    def to_class_name(duck)
+      if duck.respond_to? :name then duck.name else duck end
+    end
+
+    def parse_accept_args(args)
+      options = if args.last.is_a? Hash then args.pop else {} end
+      name = args.first || self.name.gsub(/Visitor$/, '').gsub(/.+([A-Z])/, "_\1").downcase
+      return name, options
+    end
+  end
+
+  def visit thing
+    thing.class.ancestors.each do |ancestor|
+      method_name = :"visit_#{ancestor.name}"
+      next unless respond_to? method_name
+      return send method_name, thing
+    end
+
+    raise "Can't handle #{thing.class}"
+  end
+end

data/lib/visitor/version.rb

@@ -0,0 +1,3 @@
+module Visitor
+  VERSION = "0.0.1"
+end

data/spec/lib/visitor/base_spec.rb

@@ -0,0 +1,159 @@
+require 'spec_helper'
+
+class Unknown
+end
+
+class TestRoot
+end
+
+module TestNesting
+end
+
+module TestMixin
+end
+
+class TestDescendant < TestRoot
+end
+
+class TestDescendantWithMixin < TestRoot
+  include TestMixin
+end
+
+class TestUnlistedDescendant < TestRoot
+end
+
+class TestNesting::Object < TestRoot
+end
+
+class TestNesting::UnlistedObject < TestRoot
+end
+
+class First < TestRoot
+end
+
+class Second < TestRoot
+end
+
+class TestingVisitor < Visitor::Base
+  add_accept_method! :test_method, :to => [First, Second]
+  add_accept_method! :test_method_singular, :to => TestRoot
+  add_accept_method! :to => String
+  add_accept_method! :test_default_method
+
+  visitor_for String do |s|
+    "It's a string"
+  end
+
+  visitor_for Object do |o|
+    "It's an object"
+  end
+
+  visitor_for TestRoot do |o|
+    "It's a test root"
+  end
+
+  visitor_for TestDescendant do |o|
+    "It's a test descendant"
+  end
+
+  visitor_for TestNesting::Object do |o|
+    "It's a test nested object"
+  end
+
+  visitor_for TestMixin do |o|
+    "It's a test mixin"
+  end
+
+  visitor_for First, Second do |o|
+    "It's one of the test pair"
+  end
+
+  visitor_for Fixnum do |x|
+    x * 2
+  end
+
+  visitor_for "StillUndeclaredClass" do |o|
+    "It's a still undeclared class"
+  end
+end
+
+class StillUndeclaredClass
+end
+
+describe Visitor::Base do
+  subject { TestingVisitor.new }
+
+  describe "#visit" do
+    it "should call correct method for core class" do
+      subject.visit("hello").should == "It's a string"
+    end
+
+    it "should call correct method for object" do
+      subject.visit(Object.new).should == "It's an object"
+    end
+
+    it "should call object method for unknown class" do
+      subject.visit(Unknown.new).should == "It's an object"
+    end
+
+    it "should call correct method for test root class" do
+      subject.visit(TestRoot.new).should == "It's a test root"
+    end
+
+    it "should call correct method for test descendant class" do
+      subject.visit(TestDescendant.new).should == "It's a test descendant"
+    end
+
+    it "should call correct method for test descendant class with mixin" do
+      subject.visit(TestDescendantWithMixin.new).should == "It's a test mixin"
+    end
+
+    it "should call parent method for test unlisted descentant class" do
+      subject.visit(TestUnlistedDescendant.new).should == "It's a test root"
+    end
+
+    it "should call correct method for test nesting object class" do
+      subject.visit(TestNesting::Object.new).should == "It's a test nested object"
+    end
+
+    it "should call parent method for test nesting unlisted object class" do
+      subject.visit(TestNesting::UnlistedObject.new).should == "It's a test root"
+    end
+
+    it "should call correct method for still undeclared class using string" do
+      subject.visit(StillUndeclaredClass.new).should == "It's a still undeclared class"
+    end
+
+    it "should handle several classes in declaration" do
+      subject.visit(First.new).should == subject.visit(Second.new)
+    end
+
+    it "should receive an argument in a block" do
+      subject.visit(5).should == 10
+    end
+  end
+
+  describe ".add_accept_method!" do
+    it "should add accept method with given name to given classes" do
+      first, second = First.new, Second.new
+      first.test_method.should == subject.visit(first)
+      second.test_method.should == subject.visit(second)
+    end
+
+    it "should add accept method with given name to given class without array literal" do
+      object = TestRoot.new
+      object.test_method_singular.should == subject.visit(object)
+    end
+
+    it "should determine a default method name from class name" do
+      string = "Hello world!"
+      string.testing.should == subject.visit(string)
+    end
+
+    it "should determine a default targets as Object" do
+      object = Object.new
+      object.test_default_method.should == subject.visit(object)
+    end
+  end
+
+end

data/spec/spec_helper.rb

@@ -0,0 +1,12 @@
+require 'rubygems'
+require 'bundler/setup'
+
+Bundler.require(:default, :development)
+
+# Requires supporting files with custom matchers and macros, etc,
+# in ./support/ and its subdirectories.
+Dir[File.join(File.dirname(__FILE__), "support", "**", "*.rb")].each {|f| require f}
+
+RSpec.configure do |config|
+  # some (optional) config here
+end

data/visitor.gemspec

@@ -0,0 +1,25 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "visitor/version"
+
+Gem::Specification.new do |s|
+  s.name        = "visitor"
+  s.version     = Visitor::VERSION
+  s.authors     = ["Dmitriy Kiriyenko, Maxim Tsaplin"]
+  s.email       = ["dmitriy.kiriyenko@anahoret.com, maxim.tsaplin@anahoret.com"]
+  s.homepage    = ""
+  s.summary     = %q{Just an implementation of Visitor design patter in Ruby.}
+  s.description = %q{Just an implementation of Visitor design patter in Ruby. As far as double dispatch is applicable for a language with dynamic typing.}
+
+  s.rubyforge_project = "visitor"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+
+  s.add_development_dependency "rake"
+  s.add_development_dependency "pry"
+  s.add_development_dependency "pry-doc"
+  s.add_development_dependency "rspec"
+end

metadata

@@ -0,0 +1,115 @@
+--- !ruby/object:Gem::Specification
+name: visitor
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Dmitriy Kiriyenko, Maxim Tsaplin
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-10 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: &2165992680 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *2165992680
+- !ruby/object:Gem::Dependency
+  name: pry
+  requirement: &2165992260 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *2165992260
+- !ruby/object:Gem::Dependency
+  name: pry-doc
+  requirement: &2165991740 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *2165991740
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &2165991320 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *2165991320
+description: Just an implementation of Visitor design patter in Ruby. As far as double
+  dispatch is applicable for a language with dynamic typing.
+email:
+- dmitriy.kiriyenko@anahoret.com, maxim.tsaplin@anahoret.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .rspec
+- .rvmrc
+- .travis.yml
+- Gemfile
+- MIT-LICENCE
+- README.md
+- Rakefile
+- lib/visitor.rb
+- lib/visitor/base.rb
+- lib/visitor/version.rb
+- spec/lib/visitor/base_spec.rb
+- spec/spec_helper.rb
+- spec/support/.gitkeep
+- visitor.gemspec
+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'
+      segments:
+      - 0
+      hash: -1500006790367024403
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+      segments:
+      - 0
+      hash: -1500006790367024403
+requirements: []
+rubyforge_project: visitor
+rubygems_version: 1.8.15
+signing_key: 
+specification_version: 3
+summary: Just an implementation of Visitor design patter in Ruby.
+test_files:
+- spec/lib/visitor/base_spec.rb
+- spec/spec_helper.rb
+- spec/support/.gitkeep
+has_rdoc: