mz026/hash_police

class HashPolice::CheckResult
  attr_reader :context_key

  def initialize context_key
    @context_key = context_key
    @errors = []
    @children = []
  end

  def differ_type options
    @errors << "`#{context_key}`: expect #{options[:expect]}, got #{options[:got]}"
  end

  def error_messages
    all_errors.join("\n")
  end

  def all_errors
    @children.reduce(@errors) do |memo, child|
      memo + child.all_errors
    end
  end

  def concat child_result
    @children << child_result
  end

  def missing key = nil
    error_key = key || context_key
    @errors << "`#{error_key}`: missing"
  end

  def passed?
    all_errors.empty?
  end

  def invalid_by_proc
    @errors << "`#{context_key}` is invalid given Proc fucntion"
  end
end