rfs 0.2 → 0.3

data/tests/all_tests.rb

@@ -0,0 +1,3 @@
+Dir.glob(File.join(File.split(__FILE__).first,'*.rb')) do |fn|
+  require fn
+end

data/tests/test_add.rb

@@ -0,0 +1,45 @@
+require File.split(__FILE__).first + "/../lib/test/test_helper"
+
+class TestAdd < BaseTest
+  def rr(ey = nil, o = {}, &b)
+    r :preview, :rename_add, ey, o, &b
+  end
+
+  def test_add
+    rr 3, :search => (/\d/), :add => 5, :action => :commit do |h|
+      assert_equal h[:oldfn].succ.succ.succ.succ.succ, h[:newfn]
+    end
+    #make sure it went in reverse
+    assert_equal [['dir/file3', 'dir/file8'],
+                  ['dir/file2', 'dir/file7'],
+                  ['dir/file1', 'dir/file6']], @r.renames
+  end
+
+  def test_add_neg
+    c = %w{ file-2 file-1 file0 }.to_cursor
+    rr 3, :search => (/\d/), :add => -3, :action => :commit do |h|
+      assert_equal c.read1next, h[:newfn]
+    end
+    #make sure it went in reverse
+    assert_equal [['dir/file1', 'dir/file-2'],
+                  ['dir/file2', 'dir/file-1'],
+                  ['dir/file3', 'dir/file0']], @r.renames
+  end
+
+  def test_add_cap
+    rr 3, :search => (/(\d)/), :add => 5 do |h|
+      assert_equal h[:oldfn].succ.succ.succ.succ.succ, h[:newfn]
+    end
+  end
+
+  def test_missing_add
+    assert_raise MissingOptionError do
+      rr(3, :search => (/(\d)/)) { |h| fail "shouldn't get here" }
+    end
+    assert_raise BadOptionValueError do
+      rr(3, :search => (/(\d)/), :add => 'something') { |h| fail "shouldn't get here" }
+    end
+  end
+end
+
+

data/tests/test_basics.rb

@@ -0,0 +1,67 @@
+require File.split(__FILE__).first + "/../lib/test/test_helper"
+class TestBasics < BaseTest
+  def test_list
+    r :list, :rename_replace, 5, :test_r_nofilter => true do |h|
+      if ['.', '..'].include? @file
+        assert_equal @file + '/', h[:result]
+      else
+        assert_equal @file, h[:result]
+      end
+    end
+  end
+
+  def test_wrong_iterations
+    assert_raise(RuntimeError) {
+      r :list, :rename_replace, 1000, :test_r_count => true do |h|
+        if ['.', '..'].include? @file
+          assert_equal @file + '/', h[:result]
+        else
+          assert_equal @file, h[:result]
+        end
+      end
+    }
+  end
+  
+  def test_bad_action
+    assert_raise(ActionError) {
+      r :no, :rename_replace
+    }
+  end
+
+  def test_bad_method
+    assert_raise(NameError) {
+      r :preview, :foo_bar
+    }
+  end
+
+  def test_missing_option
+    assert_raise(MissingOptionError) {
+      r :preview, :rename_replace
+    }
+  end
+  def test_missing_option1
+    # this doesn't raise MissingOptionError because the error is caught and given as result feedback
+    r :preview, :rename_replace, 3, :search => /file/ do |h|
+      assert_match(/MissingOptionError/, h[:result])
+    end
+  end
+  def test_missing_option2
+    assert_raise(MissingOptionError) {
+      r :preview, :rename_replace, nil, :replace => 'good'
+    }
+  end
+
+  def test_bad_search
+    assert_raise(BadOptionValueError) {
+      r :preview, :rename_replace, nil, :search => 3
+    } 
+  end
+  def test_bad_search1
+    # this doesn't raise BadOptionValueError because the error is caught and given as result feedback
+    r :preview, :rename_replace, 3, :search => /file/, :replace => /aeu/ do |h|
+      assert_match(/BadOptionValueError/, h[:result])
+    end
+  end
+end
+
+

data/tests/test_capitalize.rb

@@ -0,0 +1,24 @@
+require File.split(__FILE__).first + "/../lib/test/test_helper"
+class TestCapitalize < BaseTest
+  def rr(ey, o, &b)
+    new_files(
+      ['this sentence should be capitalized',
+       'here is another one. the best is to see what will happen! is it good?',
+       'how many more do i need here?  a few.',
+       "i'll have to get this done soon, it may get boring..."])
+    r :preview, :rename_capitalize, ey, o, &b
+  end
+
+  def test_capitalize
+    changes = ['This Sentence Should Be Capitalized',
+       'Here is Another One. The Best is to See What Will Happen! Is it Good?',
+       'How Many More Do I Need Here?  A Few.',
+       "I'll Have to Get This Done Soon, it May Get Boring..."].to_cursor
+    rr 4, :search => (/.*/) do |h|
+      assert_equal changes.read1next, h[:newfn]
+      assert_equal(:ok, h[:result_type])
+    end
+  end
+end
+
+

data/tests/test_confirm.rb

@@ -0,0 +1,145 @@
+require File.split(__FILE__).first + "/../lib/test/test_helper"
+class TestConfirm < BaseTest
+  def rr(expected_yields = nil, options = {}, &b)
+    r :commit, :rename_replace, expected_yields, options, &b
+  end
+
+  def test_confirm_yes
+    confirms = 0
+    rr 3, :confirm => (proc {|path, oldfn, newfn, full_name, exists, default|
+                               confirms += 1
+                               assert_equal 'dir', path
+                               assert_match(/file[1-3]/, oldfn)
+                               assert_match(/new[1-3]/, newfn)
+                               assert_equal false, full_name
+                               assert_equal((oldfn[-1] == ?1) ? :yes : :yes, default)
+                               :yes
+                             }),
+          :search => (/file/), :replace => 'new' do |h|
+      assert_match(/new[123]/, h[:newfn])
+      assert_equal :ok, h[:result_type]
+      assert_equal h[:newfn], h[:result]
+      assert_equal h[:confirm], :yes
+    end
+    assert_equal 3, confirms
+  end
+           
+  def test_confirm_all
+    confirms = 0
+    rr 3, :confirm => (proc {|path, oldfn, newfn, full_name, exists, default|
+                               confirms += 1
+                               assert_equal :yes, default
+                               :all
+                             }),
+          :search => (/file/), :replace => 'new' do |h|
+      assert_match(/new[123]/, h[:newfn])
+      assert_equal :ok, h[:result_type]
+      assert_equal h[:newfn], h[:result]
+      assert_equal h[:confirm], :all
+    end
+    assert_equal 1, confirms
+  end
+
+  def test_confirm_no
+    confirms = 0
+    rr 3, :confirm => (proc {|path, oldfn, newfn, full_name, exists, default|
+                               confirms += 1
+                               assert_equal((oldfn[-1] == ?1) ? :yes : :no, default)
+                               :no
+                             }),
+          :search => (/file/), :replace => 'new' do |h|
+      assert_match(/new[123]/, h[:newfn])
+      assert_equal :skipped, h[:result_type]
+      assert_equal h[:oldfn], h[:result]
+      assert_equal h[:confirm], :no
+    end
+    assert_equal 3, confirms
+  end
+  
+  def test_confirm_cancel
+    confirms = 0
+    rr 0, :confirm => (proc {|path, oldfn, newfn, full_name, exists, default|
+                               confirms += 1
+                               assert_equal :yes, default
+                               :cancel
+                             }),
+          :search => (/file/), :replace => 'new' do |h|
+      fail
+    end
+    assert_equal 1, confirms
+  end
+
+  def exists_test(files, expect, p, s)
+    confirms = 0
+    new_files(files)
+    cp = proc do |path, oldfn, newfn, full_name, exists, default|
+      confirms += 1
+      assert_equal expect, exists
+      :no
+    end
+    
+    #class << @r
+      #alias a_e_test already_exists?
+      #def already_exists?(*a)
+        #r = a_e_test(*a)
+        #assert_equal expect, r
+      #end
+    #end
+    rr 3, :confirm => cp, :search => p, :replace => s do |h|
+#      fail
+    end
+    assert_equal 3, confirms
+  end
+
+  def test_exists_same
+    confirms = 0
+    new_files(%w{ ./dir/FILE1 ./dir/FILE2 ./dir/FILE3 })
+    cp = proc do |path, oldfn, newfn, full_name, exists, default|
+      confirms += 1
+      assert_equal nil, exists
+      :no
+    end
+    class << @r
+      alias a_e_test already_exists?
+      def already_exists?(*a)
+        r = a_e_test(*a)
+        raise "false expected but was <#{r}>" unless false == r
+        r
+      end
+    end
+    rr 3, :confirm => cp, :search => (/FILE/), :replace => 'file' do |h|
+      assert_equal :skipped, h[:result_type]
+    end
+    assert_equal 3, confirms
+  end
+
+  def test_exists_diff
+    new_files(%w{ ./dir/FILES1 ./dir/FILES2 ./dir/FILES3 })
+    confirms = 0
+    cp = proc do |path, oldfn, newfn, full_name, exists, default|
+      confirms += 1
+      assert_equal true, exists
+      :no
+    end
+    class << @r
+      alias a_e_test already_exists?
+      def already_exists?(*a)
+        r = a_e_test(*a)
+        raise "true expected but was <#{r}>" unless true == r
+        r
+      end
+    end
+    rr 3, :confirm => cp, :search => (/FILES/), :replace => 'file', :force => true do |h|
+      assert_equal :skipped, h[:result_type]
+    end
+    assert_equal 3, confirms
+    
+    confirms = 0
+    rr 3, :confirm => cp, :search => (/FILES/), :replace => 'file' do |h|
+      assert_equal :fileerror, h[:result_type]
+    end
+    assert_equal 0, confirms
+  end
+end
+  
+

data/tests/test_count.rb

@@ -0,0 +1,20 @@
+require File.split(__FILE__).first + "/../lib/test/test_helper"
+class TestCount < BaseTest
+  def test_count
+    count = 0
+    r :preview, :rename_count, 3, :search => (/()./), :count_start => 1 do |h|
+      count += 1
+      assert_equal "#{count}#{h[:oldfn]}", h[:newfn]
+    end
+  end
+
+  def test_count_string
+    count = "b.9 "
+    r :preview, :rename_count, 3, :search => (/()./), :count_start => count do |h|
+      assert_equal "#{count}#{h[:oldfn]}", h[:newfn]
+      count.succ!
+    end
+  end
+end
+
+

data/tests/test_delete.rb

@@ -0,0 +1,106 @@
+require File.split(__FILE__).first + "/../lib/test/test_helper"
+class TestDelete < BaseTest
+  def teardown
+    super
+    unless File.exists? 'dir'
+      Dir.mkdir 'dir'
+    end
+    %w{file1 file2 file3}.each do |f|
+      fn = File.join('dir', f)
+      unless File.exists? fn
+        File.open(fn, 'w') {|f| f.puts fn }
+      end
+    end
+  end
+
+  def rr(expected_yields = nil, options = {}, &b)
+    r :preview, :rename_remove, expected_yields, options, &b
+  end
+
+  def test_delete_file
+    rr 1, :search => (/^file2$/), :action => :commit do |h|
+      assert_equal [["dir/file2", :deleted]], @r.renames
+      assert_equal :ok, h[:result_type]
+      assert_equal '<<file2>>', h[:result]
+      assert_equal 'dir', h[:result_path]
+      assert_equal 'file2', h[:result_file]
+    end
+  end
+
+  def test_delete_dir_not_empty_sim
+    new_files(%w{ . .. dir })
+    rr 1, :search => (/^dir$/), :action => :commit do |h|
+      assert_equal [["./dir", :deleted]], @r.renames
+      assert_equal :ok, h[:result_type]
+      assert_equal '<<dir>>', h[:result]
+      assert_equal '.', h[:result_path]
+      assert_equal 'dir', h[:result_file]
+    end
+  end
+
+  def test_delete_dir_not_empty_real
+    new_files(%w{ . .. dir })
+    class << @r
+      alias actual_delete actual_delete_orig
+    end
+    rr 1, :search => (/^dir$/), :action => :commit do |h|
+      assert_equal :fileerror, h[:result_type]
+      assert_equal "Errno::ENOTEMPTY: Directory not empty - ./dir", h[:result]
+      assert_equal '.', h[:result_path]
+      assert_equal 'dir', h[:result_file]
+    end
+  end
+
+  def test_delete_dir_not_empty_real
+    new_files(%w{ . .. dir })
+    class << @r
+      alias actual_delete actual_delete_orig
+    end
+    rr 1, :search => (/^dir$/), :action => :commit do |h|
+      assert_equal :fileerror, h[:result_type]
+      assert_equal "Errno::ENOTEMPTY: Directory not empty - ./dir", h[:result]
+      assert_equal '.', h[:result_path]
+      assert_equal 'dir', h[:result_file]
+    end
+  end
+
+  def test_delete_recursive
+    @files = Provider::File::Recursive.new(['.'])
+    add_file_events
+    class << @r
+      #alias actual_delete actual_delete_orig
+    end
+    c = %w{ ./dir/file1 ./dir/file2 ./dir/file3 ./dir }.to_cursor
+    rr 4, :search => (/^(dir|file[1-3])$/), :action => :commit do |h|
+      assert_equal :ok, h[:result_type]
+      p, f = File.split c.read1next
+      assert_equal p, h[:result_path]
+      assert_equal f, h[:result_file]
+    end
+    c.pos = 0
+    @r.renames.each do |a|
+      fn, r = a
+      assert_equal c.read1next, fn
+      assert_equal :deleted, r
+    end
+  end
+
+  def test_confirm_delete
+    confirms = 0
+    cp = proc do |path, oldfn, newfn, full_name, exists, default|
+      assert_equal 'dir', path
+      assert_match(/file[1-3]/, oldfn)
+      assert_equal '<<deleted>>', newfn
+      assert_equal false, full_name
+      assert_equal nil, exists
+      confirms += 1
+      :no
+    end
+    rr 3, :search => (/./), :confirm => cp, :action => :commit do |h|
+      assert_equal :skipped, h[:result_type]
+    end
+    assert_equal 3, confirms
+  end
+end
+
+

data/tests/test_downcase.rb

@@ -0,0 +1,35 @@
+require File.split(__FILE__).first + "/../lib/test/test_helper"
+class TestDowncase < BaseTest
+  def setup
+    super
+    new_files(%w{ FILE1 FILE2 FILE3 })
+  end
+  
+  def rr(ey, o, &b)
+    r :preview, :rename_downcase, ey, o, &b
+  end
+
+  def test_downcase
+    c = %w{ File1 File2 File3 }.to_cursor
+    rr 3, :search => (/ILE/) do |h|
+      assert_equal(c.read1next, h[:newfn])
+      assert_equal(:ok, h[:result_type])
+    end
+  end
+
+  def test_upcase_entire
+    c = %w{ file1 file2 file3 }.to_cursor
+    rr 3, :search => (/(.*)/) do |h|
+      assert_equal(c.read1next, h[:newfn])
+      assert_equal(:ok, h[:result_type])
+    end
+  end
+
+  def test_no_change
+    new_files(%w{ file1 file2 file3 })
+    rr 3, :search => (/(.*)/) do |h|
+      assert_nil(h[:result_type])
+    end
+  end
+end
+