# frozen_string_literal: true

require "bundler/setup"
require "vcr"
require "timecop"
require "html_proofer"
require "open3"

FIXTURES_DIR = "spec/html-proofer/fixtures"

RSpec.configure do |config|
  # Use color in STDOUT
  config.color = true

  # Use color not only in STDOUT but also in pagers and files
  config.tty = true

  # Use the specified formatter
  config.formatter = :documentation # :progress, :html, :textmate

  # Run in a random order
  config.order = :random
end

def capture_stderr(*)
  original_stderr = $stderr
  original_stdout = $stdout
  $stderr = fake_err = StringIO.new
  $stdout = StringIO.new unless ENV["DEBUG"]
  begin
    yield
  rescue SystemExit # rubocop:disable Lint/SuppressedException
  ensure
    $stderr = original_stderr
    $stdout = original_stdout unless ENV["DEBUG"]
  end
  fake_err.string
end

def make_proofer(item, type, opts)
  opts[:log_level] ||= :error
  case type
  when :file
    HTMLProofer.check_file(item, opts)
  when :directory
    HTMLProofer.check_directory(item, opts)
  when :directories
    HTMLProofer.check_directories(item, opts)
  when :links
    HTMLProofer.check_links(item, opts)
  end
end

def run_proofer(item, type, opts = {})
  proofer = make_proofer(item, type, opts)
  cassette_name = make_cassette_name(item, opts)
  VCR.use_cassette(cassette_name, record: :new_episodes) do
    capture_stderr { proofer.run }
    proofer
  end
end

def capture_proofer_http(item, type, opts = {})
  proofer = make_proofer(item, type, opts)
  cassette_name = make_cassette_name(item, opts)
  VCR.use_cassette(cassette_name, record: :new_episodes) do
    capture_stderr { proofer.run }
    VCR.current_cassette.serializable_hash["http_interactions"].last
  end
end

def make_bin(args)
  ap("#{RbConfig.ruby} exe/htmlproofer #{args}") if debug? # rubocop:disable RSpec/Output
  stdout, stderr = Open3.capture3("#{RbConfig.ruby} exe/htmlproofer #{args}")
  # Filter out Ruby experimental warnings (e.g., IO::Buffer in Ruby 4.0)
  stderr = stderr.lines.reject { |line| line.include?("warning:") && line.include?("experimental") }.join
  "#{stdout}\n#{stderr}".encode("UTF-8", invalid: :replace, undef: :replace)
end

def make_cassette_name(file, opts)
  filename = if file.is_a?(Array)
    file.join("_")
  else
    file.split("/")[-2..].join("/")
  end
  (filename += opts.inspect) unless opts.empty?
  filename
end

def debug?
  ENV.fetch("DEBUG", false)
end

def ci?
  ENV.fetch("CI", false)
end

VCR.configure do |config|
  config.cassette_library_dir = File.join(FIXTURES_DIR, "vcr_cassettes")
  config.hook_into(:typhoeus)
end
