require 'test/unit'
require 'fileutils'
require 'find'

unless defined?(TEST_DIR)
	TEST_DIR = File.dirname(__FILE__)
end
require_relative '../lib/ohloh_scm'

OhlohScm::Adapters::AbstractAdapter.logger = Logger.new(File.open('log/test.log','a'))

unless defined?(REPO_DIR)
	REPO_DIR = File.expand_path(File.join(TEST_DIR, 'repositories'))
end

unless defined?(DATA_DIR)
	DATA_DIR = File.expand_path(File.join(TEST_DIR, 'data'))
end

class Scm::Test < Test::Unit::TestCase
	# For reasons unknown, the base class defines a default_test method to throw a failure.
	# We override it with a no-op to prevent this 'helpful' feature.
	def default_test
	end

	def assert_convert(parser, log, expected)
		result = ''
		parser.parse File.new(log), :writer => OhlohScm::Parsers::XmlWriter.new(result)
		assert_buffers_equal File.read(expected), result
	end

	# assert_equal just dumps the massive strings to the console, which is not helpful.
	# Instead we try to indentify the line of the first error.
	def assert_buffers_equal(expected, actual)
		return if expected == actual

		expected_lines = expected.split("\n")
		actual_lines = actual.split("\n")

		expected_lines.each_with_index do |line, i|
			if line != actual_lines[i]
				assert_equal line, actual_lines[i], "at line #{i} of the reference buffer"
			end
		end

		# We couldnt' find the mismatch. Just bail.
		assert_equal expected_lines, actual_lines
	end

	def with_repository(type, name)
		Scm::ScratchDir.new do |dir|
			if Dir.entries(REPO_DIR).include?(name)
				`cp -R #{File.join(REPO_DIR, name)} #{dir}`
			elsif Dir.entries(REPO_DIR).include?(name + '.tgz')
				`tar xzf #{File.join(REPO_DIR, name + '.tgz')} --directory #{dir}`
			else
				raise RuntimeError.new("Repository archive #{File.join(REPO_DIR, name)} not found.")
			end
			yield type.new(:url => File.join(dir, name)).normalize
		end
	end

  # We are unable to add a commit message with non utf8 characters using svn 1.6 & above.
  # In order to emulate encoding issues, we use a custom svn executable that returns
  #   an xml log with invalid characters in it.
  # We prepend our custom svn's location to $PATH to make it available during our tests.
  def with_invalid_encoded_svn_repository
    with_repository(OhlohScm::Adapters::SvnChainAdapter, 'svn_with_invalid_encoding') do |svn|
      original_env_path = ENV['PATH']
      custom_svn_path = File.expand_path('../bin/', __FILE__)
      ENV['PATH'] = custom_svn_path + ':' + ENV['PATH']

      yield svn

      ENV['PATH'] = original_env_path
    end
  end

	def with_svn_repository(name, branch_name='')
		with_repository(OhlohScm::Adapters::SvnAdapter, name) do |svn|
			svn.branch_name = branch_name
			svn.url = File.join(svn.root, svn.branch_name)
			svn.url = svn.url[0..-2] if svn.url[-1..-1] == '/' # Strip trailing /
			yield svn
		end
	end

	def with_svn_chain_repository(name, branch_name='')
		with_repository(OhlohScm::Adapters::SvnChainAdapter, name) do |svn|
			svn.branch_name = branch_name
			svn.url = File.join(svn.root, svn.branch_name)
			svn.url = svn.url[0..-2] if svn.url[-1..-1] == '/' # Strip trailing /
			yield svn
		end
	end

	def with_cvs_repository(name, module_name='')
		with_repository(OhlohScm::Adapters::CvsAdapter, name) do |cvs|
			cvs.module_name = module_name
			yield cvs
		end
	end

	def with_git_repository(name)
		with_repository(OhlohScm::Adapters::GitAdapter, name) { |git| yield git }
	end

	def with_hg_repository(name)
		with_repository(OhlohScm::Adapters::HgAdapter, name) { |hg| yield hg }
	end

	def with_hglib_repository(name)
		with_repository(OhlohScm::Adapters::HglibAdapter, name) { |hg| yield hg }
	end

	def with_bzr_repository(name)
		with_repository(OhlohScm::Adapters::BzrAdapter, name) { |bzr| yield bzr }
	end

	def with_bzrlib_repository(name)
		with_repository(OhlohScm::Adapters::BzrlibAdapter, name) { |bzr| yield bzr }
	end
end