require_relative "compares_safely"

module Mocktail
  class DeterminesMatchingCalls
    def initialize
      @compares_safely = ComparesSafely.new
    end

    def determine(real_call, demo_call, demo_config)
      @compares_safely.compare(real_call.double, demo_call.double) &&
        @compares_safely.compare(real_call.method, demo_call.method) &&

        # Matcher implementation will replace this:
        args_match?(real_call.args, demo_call.args, demo_config.ignore_extra_args) &&
        kwargs_match?(real_call.kwargs, demo_call.kwargs, demo_config.ignore_extra_args) &&
        blocks_match?(real_call.block, demo_call.block, demo_config.ignore_block)
    end

    private

    def args_match?(real_args, demo_args, ignore_extra_args)
      return true if ignore_extra_args && demo_args.empty?

      (
        real_args.size == demo_args.size ||
        (ignore_extra_args && real_args.size >= demo_args.size)
      ) &&
        demo_args.each.with_index.all? { |demo_arg, i|
          match?(real_args[i], demo_arg)
        }
    end

    def kwargs_match?(real_kwargs, demo_kwargs, ignore_extra_args)
      return true if ignore_extra_args && demo_kwargs.empty?

      (
        real_kwargs.size == demo_kwargs.size ||
        (ignore_extra_args && real_kwargs.size >= demo_kwargs.size)
      ) &&
        demo_kwargs.all? { |key, demo_val|
          real_kwargs.key?(key) && match?(real_kwargs[key], demo_val)
        }
    end

    def blocks_match?(real_block, demo_block, ignore_block)
      ignore_block ||
        (real_block.nil? && demo_block.nil?) ||
        (
          real_block && demo_block &&
          (
            demo_block == real_block ||
            demo_block.call(real_block)
          )
        )
    end

    def match?(real_arg, demo_arg)
      if demo_arg.respond_to?(:is_mocktail_matcher?) &&
          demo_arg.is_mocktail_matcher?
        demo_arg.match?(real_arg)
      else
        demo_arg == real_arg # TODO <-- test if mock object and call safe compare if so, otherwise ==
      end
    end
  end
end