#! /usr/bin/env ruby
require File.dirname(__FILE__) + '/test_helper.rb'
require '_external_tools'
require '_test-util'

class FetcherTest < Test::Unit::TestCase
  include Gonzui::Util
  include TestUtil

  def teardown
    remove_db(Gonzui::Config.new)
  end

  def validate_foo_files(fetcher, paths)
    paths.each {|path|
      FOO_FILES.include?(File.basename(path))
      content = fetcher.fetch(path)
      tmp = File.read(File.join(File.dirname(__FILE__),
                      "foo", FOO_PACKAGE, path))
      assert_equal(tmp, content.text)
    }
  end

  def test_file
    config = Gonzui::Config.new
    make_dist_tree
    uri = URI.parse(sprintf("file://%s/foo/%s",
        File.expand_path(File.dirname(__FILE__)), # Dir.pwd
        FOO_PACKAGE))
    fetcher = Gonzui::Fetcher.new(config, uri)
    paths = fetcher.collect
    assert_equal(false, paths.empty?)
    validate_foo_files(fetcher, paths)
    fetcher.finish
  end

  def test_http
    config = Gonzui::Config.new
    uri = URI.parse("http://gonzui.sourceforge.net/archives/gonzui-0.1.tar.gz")
    fetcher = Gonzui::Fetcher.new(config, uri)
    paths = fetcher.collect
    assert_equal(false, paths.empty?)
    paths.each {|path|
      content = fetcher.fetch(path)
      assert(content.text.is_a?(String))
    }
    fetcher.finish
  end

  def test_cvs
    config = Gonzui::Config.new
    config.quiet = true
    remove_db(config)
    make_cvs
    uri = URI.for_cvs(cvsroot, "foo")
    fetcher = Gonzui::Fetcher.new(config, uri)
    paths = fetcher.collect
    assert_equal(false, paths.empty?)
    validate_foo_files(fetcher, paths)
    remove_cvs
  end

  def test_svn
    config = Gonzui::Config.new
    config.quiet = true
    remove_db(config)
    make_svn
    uri = URI.for_svn("file://" + svnroot, "foo")
    fetcher = Gonzui::Fetcher.new(config, uri)
    paths = fetcher.collect
    assert_equal(false, paths.empty?)
    validate_foo_files(fetcher, paths)
    remove_svn
  end
end if (ARC_ && CVS_ && SVN_)