scout-gear 1.2.0 → 5.1.1

data/test/scout/open/test_util.rb

@@ -0,0 +1,73 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+require 'scout/open'
+
+class TestOpenUtil < Test::Unit::TestCase
+  def test_read_grep
+    content =<<-EOF
+1
+2
+3
+4
+    EOF
+    TmpFile.with_file(content) do |file|
+      sum = 0
+      Open.read(file, :grep => '^1\|3') do |line| sum += line.to_i end
+      assert_equal(1 + 3, sum)
+    end
+
+    TmpFile.with_file(content) do |file|
+      sum = 0
+      Open.read(file, :grep => ["1","3"]) do |line| sum += line.to_i end
+      assert_equal(1 + 3, sum)
+    end
+  end
+
+  def test_read_grep_invert
+    content =<<-EOF
+1
+2
+3
+4
+    EOF
+    TmpFile.with_file(content) do |file|
+      sum = 0
+      Open.read(file, :grep => '^1\|3', :invert_grep => true) do |line| sum += line.to_i end
+      assert_equal(2 + 4, sum)
+    end
+
+    TmpFile.with_file(content) do |file|
+      sum = 0
+      Open.read(file, :grep => ["1","3"]) do |line| sum += line.to_i end
+      assert_equal(1 + 3, sum)
+    end
+  end
+
+  def test_ln_s
+    TmpFile.with_file do |directory|
+      Path.setup(directory)
+      file1 = directory.subdir1.file
+      file2 = directory.subdir2.file
+      Open.write(file1, "TEST")
+      Open.ln_s file1, file2
+      assert_equal "TEST", Open.read(file2)
+      Open.write(file1, "TEST2")
+      assert_equal "TEST2", Open.read(file2)
+    end
+  end
+
+  def test_ln_h
+    TmpFile.with_file do |directory|
+      Path.setup(directory)
+      file1 = directory.subdir1.file
+      file2 = directory.subdir2.file
+      Open.write(file1, "TEST")
+      Open.ln_s file1, file2
+      assert_equal "TEST", Open.read(file2)
+      Open.write(file1, "TEST2")
+      assert_equal "TEST2", Open.read(file2)
+    end
+  end
+end
+

data/test/scout/path/test_find.rb

@@ -10,7 +10,7 @@ class TestPathFind < Test::Unit::TestCase
     assert_equal "data/some_file", path._subpath
 
     path = Path.setup("data", 'scout')
-    assert_equal nil, path._toplevel
+    assert_equal "", path._toplevel
     assert_equal "data", path._subpath
   end
 
@@ -63,5 +63,41 @@ class TestPathFind < Test::Unit::TestCase
     end
   end
 
+  def test_located?
+
+    p = Path.setup("/tmp/foo/bar")
+    assert p.located?
+    assert_equal p, p.find
+    
+  end
+
+  def test_custom
+    path = Path.setup("share/data/some_file", 'scout')
+    TmpFile.with_file do |tmpdir|
+      path.path_maps[:custom] = [tmpdir, '{PATH}'] * "/"
+      assert_equal File.join(tmpdir,"share/data/some_file"),  path.find(:custom)
+
+      path.path_maps[:custom] = [tmpdir, '{TOPLEVEL}/{PKGDIR}/{SUBPATH}'] * "/"
+      assert_equal File.join(tmpdir,"share/scout/data/some_file"),  path.find(:custom)
+    end
+  end
+
+  def test_pkgdir
+    path = Path.setup("share/data/some_file", 'scout')
+    TmpFile.with_file do |tmpdir|
+      path.pkgdir = 'scout_alt'
+      path.path_maps[:custom] = [tmpdir, '{TOPLEVEL}/{PKGDIR}/{SUBPATH}'] * "/"
+      assert_equal File.join(tmpdir,"share/scout_alt/data/some_file"),  path.find(:custom)
+    end
+  end
+
+  def test_sub
+    path = Path.setup("bin/scout/find")
+
+    assert_equal "/some_dir/bin/scout_commands/find",  Path.follow(path, "/some_dir/{PATH/scout/scout_commands}")
+    assert_equal "/some_dir/scout_commands/find",  Path.follow(path, '/some_dir/{PATH/bin\/scout/scout_commands}')
+  end
+
+
 end
 

data/test/scout/persist/test_open.rb

@@ -0,0 +1,37 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+class TestPersistOpen < Test::Unit::TestCase
+
+  def obj
+    ["TEST", 2, :symbol, {"a" => [1,2], :b => 3}]
+  end
+
+  def test_json
+    obj = ["TEST", 2]
+    TmpFile.with_file(obj.to_json) do |tmpfile|
+      assert_equal obj, Open.json(tmpfile)
+    end
+  end
+
+  def test_yaml
+    TmpFile.with_file(obj.to_yaml) do |tmpfile|
+      assert_equal obj, Open.yaml(tmpfile)
+    end
+  end
+
+  def test_marshal
+    TmpFile.with_file(Marshal.dump(obj)) do |tmpfile|
+      assert_equal obj, Open.marshal(tmpfile)
+    end
+  end
+
+  def test_yaml_io
+    TmpFile.with_file(obj.to_yaml) do |tmpfile|
+      Open.open(tmpfile) do |f|
+        assert_equal obj, Open.yaml(f)
+      end
+    end
+  end
+end
+

data/test/scout/persist/test_path.rb

@@ -0,0 +1,37 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+class TestPersistPath < Test::Unit::TestCase
+  def obj
+    ["TEST", 2, :symbol, {"a" => [1,2], :b => 3}]
+  end
+
+  def test_json
+    obj = ["TEST", 2]
+    TmpFile.with_file(obj.to_json) do |tmpfile|
+      Path.setup(tmpfile)
+      assert_equal obj, tmpfile.json
+    end
+  end
+
+  def test_yaml
+    TmpFile.with_file(obj.to_yaml) do |tmpfile|
+      assert_equal obj, Open.yaml(tmpfile)
+    end
+  end
+
+  def test_marshal
+    TmpFile.with_file(Marshal.dump(obj)) do |tmpfile|
+      assert_equal obj, Open.marshal(tmpfile)
+    end
+  end
+
+  def test_yaml_io
+    TmpFile.with_file(obj.to_yaml) do |tmpfile|
+      Open.open(tmpfile) do |f|
+        assert_equal obj, Open.yaml(f)
+      end
+    end
+  end
+end
+

data/test/scout/persist/test_serialize.rb

@@ -0,0 +1,114 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+class TestPersistSerialize < Test::Unit::TestCase
+  def test_string
+    TmpFile.with_file do |tmpfile|
+      obj = "TEST"
+      Persist.save(obj, tmpfile, :string)
+      assert_equal obj, Persist.load(tmpfile, :string)
+    end
+  end
+
+  def test_string_io
+    TmpFile.with_file do |tmpfile|
+      obj = StringIO.new("TEST")
+      obj.rewind
+      Persist.save("TEST", tmpfile, :string)
+      assert_equal "TEST", Persist.load(tmpfile, :string)
+    end
+  end
+
+  def test_integer
+    TmpFile.with_file do |tmpfile|
+      obj = 1
+      Persist.save(obj, tmpfile, :integer)
+      assert_equal obj, Persist.load(tmpfile, :integer)
+    end
+  end
+
+  def test_float
+    TmpFile.with_file do |tmpfile|
+      obj = 1.210202
+      Persist.save(obj, tmpfile, :float)
+      assert_equal obj, Persist.load(tmpfile, :float)
+    end
+  end
+
+  def test_array
+    TmpFile.with_file do |tmpfile|
+      obj = %w(one two)
+      Persist.save(obj, tmpfile, :array)
+      assert_equal obj, Persist.load(tmpfile, :array)
+    end
+  end
+
+  def test_integer_array
+    TmpFile.with_file do |tmpfile|
+      obj = [1, 2]
+      Persist.save(obj, tmpfile, :integer_array)
+      assert_equal obj, Persist.load(tmpfile, :integer_array)
+    end
+  end
+
+  def test_float_array
+    TmpFile.with_file do |tmpfile|
+      obj = [1.1, 2.2]
+      Persist.save(obj, tmpfile, :float_array)
+      assert_equal obj, Persist.load(tmpfile, :float_array)
+    end
+  end
+
+  def test_boolean_array
+    TmpFile.with_file do |tmpfile|
+      obj = [true, false, true]
+      Persist.save(obj, tmpfile, :boolean_array)
+      assert_equal obj, Persist.load(tmpfile, :boolean_array)
+    end
+  end
+
+  def test_path_array
+    TmpFile.with_file do |tmpfile|
+      dir = Path.setup("test/dir")
+      obj = [dir.foo, dir.bar]
+      Persist.save(obj, tmpfile, :path_array)
+      assert_equal obj, Persist.load(tmpfile, :path_array)
+      assert_equal dir.foo.find, obj.first.find
+    end
+  end
+
+  def test_path_array_hash
+    TmpFile.with_file do |tmpfile|
+      dir = Path.setup("test/dir")
+      obj = [dir.foo, dir.bar]
+      hash = {}
+      Persist.save(obj, tmpfile, hash)
+      assert_equal obj, Persist.load(tmpfile, hash)
+      assert_equal dir.foo.find, obj.first.find
+    end
+  end
+
+  def test_relative_path
+    TmpFile.with_file do |dir|
+      Path.setup(dir)
+      file = dir.subdir.file
+      Open.write(file, "TEST")
+      Persist.save('./subdir/file', dir.file, :file)
+      assert_equal 'TEST', Open.read(Persist.load(dir.file, :file))
+    end
+  end
+
+  def test_relative_file_array
+    TmpFile.with_file do |dir|
+      Path.setup(dir)
+      file1 = dir.subdir1.file
+      Open.write(file1, "TEST1")
+      file2 = dir.subdir2.file
+      Open.write(file2, "TEST2")
+      Persist.save(["./subdir1/file", "./subdir2/file"], dir.file, :file_array)
+      assert_equal 'TEST1', Open.read(Persist.load(dir.file, :file_array)[0])
+      assert_equal 'TEST2', Open.read(Persist.load(dir.file, :file_array)[1])
+    end
+  end
+end
+

data/test/scout/resource/test_path.rb

@@ -0,0 +1,40 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+require 'scout/resource'
+
+class TestResourcePath < Test::Unit::TestCase
+  module TestResource
+    extend Resource
+
+    self.subdir = Path.setup('tmp/test-resource_alt')
+
+    claim self.tmp.test.string, :string, "TEST"
+  end
+
+  def teardown
+    FileUtils.rm_rf TestResource.root.find
+  end
+
+  def test_read
+    assert_include TestResource.tmp.test.string.read, "TEST"
+  end
+
+  def test_open
+    str = ""
+    TestResource.tmp.test.string.open do |f|
+      str = f.read
+    end
+    assert_include str, "TEST"
+  end
+
+  def test_write
+    TmpFile.with_file do |tmpfile|
+      Path.setup(tmpfile)
+      tmpfile.foo.bar.write do |f|
+        f.puts "TEST"
+      end
+      assert_include tmpfile.foo.bar.read, "TEST"
+    end
+  end
+end
+

data/test/scout/resource/test_produce.rb

@@ -0,0 +1,62 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'../resource')
+
+class TestResourceUnit < Test::Unit::TestCase
+  module TestResource
+    extend Resource
+
+    self.subdir = Path.setup('tmp/test-resource')
+
+    claim self.tmp.test.google, :url, "http://google.com"
+    claim self.tmp.test.string, :string, "TEST"
+    claim self.tmp.test.proc, :proc do
+      "PROC TEST"
+    end
+
+    claim self.tmp.test.rakefiles.Rakefile , :string , <<-EOF
+file('foo') do |t|
+  Open.write(t.name, "FOO")
+end
+
+rule(/.*/) do |t|
+  Open.write(t.name, "OTHER")
+end
+    EOF
+
+    claim self.tmp.test.work.footest, :rake, TestResource.tmp.test.rakefiles.Rakefile
+
+    claim self.tmp.test.work.file_proc, :file_proc do |file,filename|
+      Open.write(filename, file)
+      nil
+    end
+  end
+
+  def teardown
+    FileUtils.rm_rf TestResource.root.find
+  end
+
+  def test_proc
+    TestResource.produce TestResource.tmp.test.proc
+    assert_include File.open(TestResource.tmp.test.proc.find).read, "PROC TEST"
+  end
+
+  def test_string
+    TestResource.produce TestResource.tmp.test.string
+    assert_include File.open(TestResource.tmp.test.string.find).read, "TEST"
+  end
+
+  def test_url
+    TestResource.produce TestResource.tmp.test.google
+    assert_include File.open(TestResource.tmp.test.google.find).read, "html"
+  end
+
+  def test_rake
+    TestResource.produce TestResource.tmp.test.work.footest.foo
+    TestResource.produce TestResource.tmp.test.work.footest.bar
+    TestResource.produce TestResource.tmp.test.work.footest.foo_bar
+    assert_include File.open(TestResource.tmp.test.work.footest.foo.find).read, "FOO"
+    assert_include File.open(TestResource.tmp.test.work.footest.bar.find).read, "OTHER"
+    assert_include File.open(TestResource.tmp.test.work.footest.foo_bar.find).read, "OTHER"
+  end
+end

data/test/scout/simple_opt/test_get.rb

@@ -0,0 +1,11 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require 'scout/simple_opt'
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+class TestSOPTParse < Test::Unit::TestCase
+  def test_consume
+    SOPT.parse("-f--first* first arg:-f--fun")
+    args = "-f myfile --fun".split(" ")
+    assert_equal "myfile", SOPT.consume(args)[:first]
+  end
+end

data/test/scout/simple_opt/test_parse.rb

@@ -0,0 +1,10 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require 'scout/path'
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+class TestSOPTParse < Test::Unit::TestCase
+  def test_parse
+    SOPT.parse("-f--first* first arg:-f--fun")
+    assert_equal "fun", SOPT.shortcuts["fu"]
+  end
+end

data/test/scout/simple_opt/test_setup.rb

@@ -0,0 +1,77 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require 'scout/simple_opt'
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+class TestSOPTSetup < Test::Unit::TestCase
+  def setup
+    SOPT.inputs = nil
+    SOPT.input_types = nil
+    SOPT.input_descriptions = nil
+    SOPT.input_shortcuts = nil
+  end
+
+  def test_setup
+    SOPT.setup <<-EOF
+Test application
+
+$ test cmd -arg 1
+
+It does some imaginary stuff
+
+-a--arg* Argument
+-a2--arg2* Argument
+
+    EOF
+
+    assert_equal "test cmd -arg 1", SOPT.synopsys
+    assert SOPT.inputs.include? "arg"
+    assert SOPT.inputs.include? "arg2"
+  end
+
+  def test_setup_alt
+    SOPT.setup <<-EOF
+Test application
+
+It does some imaginary stuff
+
+-a--arg* Argument
+-a2--arg2* Argument
+
+    EOF
+
+    assert SOPT.inputs.include? "arg"
+    assert SOPT.inputs.include? "arg2"
+  end
+
+  def test_setup_alt2
+    SOPT.setup <<-EOF
+Test application
+
+-a--arg* Argument
+-a2--arg2* Argument
+
+    EOF
+
+    assert SOPT.inputs.include? "arg"
+    assert SOPT.inputs.include? "arg2"
+  end
+
+  def test_setup_alt3
+    SOPT.setup <<-EOF
+Pulls the values from a tsv colum
+
+$ rbbt tsv values [options] <filename.tsv|->
+
+Use - to read from STDIN
+
+-tch--tokyocabinet File is a tokyocabinet hash database
+-tcb--tokyocabinet_bd File is a tokyocabinet B database
+-h--help Print this help
+    EOF
+
+    assert SOPT.inputs.include? "tokyocabinet"
+  end
+
+end
+
+

data/test/scout/test_cmd.rb

@@ -0,0 +1,85 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+require 'scout/open'
+
+class TestCmd < Test::Unit::TestCase
+
+  def test_cmd_option_string
+    assert_equal("--user-agent 'firefox'", CMD.process_cmd_options("--user-agent" => "firefox"))
+    assert_equal("--user-agent='firefox'", CMD.process_cmd_options("--user-agent=" => "firefox"))
+    assert_equal("-q", CMD.process_cmd_options("-q" => true))
+    assert_equal("", CMD.process_cmd_options("-q" => nil))
+    assert_equal("", CMD.process_cmd_options("-q" => false))
+
+    assert(CMD.process_cmd_options("--user-agent" => "firefox", "-q" => true) =~ /--user-agent 'firefox'/)
+    assert(CMD.process_cmd_options("--user-agent" => "firefox", "-q" => true) =~ /-q/)
+  end
+
+  def test_cmd
+    assert_equal("test\n", CMD.cmd("echo '{opt}' test").read)
+    assert_equal("test", CMD.cmd("echo '{opt}' test", "-n" => true).read)
+    assert_equal("test2\n", CMD.cmd("cut", "-f" => 2, "-d" => ' ', :in => "test1 test2").read)
+  end
+
+  def test_pipe
+    assert_equal("test\n", CMD.cmd("echo test", :pipe => true).read)
+    assert_equal("test\n", CMD.cmd("echo '{opt}' test", :pipe => true).read)
+    assert_equal("test", CMD.cmd("echo '{opt}' test", "-n" => true, :pipe => true).read)
+    assert_equal("test2\n", CMD.cmd("cut", "-f" => 2, "-d" => ' ', :in => "test1 test2", :pipe => true).read)
+  end
+
+  def test_error
+    Log.with_severity 6 do
+      assert_raise ProcessFailed do CMD.cmd('fake-command') end
+      assert_raise ProcessFailed do CMD.cmd('ls -fake_option') end
+
+      assert_raise ProcessFailed do CMD.cmd('fake-command', :stderr => true) end
+      assert_raise ProcessFailed do CMD.cmd('ls -fake_option', :stderr => true) end
+
+      assert_nothing_raised ProcessFailed do CMD.cmd('fake-command', :no_fail => true, :pipe => true) end
+      assert_nothing_raised ProcessFailed do CMD.cmd('ls -fake_option', :no_fail => true, :pipe => true) end
+
+      assert_raise ProcessFailed do CMD.cmd('fake-command', :stderr => true, :pipe => true).join end
+      assert_raise ConcurrentStreamProcessFailed do CMD.cmd('ls -fake_option', :stderr => true, :pipe => true).join end
+    end
+  end
+
+  def test_pipes
+    text = <<-EOF
+line1
+line2
+line3
+line11
+line22
+line33
+    EOF
+
+    TmpFile.with_file(text * 100) do |file|
+
+      Open.open(file) do |f|
+        io = CMD.cmd('tail -n 10', :in => f, :pipe => true)
+        io2 = CMD.cmd('head -n 10', :in => io, :pipe => true)
+        io3 = CMD.cmd('head -n 10', :in => io2, :pipe => true)
+        assert_equal 10, io3.read.split(/\n/).length
+      end
+    end
+  end
+
+  def test_STDIN_close
+    TmpFile.with_file("Hello") do |file|
+      STDIN.close
+      Open.open(file) do |f|
+        io = CMD.cmd("tr 'e' 'E'", :in => f, :pipe => true)
+        txt = io.read
+        io.join
+        assert_equal "HEllo", txt
+      end
+    end
+  end
+
+  def test_bash
+    assert_equal "TEST", CMD.bash("echo TEST").read.strip
+    assert_equal ENV["HOME"], CMD.bash("echo $HOME").read.strip
+  end
+end

data/test/scout/test_concurrent_stream.rb

@@ -0,0 +1,29 @@
+require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
+require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
+
+require 'scout/exceptions'
+require 'scout/cmd'
+
+class TestClass < Test::Unit::TestCase
+  def test_concurrent_stream_pipe
+    io = CMD.cmd("ls", :pipe => true, :autojoin => true)
+    io.read
+    io.close 
+  end
+
+  def test_concurrent_stream_process_failed
+    assert_raise ConcurrentStreamProcessFailed do 
+      io = CMD.cmd("grep . NONEXISTINGFILE", :pipe => true, :autojoin => true)
+      io.read
+      io.close 
+    end
+  end
+
+  def test_concurrent_stream_process_failed_autojoin
+    assert_raise ConcurrentStreamProcessFailed do 
+      io = CMD.cmd("grep . NONEXISTINGFILE", :pipe => true, :autojoin => true) 
+      io.read
+    end
+  end
+end
+

data/test/scout/test_misc.rb

@@ -2,12 +2,5 @@ require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
 require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
 
 class TestMisc < Test::Unit::TestCase
-  def test_in_dir
-    TmpFile.with_file do |tmpdir|
-      Misc.in_dir tmpdir do
-        assert_equal tmpdir, FileUtils.pwd
-      end
-    end
-  end
 end