rcodetools 0.8.0.0 → 0.8.1.0

data/test/data/xmpfilter/unit_test_detect_rbtest.taf

@@ -0,0 +1,108 @@
+==========
+unit_test_detect_rbtest
+==========
+xmpfilter -u --detect-rbtest
+==========
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1
+  def difftype() [1, "s"] end
+end
+
+
+require 'test/unit'
+class Test_X < Test::Unit::TestCase
+  def setup
+    @o = X.new
+  end
+
+  def test_foo
+    @o.foo(true)   # =>
+    @o.foo(true).a # =>
+    @o.foo(false)  # =>
+  end
+  
+  def test_bar
+    @o.bar         # =>
+  end
+
+  def test_baz
+    @o.baz         # =>
+  end
+
+  def test_babar
+    @o.babar       # =>
+  end
+
+  def test_fubar
+    @o.fubar(10)   # =>
+  end
+
+  def test_difftype
+    for x in @o.difftype
+      x            # =>
+    end
+  end
+
+end
+
+==========
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1 # !> already initialized constant A
+  def difftype() [1, "s"] end
+end
+
+
+require 'test/unit'
+class Test_X < Test::Unit::TestCase
+  def setup
+    @o = X.new
+  end
+
+  def test_foo
+    assert_kind_of(X::Y, @o.foo(true))
+    assert_equal("#<struct X::Y a=2>", @o.foo(true).inspect)
+    assert_equal(2, @o.foo(true).a)
+    assert_equal(2, @o.foo(false))
+  end
+  
+  def test_bar
+    assert_raise(RuntimeError){@o.bar}
+  end
+
+  def test_baz
+    assert_nil(@o.baz)
+  end
+
+  def test_babar
+    assert_equal([1, 2], @o.babar)
+  end
+
+  def test_fubar
+    assert_in_delta(101.0, @o.fubar(10), 0.0001)
+  end
+
+  def test_difftype
+    for x in @o.difftype
+      #xmpfilter: WARNING!! extra values ignored
+      assert_equal(1, x)
+    end
+  end
+
+end
+

data/test/data/xmpfilter/unit_test_detect_rbtest2.taf

@@ -0,0 +1,18 @@
+==========
+unit_test_detect_rbtest2
+==========
+xmpfilter --detect-rbtest
+==========
+=begin test_bar
+bar("bar")    # =>
+=end
+def bar(s)
+  s.upcase
+end
+==========
+=begin test_bar
+assert_equal("BAR", bar("bar"))
+=end
+def bar(s)
+  s.upcase
+end

data/test/data/xmpfilter/unit_test_poetry.taf

@@ -0,0 +1,108 @@
+==========
+unit_test_poetry
+==========
+xmpfilter -u --poetry
+==========
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1
+  def difftype() [1, "s"] end
+end
+
+
+require 'test/unit'
+class Test_X < Test::Unit::TestCase
+  def setup
+    @o = X.new
+  end
+
+  def test_foo
+    @o.foo(true)   # =>
+    @o.foo(true).a # =>
+    @o.foo(false)  # =>
+  end
+  
+  def test_bar
+    @o.bar         # =>
+  end
+
+  def test_baz
+    @o.baz         # =>
+  end
+
+  def test_babar
+    @o.babar       # =>
+  end
+
+  def test_fubar
+    @o.fubar(10)   # =>
+  end
+
+  def test_difftype
+    for x in @o.difftype
+      x            # =>
+    end
+  end
+
+end
+
+==========
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1 # !> already initialized constant A
+  def difftype() [1, "s"] end
+end
+
+
+require 'test/unit'
+class Test_X < Test::Unit::TestCase
+  def setup
+    @o = X.new
+  end
+
+  def test_foo
+    assert_kind_of X::Y, @o.foo(true) 
+    assert_equal "#<struct X::Y a=2>", @o.foo(true).inspect
+    assert_equal 2, @o.foo(true).a
+    assert_equal 2, @o.foo(false)
+  end
+  
+  def test_bar
+    assert_raise(RuntimeError){@o.bar}
+  end
+
+  def test_baz
+    assert_nil @o.baz
+  end
+
+  def test_babar
+    assert_equal [1, 2], @o.babar
+  end
+
+  def test_fubar
+    assert_in_delta 101.0, @o.fubar(10), 0.0001
+  end
+
+  def test_difftype
+    for x in @o.difftype
+      #xmpfilter: WARNING!! extra values ignored
+      assert_equal 1, x
+    end
+  end
+
+end
+

data/test/data/xmpfilter/unit_test_rbtest.taf

@@ -0,0 +1,18 @@
+==========
+unit_test_rbtest
+==========
+xmpfilter -u --rbtest
+==========
+=begin test_bar
+bar("bar")    # =>
+=end
+def bar(s)
+  s.upcase
+end
+==========
+=begin test_bar
+assert_equal("BAR", bar("bar"))
+=end
+def bar(s)
+  s.upcase
+end

data/test/data/xmpfilter/width.taf

@@ -0,0 +1,16 @@
+==========
+width
+==========
+xmpfilter -w 15
+==========
+
+a = ["abcdefg", 12345, Object]
+a
+# => 
+==========
+
+a = ["abcdefg", 12345, Object]
+a
+# => ["abcdefg",
+#     12345,
+#     Object]

data/test/tmp_functional.rb

@@ -0,0 +1,162 @@
+require 'test/unit'
+
+module TestFunctional
+  DIR = File.expand_path(File.dirname(__FILE__))
+  LIBDIR = File.expand_path(DIR + '/../lib')
+  
+  module DefineFunctionalTests
+    def define_functional_tests(bin, exec, tests)
+      tests.each_pair do |test, opts|
+        define_method("test_#{test}") do
+          
+          output = `ruby -I#{LIBDIR} #{exec} #{opts.join(" ")} #{DIR}/data/#{test}-input.rb`
+          outputfile = "#{DIR}/data/#{test}-output.rb"
+          taffile = "#{DIR}/data/#{bin}/#{test}.taf"
+          open(taffile, "w") do |f|
+            f.puts "=========="
+            f.puts test
+            f.puts "=========="
+            f.puts bin + " " + opts.join(" ")
+            f.puts "=========="
+            f.puts File.read("#{DIR}/data/#{test}-input.rb")
+            f.puts "=========="
+            f.puts File.read("#{DIR}/data/#{test}-output.rb")
+          end
+#          assert_equal(File.read(outputfile), output)
+        end
+      end 
+    end
+  end
+
+  class TestXmpfilter < Test::Unit::TestCase
+    extend DefineFunctionalTests
+    tests = {
+      :simple_annotation => [], :unit_test => ["-u"], :rspec => ["-s"],
+      :no_warnings => ["--no-warnings"], :bindings => ["--poetry", "-u"],
+      :add_markers => ["-m"], :unit_test_rbtest => ["-u", "--rbtest"],
+      :unit_test_detect_rbtest => ["-u", "--detect-rbtest"],
+      :unit_test_detect_rbtest2 => ["--detect-rbtest"],
+    }
+    define_functional_tests "xmpfilter", File.expand_path(DIR + '/../bin/xmpfilter'), tests
+  end
+
+  class TestRctComplete < Test::Unit::TestCase
+    extend DefineFunctionalTests
+    tests = {
+      :completion_rbtest => [ "--rbtest", "--line=6" ],
+      :completion_detect_rbtest => [ "--detect-rbtest", "--line=6" ],
+      :completion_detect_rbtest2 => [ "--detect-rbtest", "--line=1" ],
+    }
+    define_functional_tests "rct-complete", File.expand_path(DIR + '/../bin/rct-complete'), tests
+  end
+
+  class TestRctDoc < Test::Unit::TestCase
+    extend DefineFunctionalTests
+    tests = {
+      :doc_rbtest => [ "--rbtest", "--line=6" ],
+      :doc_detect_rbtest => [ "--detect-rbtest", "--line=1" ],
+      :doc_detect_rbtest2 => [ "--detect-rbtest", "--line=6" ],
+    }
+    define_functional_tests "rct-doc", File.expand_path(DIR + '/../bin/rct-doc'), tests
+  end
+
+
+  # Other tests are in test_run.rb
+  class TestRctCompleteTDC < Test::Unit::TestCase
+    test = :completion_in_method
+    inputfile = "#{DIR}/data/#{test}-input.rb"
+    outputfile = "#{DIR}/data/#{test}-output.rb"
+    test_script = "#{DIR}/data/#{test}-test.rb"
+    common_opts = ["--filename #{inputfile}", "--line 2"]
+    right_output = File.read(outputfile)
+    wrong_output = "\n"
+
+    tests = {
+      :completion_in_method__testscript =>
+        [ common_opts + ["-t #{test_script}"], right_output ],
+      :completion_in_method__testmethod =>
+        [ common_opts + ["-t #{test_script}@test_fooz"], right_output ],
+      :completion_in_method__wrong_testmethod =>
+        [ common_opts + ["-t #{test_script}@test_NOT_FOUND"], wrong_output ],
+    }
+    exec = File.expand_path(DIR + '/../bin/rct-complete')
+#     tests.each_pair do |test, (opts, expected)|
+#       define_method("test_#{test}") do 
+#         output = `ruby -I#{LIBDIR} #{exec} #{opts.join(" ")} #{inputfile}`
+        
+#         taffile = "#{DIR}/data/#{bin}/#{test}.taf"
+#         open(taffile, "w") do |f|
+#           f.puts "=========="
+#           f.puts test
+#           f.puts "=========="
+#           f.puts bin + " " + opts.join(" ")
+#           f.puts "=========="
+#           f.puts File.read("#{DIR}/data/#{test}-input.rb")
+#           f.puts "=========="
+#           f.puts File.read("#{DIR}/data/#{test}-output.rb")
+#         end
+#       end
+#     end
+
+    test=:completion_in_method__testscript
+    define_method("test_#{test}") do
+      taffile = "#{DIR}/data/rct-complete-TDC/completion_in_method__testscript.taf"
+      open(taffile, "w") do |f|
+        opts = tests[test]
+        f.puts "=========="
+        f.puts test
+        f.puts "=========="
+        f.puts "rct-complete " + opts.join(" ")
+        f.puts "=========="
+        test0 = :completion_in_method
+        f.puts File.read("#{DIR}/data/#{test0}-input.rb")
+        f.puts "=========="
+        f.puts File.read("#{DIR}/data/#{test0}-output.rb")
+        f.puts "=========="
+        f.puts File.read("#{DIR}/data/#{test0}-test.rb")
+      end
+      
+    end
+
+    test=:completion_in_method__testmethod
+    define_method("test_#{test}") do
+      taffile = "#{DIR}/data/rct-complete-TDC/completion_in_method__testmethod.taf"
+      open(taffile, "w") do |f|
+        opts = tests[test]
+        f.puts "=========="
+        f.puts test
+        f.puts "=========="
+        f.puts "rct-complete " + opts.join(" ")
+        f.puts "=========="
+        test0 = :completion_in_method
+        f.puts File.read("#{DIR}/data/#{test0}-input.rb")
+        f.puts "=========="
+        f.puts File.read("#{DIR}/data/#{test0}-output.rb")
+        f.puts "=========="
+        f.puts File.read("#{DIR}/data/#{test0}-test.rb")
+      end
+      
+    end
+
+    test=:completion_in_method__wrong_testmethod
+    define_method("test_#{test}") do
+      taffile = "#{DIR}/data/rct-complete-TDC/completion_in_method__wrong_testmethod.taf"
+      open(taffile, "w") do |f|
+        opts = tests[test]
+        f.puts "=========="
+        f.puts test
+        f.puts "=========="
+        f.puts "rct-complete " + opts.join(" ")
+        f.puts "=========="
+        test0 = :completion_in_method
+        f.puts File.read("#{DIR}/data/#{test0}-input.rb")
+        f.puts "=========="
+        f.puts 
+        f.puts "=========="
+        f.puts File.read("#{DIR}/data/#{test0}-test.rb")
+      end
+      
+    end
+
+  end
+end

data/test/tmp_run.rb

@@ -0,0 +1,66 @@
+require 'test/unit'
+require 'rcodetools/xmpfilter'
+require 'rcodetools/xmptestunitfilter'
+require 'rcodetools/completion'
+require 'rcodetools/doc'
+require 'rcodetools/options'
+require 'stringio'
+
+class TestRun < Test::Unit::TestCase
+  include Rcodetools
+  DIR = File.expand_path(File.dirname(__FILE__))
+
+  tests = {
+#    :rspec_poetry      => {:klass => XMPRSpecFilter,    :interpreter     => "spec", :use_parentheses => false},
+    :rspec_poetry => ["xmpfilter", "-s --poetry"],
+#    :unit_test_poetry  => {:klass => XMPTestUnitFilter, :use_parentheses => false},
+    :unit_test_poetry => ["xmpfilter", "-u --poetry"],
+    
+#    :completion       => {:klass => XMPCompletionFilter,      :lineno => 1},
+    :completion => ["rct-complete", "-C --line=1"],
+#    :completion_emacs => {:klass => XMPCompletionEmacsFilter, :lineno => 1},
+    :completion_emacs => ["rct-complete", "--completion-emacs --line=1"],
+#    :completion_emacs_icicles => {:klass => XMPCompletionEmacsIciclesFilter, :lineno => 1},
+    :completion_emacs_icicles => ["rct-complete","--completion-emacs-icicles --line=1"],
+#    :completion_class_info => {:klass => XMPCompletionClassInfoFilter, :lineno => 1},
+    :completion_class_info => ["rct-complete", "--completion-class-info --line=1"],
+#    :completion_class_info_no_candidates => {:klass => XMPCompletionClassInfoFilter, :lineno => 1},
+    :completion_class_info_no_candidates => ["rct-complete", "--completion-class-info --line=1"],
+    
+#     :doc      => {:klass => XMPDocFilter,     :lineno => 1},
+#     :refe     => {:klass => XMPReFeFilter,    :lineno => 1},
+#     :ri       => {:klass => XMPRiFilter,      :lineno => 1},
+#     :ri_emacs => {:klass => XMPRiEmacsFilter, :lineno => 1},
+#     :ri_vim   => {:klass => XMPRiVimFilter,   :lineno => 1},
+    :doc => ["rct-doc", "-D --line=1"],
+    :refe => ["rct-doc", "--refe --line=1"],
+    :ri => ["rct-doc", "--ri --line=1"],
+    :ri_emacs => ["rct-doc", "--ri-emacs --line=1"],
+    :ri_vim => ["rct-doc", "--ri-vim --line=1"],
+    
+  }
+  DIR = File.expand_path(File.dirname(__FILE__))
+  LIBDIR = File.expand_path(DIR + '/../lib')
+
+  tests.each_pair do |test, (bin,opts)|
+    define_method("test_#{test}") do
+      inputfile = "#{DIR}/data/#{test}-input.rb"
+      outputfile = "#{DIR}/data/#{test}-output.rb"
+
+#       exec = File.expand_path(DIR + '/../bin/xmpfilter')
+#       output = `ruby -I#{LIBDIR} #{exec} #{opts} #{DIR}/data/#{test}-input.rb`
+#       outputfile = "#{DIR}/data/#{test}-output.rb"
+      taffile = "#{DIR}/data/#{bin}/#{test}.taf"
+      open(taffile, "w") do |f|
+        f.puts "=========="
+        f.puts test
+        f.puts "=========="
+        f.puts bin + " " + opts
+        f.puts "=========="
+        f.puts File.read("#{DIR}/data/#{test}-input.rb")
+        f.puts "=========="
+        f.puts File.read("#{DIR}/data/#{test}-output.rb")
+      end
+    end
+  end 
+end