class RSpec::Mocks::Matchers::HaveReceived

def apply_constraints_to(expectation)
  @constraints.each do |constraint|
    expectation.send(*constraint)
  end
end

def capture_failure_message
  RSpec::Support.with_failure_notifier(Proc.new { |err, _opt| return err.message }) do
    notify_failure_message
  end
end

def count_constraint
  @constraints.map(&:first).find do |constraint|
    COUNT_CONSTRAINTS.include?(constraint)
  end
end

def description
  (@expectation ||= expect).description_for("have received")
end

def disallow(type, reason="")
  RSpec::Mocks.error_generator.raise_have_received_disallowed(type, reason)
end

def does_not_match?(subject)
  @subject = subject
  ensure_count_unconstrained
  @expectation = expect.never
  mock_proxy.ensure_implemented(@method_name)
  expected_messages_received_in_order?
end

def ensure_count_unconstrained
  return unless count_constraint
  RSpec::Mocks.error_generator.raise_cant_constrain_count_for_negated_have_received_error(count_constraint)
end

def expect
  expectation = mock_proxy.build_expectation(@method_name)
  apply_constraints_to expectation
  expectation
end

def expected_messages_received_in_order?
  mock_proxy.replay_received_message_on @expectation, &@block
  @expectation.expected_messages_received? && @expectation.ensure_expected_ordering_received!
end

def failure_message
  capture_failure_message
end

def failure_message_when_negated
  capture_failure_message
end

def initialize(method_name, &block)
  @method_name = method_name
  @block = block
  @constraints = []
  @subject = nil
end

def matcher_name
  "have_received"
end

def matches?(subject, &block)
  @block ||= block
  @subject = subject
  @expectation = expect
  mock_proxy.ensure_implemented(@method_name)
  expected_messages_received_in_order?
end

def mock_proxy
  RSpec::Mocks.space.proxy_for(@subject)
end

def notify_failure_message
  mock_proxy.check_for_unexpected_arguments(@expectation)
  @expectation.generate_error
end

def setup_allowance(_subject, &_block)
  disallow("allow", " as it would have no effect")
end

def setup_any_instance_allowance(_subject, &_block)
  disallow("allow_any_instance_of")
end

def setup_any_instance_expectation(_subject, &_block)
  disallow("expect_any_instance_of")
end

def setup_any_instance_negative_expectation(_subject, &_block)
  disallow("expect_any_instance_of")
end

def setup_expectation(subject, &block)
  notify_failure_message unless matches?(subject, &block)
end

def setup_negative_expectation(subject, &block)
  notify_failure_message unless does_not_match?(subject, &block)
end