module ParallelTest::CLI

def self.any_test_failed?(test_results)
  test_results.any? { |result| result[:exit_status] != 0 }
end

def self.execute_shell_command_in_parallel(command, num_processes, options)
  runs = (0...num_processes).to_a
  results = if options[:non_parallel]
    runs.map do |i|
      ParallelTests::Test::Runner.execute_command(command, i, options)
    end
  else
    Parallel.map(runs, :in_processes => num_processes) do |i|
      ParallelTests::Test::Runner.execute_command(command, i, options)
    end
  end.flatten
  abort if results.any? { |r| r[:exit_status] != 0 }
end

def self.load_runner_for(lib)
  require "parallel_tests/#{lib}/runner"
  eval("ParallelTests::#{lib.capitalize.sub('Rspec','RSpec')}::Runner")
end

def self.parse_options!(argv)
  options = {}
  OptionParser.new do |opts|
    opts.banner = <<BANNER
all tests in parallel, giving each process ENV['TEST_ENV_NUMBER'] ('', '2', '3', ...)
ional] Only run selected files & folders:
parallel_test test/bar test/baz/xxx_text.rb
ons are:
ER
    opts.on("-n [PROCESSES]", Integer, "How many processes to use, default: available CPUs") { |n| options[:count] = n }
    opts.on("-p", '--pattern [PATTERN]', "run tests matching this pattern") { |pattern| options[:pattern] = /#{pattern}/ }
    opts.on("--no-sort", "do not sort files before running them") { |no_sort| options[:no_sort] = no_sort }
    opts.on("-m [FLOAT]", "--multiply-processes [FLOAT]", Float, "use given number as a multiplier of processes to run") { |multiply| options[:multiply] = multiply }
    opts.on("-s [PATTERN]", "--single [PATTERN]", "Run all matching files in only one process") do |pattern|
      options[:single_process] ||= []
      options[:single_process] << /#{pattern}/
    end
    opts.on("-e", '--exec [COMMAND]', "execute this code parallel and with ENV['TEST_ENV_NUM']") { |path| options[:execute] = path }
    opts.on("-o", "--test-options '[OPTIONS]'", "execute test commands with those options") { |arg| options[:test_options] = arg }
    opts.on("-t", "--type [TYPE]", "test(default) / rspec / cucumber") { |type| options[:type] = type }
    opts.on("--non-parallel", "execute same commands but do not in parallel, needs --exec") { options[:non_parallel] = true }
    opts.on("--chunk-timeout [TIMEOUT]", "timeout before re-printing the output of a child-process") { |timeout| options[:chunk_timeout] = timeout.to_f }
    opts.on('-v', '--version', 'Show Version') { puts ParallelTests::VERSION; exit }
    opts.on("-h", "--help", "Show this.") { puts opts; exit }
  end.parse!(argv)
  raise "--no-sort and --single-process are not supported" if options[:no_sort] and options[:single_process]
  options[:files] = argv
  options
end

def self.report_number_of_tests(runner, groups)
  name = runner.test_file_name
  num_processes = groups.size
  num_tests = groups.map(&:size).inject(:+)
  puts "#{num_processes} processes for #{num_tests} #{name}s, ~ #{num_tests / groups.size} #{name}s per process"
end

def self.report_results(runner, test_results)
  results = runner.find_results(test_results.map { |result| result[:stdout] }*"")
  puts ""
  puts runner.summarize_results(results)
end

def self.report_time_taken
  start = Time.now
  yield
  puts ""
  puts "Took #{Time.now - start} seconds"
end

def self.run(argv)
  options = parse_options!(argv)
  num_processes = ParallelTests.determine_number_of_processes(options[:count])
  num_processes = num_processes * (options[:multiply] || 1)
  if options[:execute]
    execute_shell_command_in_parallel(options[:execute], num_processes, options)
  else
    run_tests_in_parallel(num_processes, options)
  end
end

def self.run_tests(runner, group, process_number, options)
  if group.empty?
    {:stdout => '', :exit_status => 0}
  else
    runner.run_tests(group, process_number, options)
  end
end

def self.run_tests_in_parallel(num_processes, options)
  test_results = nil
  lib = options[:type] || 'test'
  runner = load_runner_for(lib)
  report_time_taken do
    groups = runner.tests_in_groups(options[:files], num_processes, options)
    report_number_of_tests runner, groups
    test_results = Parallel.map(groups, :in_processes => groups.size) do |group|
      run_tests(runner, group, groups.index(group), options)
    end
    report_results runner, test_results
  end
  abort "#{lib.capitalize}s Failed" if any_test_failed?(test_results)
end