ing 0.1.1

data/lib/ing/version.rb

@@ -0,0 +1,3 @@
+module Ing
+  VERSION = '0.1.1'
+end

data/lib/thor/actions/file_manipulation.rb

@@ -0,0 +1,30 @@
+# patch to access captures in gsub_file
+# https://github.com/kentaroi/thor/commit/46b6d0b18a58eb8f7586e57eb633e96664fb1722
+#
+class Thor
+  module Actions
+    
+    def gsub_file(path, flag, *args, &block)
+      return unless behavior == :invoke
+      config = args.last.is_a?(Hash) ? args.pop : {}
+
+      path = File.expand_path(path, destination_root)
+      say_status :gsub, relative_to_original_destination_root(path), config.fetch(:verbose, true)
+
+      unless options[:pretend]
+        content = File.binread(path)
+        if block
+          if block.arity == 1
+            content.gsub!(flag, *args) { block.call($&) }
+          else
+            content.gsub!(flag, *args) { block.call(*$~) }
+          end
+        else
+          content.gsub!(flag, *args)
+        end
+        File.open(path, 'wb') { |file| file.write(content) }
+      end
+    end
+
+  end
+end

data/lib/thor/shell/basic.rb

@@ -0,0 +1,44 @@
+# monkey patch for better ask behavior
+
+class Thor
+  module Shell
+    class Basic
+    
+      def ask(statement, *args)
+        options = args.last.is_a?(Hash) ? args.pop : {}
+        color = args.pop
+        default = options[:default]
+        if options[:limited_to] 
+          ask_filtered(statement, options[:limited_to], color, default)
+        else
+          ask_simply(statement, color, default)
+        end
+      end
+      
+      def yes?(statement, *args)
+        !!(ask(statement, *args) =~ is?(:yes))
+      end     
+      
+      protected
+      
+
+      def ask_simply(statement, color=nil, default=nil)
+        say("#{statement} #{default ? '(default ' + default + ')' : nil} ", color)
+        input = stdin.gets.strip
+        input.empty? ? default : input
+      end
+
+      def ask_filtered(statement, answer_set, color=nil, default=nil)
+        correct_answer = nil
+        until correct_answer
+          answer = ask_simply("#{statement} #{answer_set.inspect}", color, default)
+          correct_answer = answer_set.include?(answer) ? answer : nil
+          answers = answer_set.map(&:inspect).join(", ")
+          say("Your response must be one of: [#{answers}]. Please try again.") unless correct_answer
+        end
+        correct_answer
+      end
+
+    end
+  end
+end

data/test/acceptance/ing_run_tests.rb

@@ -0,0 +1,164 @@
+require File.expand_path('../test_helper', File.dirname(__FILE__))
+
+describe Ing do
+  include TestHelpers
+  
+  def capture_run(args)
+    capture(:stdout) { Ing.run args }
+  end
+
+  def reset
+    Ing::Dispatcher.dispatched.clear
+  end
+  
+  describe "#run" do
+
+    describe "no method or args given" do
+      before { reset }
+      subject { ["count_args"] }
+      
+      it 'should run with expected output' do 
+        assert_equal "CountArgs called with 0 args", 
+                     capture_run(subject).chomp
+      end
+      
+    end
+    
+    describe "method given with args" do
+      before { reset }
+      subject { ["amazing", "describe", "Malcolm"] }
+      
+      it 'should run with expected output' do
+        assert_equal "Malcolm is amazing", capture_run(subject).chomp
+      end
+      
+    end
+    
+    describe "option args given" do
+      before { reset }
+      subject { ["amazing", "describe", "--forcefully", "Malcolm"] }
+      
+      it 'should run with expected output' do
+        assert_equal "MALCOLM IS AMAZING", capture_run(subject).chomp
+      end
+      
+      describe "and option args given at end" do
+        before { reset }
+        subject { ["amazing", "describe", "Malcolm", "--forcefully"] }
+      
+        it 'should run with expected output' do
+          assert_equal "MALCOLM IS AMAZING", capture_run(subject).chomp
+        end
+      end
+      
+    end
+    
+    describe "unknown method given" do
+      before { reset }
+      subject { ["amazing", "write", "Malcolm"] }
+    
+      it 'should raise error' do
+        assert_raises(::NoMethodError) { capture_run subject }
+      end
+      
+    end
+    
+    describe "undefined option given" do
+      before { reset }
+      subject { ["amazing", "describe", "Malcolm", "--times=3"] }
+    
+      it 'should exit' do
+        assert_raises(::SystemExit) { capture_run(subject) }
+      end
+    end
+    
+    describe "wrong number of args given" do
+      before { reset }
+      subject { ["amazing", "describe"] }
+    
+      it 'should raise error' do
+        assert_raises(::ArgumentError) { capture_run subject }
+      end    
+    end
+    
+    describe "require boot option given" do
+      before { reset }
+      subject { ["-r", "./test/fixtures/require.ing", 
+                 "--require", "cgi",
+                 "dynamic_require"
+                ] 
+              }
+      
+      it 'should load specified files and libraries' do
+        capture_run subject
+        DynamicRequire; CGI
+        assert true
+      end
+      
+    end
+    
+    describe "namespace boot option given" do
+      before { reset }
+      subject { ["--require=./test/fixtures/namespace.ing",
+                 "-n", "some_base_namespace",
+                 "one:two:three:echo", "call", "hello world"
+                ]
+              }
+              
+      it 'should run with expected output' do
+        assert_equal "hello world", capture_run(subject).chomp
+      end
+      
+      describe "and class not within namespace" do
+        before { reset }
+        subject { ["--require=./test/fixtures/namespace.ing",
+                   "-n", "some_base_namespace",
+                   "echo", "call", "hello world"
+                  ]
+                }
+        
+        it 'should raise error' do
+          assert_raises(::NameError) { capture_run(subject).chomp }
+        end
+        
+      end
+      
+    end
+    
+    describe "dispatch to proc" do
+      before { reset }
+      subject { %w[p 1 2 3] }
+      
+      P = lambda {|*args| 
+        opts = (Hash === args.last ? args.pop : {})
+        args.reverse.each_with_index {|a,i| puts "#{i}:#{a}"}
+      }
+      
+      it 'should run with expected output' do
+        log = capture_run(subject).chomp
+        assert_equal "0:3\n1:2\n2:1", log
+      end
+      
+    end
+    
+  end
+  
+  describe "invoking within tasks" do
+    before { reset }
+    subject { ["invoking:counter", "one"] }
+    
+    it 'should run with expected output' do
+      assert_equal "1\n2\n3\n", capture_run(subject)
+    end
+  end
+  
+  describe "executing within tasks" do
+    before { reset }
+    subject { ["executing:counter", "one"] }
+    
+    it 'should run with expected output' do
+      assert_equal "1\n2\n3\n3\n", capture_run(subject)
+    end    
+  end
+  
+end

data/test/actions/create_file_spec.rb

@@ -0,0 +1,209 @@
+require File.expand_path('../spec_helper', File.dirname(__FILE__))
+require File.expand_path("../../lib/ing/files", File.dirname(__FILE__))
+
+describe Ing::Files::CreateFile do
+  include SpecHelpers
+  
+  def reset
+    ARGV.replace []
+    ::FileUtils.rm_rf(destination_root)
+  end
+
+  def create_file(destination=nil, config={}, options={})
+    @base = MyCounter.new(options)
+    @base.destination_root = destination_root
+    @base.call 1,2
+    MyCounter.send(:define_method, :file_name, Proc.new {'rdoc'} )
+
+    @action = Ing::Files::CreateFile.new(@base, destination, "CONFIGURATION",
+                                            { :verbose => !@silence }.merge(config))
+  end
+
+  def invoke!
+    capture(:stdout){ @action.invoke! }
+  end
+
+  def revoke!
+    capture(:stdout){ @action.revoke! }
+  end
+
+  def silence!
+    @silence = true
+  end
+
+  # stubs multiple input responses from $stdin.gets
+  # not currently used
+  class StubInput
+  
+    def initialize(expected)
+      @s = Array(expected)
+    end
+    
+    def gets
+      @s.shift
+    end
+    
+    def reply_for(stream=$stdin, &b)
+      stream.stub(:gets, self.method(:gets), &b)
+    end
+    
+  end
+  
+  describe "#invoke!" do
+    before { reset }
+    
+    it "creates a file" do
+      create_file("doc/config.rb")
+      invoke!
+      assert File.exists?(File.join(destination_root, "doc/config.rb"))
+    end
+
+    it "does not create a file if pretending" do
+      create_file("doc/config.rb", {}, :pretend => true)
+      invoke!
+      refute File.exists?(File.join(destination_root, "doc/config.rb"))
+    end
+
+    it "shows created status to the user" do
+      create_file("doc/config.rb")
+      assert_equal "      create  doc/config.rb\n", invoke!
+    end
+
+    it "does not show any information if log status is false" do
+      silence!
+      create_file("doc/config.rb")
+      assert_empty invoke!
+    end
+
+    it "returns the given destination" do
+      capture(:stdout) do
+        assert_equal "doc/config.rb", create_file("doc/config.rb").invoke!
+      end
+    end
+
+    it "converts encoded instructions" do
+      create_file("doc/%file_name%.rb.tt")
+      invoke!
+      assert File.exists?(File.join(destination_root, "doc/rdoc.rb.tt"))
+    end
+
+    describe "when file exists" do
+
+      describe "and is identical" do
+        before do
+          reset
+          create_file("doc/config.rb")
+          invoke!
+        end
+
+        it "shows identical status" do
+          create_file("doc/config.rb")
+          invoke!
+          assert_equal "   identical  doc/config.rb\n", invoke!
+        end
+      end
+
+      describe "and is not identical" do
+        before do
+          reset
+          create_file("doc/config.rb")
+          invoke!          
+          File.open(File.join(destination_root, 'doc/config.rb'), 'w'){ |f| f.write("FOO = 3") }
+        end
+
+        it "shows forced status to the user if force is given" do
+          refute create_file("doc/config.rb", {}, :force => true).identical?
+          assert_equal "       force  doc/config.rb\n", invoke!
+        end
+
+        it "shows skipped status to the user if skip is given" do
+          refute create_file("doc/config.rb", {}, :skip => true).identical?
+          assert_equal "        skip  doc/config.rb\n", invoke!
+        end
+
+        it "shows forced status to the user if force is configured" do
+          refute create_file("doc/config.rb", :force => true).identical?
+          assert_equal "       force  doc/config.rb\n", invoke!
+        end
+
+        it "shows skipped status to the user if skip is configured" do
+          refute create_file("doc/config.rb", :skip => true).identical?
+          assert_equal "        skip  doc/config.rb\n", invoke!
+        end
+
+        it "shows conflict status to ther user" do
+          refute create_file("doc/config.rb").identical?
+          file = File.join(destination_root, 'doc/config.rb')
+          content = nil
+          $stdin.stub(:gets,'s') do
+            content = invoke!
+          end
+          assert_match(/conflict  doc\/config\.rb/, content)
+          assert_match(/Overwrite #{file}\? \(enter "h" for help\) \[Ynaqdh\]/, content)
+          assert_match(/skip  doc\/config\.rb/, content)
+        end
+
+        it "creates the file if the file collision menu returns true" do
+          create_file("doc/config.rb")
+          $stdin.stub(:gets,'y') do
+            assert_match(/force  doc\/config\.rb/, invoke!)
+          end
+        end
+
+        it "skips the file if the file collision menu returns false" do
+          create_file("doc/config.rb")
+          $stdin.stub(:gets,'n') do
+            assert_match(/skip  doc\/config\.rb/, invoke!)
+          end
+        end
+
+# Not sure how to do the mock method here without more flexible mocks....
+#        it "executes the block given to show file content" do
+#          create_file("doc/config.rb")
+#          $stdin.should_receive(:gets).and_return('d')
+#          $stdin.should_receive(:gets).and_return('n')
+#          @base.shell.should_receive(:system).with(/diff -u/)
+#          invoke!
+#        end
+
+      end
+    end
+  end  
+  
+  describe "#revoke!" do
+    before { reset }
+    
+    it "removes the destination file" do
+      create_file("doc/config.rb")
+      invoke!
+      revoke!
+      refute File.exists?(@action.destination)
+    end
+
+    it "does not raise an error if the file does not exist" do
+      create_file("doc/config.rb")
+      revoke!
+      refute File.exists?(@action.destination)
+    end
+  end
+
+  describe "#exists?" do
+    before { reset }
+    it "returns true if the destination file exists" do
+      create_file("doc/config.rb")
+      refute @action.exists?
+      invoke!
+      assert @action.exists?
+    end
+  end
+
+  describe "#identical?" do
+    before { reset }
+    it "returns true if the destination file and is identical" do
+      create_file("doc/config.rb")
+      refute @action.identical?
+      invoke!
+      assert @action.identical?
+    end
+  end
+end