# frozen_string_literal: true

require 'rspec/expectations'

RSpec::Matchers.define :be_an_equal_exercise_as do |exercise|
  match do |actual|
    equal?(actual, exercise)
  end
  failure_message do |actual|
    "#{actual.inspect} is not equal to \n#{exercise.inspect}. \nLast checked attribute: #{@last_checked}"
  end

  def equal?(object, other)
    return false unless object.class == other.class
    return attributes_equal?(object, other) if object.is_a?(ApplicationRecord)
    return array_equal?(object, other) if object.is_a?(Array) || object.is_a?(ActiveRecord::Associations::CollectionProxy)

    object == other
  end

  def attributes_equal?(object, other)
    other_attributes = attributes_and_associations(other)
    attributes_and_associations(object).each do |k, v|
      @last_checked = "#{k}: \n\"#{v}\" vs \n\"#{other_attributes[k]}\""
      return false unless equal?(other_attributes[k], v)
    end
    true
  end

  def array_equal?(object, other)
    return true if object == other # for []
    return false if object.length != other.length

    object.map do |element|
      other.map {|other_element| equal?(element, other_element) }.any?
    end.all? && other.map do |element|
      object.map {|other_element| equal?(element, other_element) }.any?
    end.all?
  end

  def attributes_and_associations(object)
    object.attributes.dup.tap do |attributes|
      attributes[:files] = object.files if defined? object.files
    end.except('id', 'created_at', 'updated_at', 'exercise_id', 'uuid')
  end
end