scout-gear 9.1.0 → 10.0.1

data/test/scout/open/test_util.rb

@@ -1,73 +0,0 @@
-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

@@ -1,119 +0,0 @@
-require File.expand_path(__FILE__).sub(%r(/test/.*), '/test/test_helper.rb')
-require 'scout/path'
-require 'scout/misc'
-require File.expand_path(__FILE__).sub(%r(.*/test/), '').sub(/test_(.*)\.rb/,'\1')
-
-class TestPathFind < Test::Unit::TestCase
-  def test_parts
-    path = Path.setup("share/data/some_file", 'scout')
-    assert_equal "share", path._toplevel
-    assert_equal "data/some_file", path._subpath
-
-    path = Path.setup("data", 'scout')
-    assert_equal "", path._toplevel
-    assert_equal "data", path._subpath
-  end
-
-  def test_find_local
-    map = File.join('/usr/local', "{TOPLEVEL}", "{PKGDIR}", "{SUBPATH}")
-    path = Path.setup("share/data/some_file", 'scout')
-    target = "/usr/local/share/scout/data/some_file"
-    assert_equal target, Path.follow(path, map)
-  end
-
-  def test_find
-    path = Path.setup("share/data/some_file", 'scout')
-    assert_equal "/usr/share/scout/data/some_file", path.find(:usr)
-  end
-
-  def test_current
-    path = Path.setup("share/data/some_file", 'scout')
-    TmpFile.in_dir do |tmpdir|
-      assert_equal_path File.join(tmpdir,"share/data/some_file"),  path.find(:current)
-    end
-  end
-
-  def test_current_find
-    path = Path.setup("share/data/some_file", 'scout')
-    TmpFile.in_dir do |tmpdir|
-      FileUtils.mkdir_p(File.dirname(File.join(tmpdir, path)))
-      File.write(File.join(tmpdir, path), 'string')
-      assert_equal_path File.join(tmpdir,"share/data/some_file"),  path.find
-      assert_equal :current,  path.find.where
-      assert_equal "share/data/some_file",  path.find.original
-    end
-  end
-
-  def test_current_find_all
-    path = Path.setup("share/data/some_file", 'scout')
-    TmpFile.with_dir do |tmpdir|
-      Path.setup tmpdir
-
-      FileUtils.mkdir_p(tmpdir.lib)
-      FileUtils.mkdir_p(tmpdir.share.data)
-      File.write(tmpdir.share.data.some_file, 'string')
-
-      FileUtils.mkdir_p(tmpdir.subdir.share.data)
-      File.write(tmpdir.subdir.share.data.some_file, 'string')
-
-      path.libdir = tmpdir
-      Misc.in_dir tmpdir.subdir do
-        assert_equal 2, path.find_all.length
-      end
-    end
-  end
-
-  def test_located?
-
-    p = Path.setup("/tmp/foo/bar")
-    assert p.located?
-    assert_equal_path 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_path File.join(tmpdir,"share/data/some_file"),  path.find(:custom)
-
-      path.path_maps[:custom] = [tmpdir, '{TOPLEVEL}/{PKGDIR}/{SUBPATH}'] * "/"
-      assert_equal_path 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_path 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
-
-  def test_gz
-    TmpFile.with_file do |tmpdir|
-      Path.setup(tmpdir)
-      Open.write(tmpdir.somefile + '.gz', "FOO")
-      assert_equal_path tmpdir.somefile + '.gz', tmpdir.somefile.find
-      assert Open.exist?(tmpdir.somefile)
-    end
-  end
-
-  def test_with_extension
-    dir = tmpdir.directory[__method__]
-    list = %w(a b)
-    Misc.in_dir(dir) do
-      file = dir.foo
-      Open.write(file.set_extension('list'), list * "\n")
-      assert_equal list, file.list
-    end
-  end
-end
-

data/test/scout/path/test_util.rb

@@ -1,22 +0,0 @@
-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 TestPathUtil < Test::Unit::TestCase
-  def test_dirname
-    p = Path.setup("/usr/share/scout/data")
-
-    assert_equal "/usr/share/scout", p.dirname
-  end
-
-  def test_glob
-    TmpFile.in_dir :erase => false do |tmpdir|
-      Path.setup tmpdir
-      File.write(tmpdir.foo, 'foo')
-      File.write(tmpdir.bar, 'bar')
-      assert_equal 2, tmpdir.glob.length
-      assert_equal %w(foo bar).sort, tmpdir.glob.collect{|p| p.basename }.sort
-    end
-  end
-end
-

data/test/scout/persist/test_open.rb

@@ -1,37 +0,0 @@
-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

@@ -1,37 +0,0 @@
-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

@@ -1,114 +0,0 @@
-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

@@ -1,46 +0,0 @@
-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
-
-  def test_identify
-    p = Scout.data.file.find(:lib)
-    assert p.located?
-    assert_equal "data/file", p.identify
-  end
-end
-

data/test/scout/resource/test_produce.rb

@@ -1,92 +0,0 @@
-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
-
-  def test_produce_with_extension
-    dir = tmpdir.directory[__method__]
-    dir.pkgdir = Scout
-    list = %w(a b)
-
-    Scout.claim dir["foo.list"], :proc do
-      list
-    end
-
-    Misc.in_dir(dir) do
-      file = dir.foo
-      assert_equal list, file.list
-    end
-  end
-
-  def test_produce_compressed
-    dir = tmpdir.directory[__method__]
-    dir.pkgdir = Scout
-    list = %w(a b)
-
-    Scout.claim dir["foo.gz"], :proc do |filename|
-      list
-    end
-
-    Misc.in_dir(dir) do
-      file = dir.foo
-      assert_include file.produce.find, '.gz'
-    end
-  end
-end

data/test/scout/resource/test_software.rb

@@ -1,24 +0,0 @@
-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 TestResourceSoftware < Test::Unit::TestCase
-  module TestResource
-    extend Resource
-
-    self.subdir = Path.setup('tmp/test-resource')
-  end
-
-  def test_install
-    Resource.install nil, "scout_install_example", tmpdir.software do
-      <<-EOF
-echo "#!/bin/bash\necho WORKING" > $OPT_BIN_DIR/scout_install_example
-chmod +x $OPT_BIN_DIR/scout_install_example
-      EOF
-    end
-    assert_nothing_raised do
-      CMD.cmd(tmpdir.software.opt.bin.scout_install_example).read
-    end
-    assert_equal "WORKING", CMD.cmd('scout_install_example').read.strip
-  end
-end
-

data/test/scout/resource/test_util.rb

@@ -1,36 +0,0 @@
-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 TestResourceUtil < Test::Unit::TestCase
-  def test_identify
-    path = Path.setup('share/data/somedir/somepath').find
-    assert_equal 'share/data/somedir/somepath', Scout.identify(path)
-  end
-
-  def test_identify_with_subdir
-    m = Module.new
-    m.extend Resource
-    m.subdir = 'test/subdir'
-    path = m.root['share/data/somedir/somepath'].find
-    assert_equal 'share/data/somedir/somepath', m.identify(path)
-  end
-
-
-  def test_relocate
-    TmpFile.with_file do |dir|
-      Path.setup dir
-
-      path_base = Path.setup("basedir").someother.file
-      path_base.path_maps[:subdir1] = File.join(dir, 'subdir1', '{PATH}')
-      path_base.path_maps[:subdir2] = File.join(dir, 'subdir2', '{PATH}')
-
-      path1 = path_base.find(:subdir1)
-      path2 = path_base.find(:subdir2)
-
-      Open.write(path1, "TEST")
-      Open.mv path1, path2
-      assert_equal path2, Resource.relocate(path1)
-    end
-  end
-end
-

data/test/scout/simple_opt/test_doc.rb

@@ -1,16 +0,0 @@
-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 TestSimpleOptDoc < Test::Unit::TestCase
-  def test_input_format
-    assert_match 'default: :def', SOPT.input_format(:name, :type, :def, :n)
-  end
-  def test_input_doc
-    inputs =<<-EOF.split("\n").collect{|l| l.split(" ") }
-input1 integer Integer_input 10 i1
-input2 float Float_input 0.2 i2
-    EOF
-    assert SOPT.input_array_doc(inputs).include?('-i1,--input1')
-  end
-end
-

data/test/scout/simple_opt/test_get.rb

@@ -1,11 +0,0 @@
-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

@@ -1,10 +0,0 @@
-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