# encoding: utf-8
# This file is part of ruby-flores.
# Copyright (C) 2015 Jordan Sissel
# 
require "flores/namespace"
require "rspec/core/formatters/base_text_formatter"

Flores::RSpec::Formatters::Analyze = Class.new(RSpec::Core::Formatters::BaseTextFormatter) do
  RSpec::Core::Formatters.register self, :dump_failures, :dump_summary, :start, :example_passed, :example_failed, :example_pending

  SPINNER = %w(▘ ▝ ▗ ▖)

  def example_passed(_event)
    increment(:pass)
  end

  def example_failed(_event)
    increment(:failed)
  end

  def example_pending(_event)
    increment(:pending)
  end

  def increment(status)
    return unless output.tty?
    now = Time.new
    if status == :failed
      output.write("F")
    elsif status == :pending
      output.write("P")
    end

    update_status if now - @last_update > 0.200
  end

  def update_status
    glyph = SPINNER[@count]
    output.write("#{glyph} ")
    @last_update = Time.new
    @count += 1
    @count = 0 if @count >= SPINNER.size
  end

  def start(event)
    @last_update = Time.now
    @total = event.count
    @count = 0
  end

  def dump_summary(event)
    output.write("\r") if output.tty?
    # The event is an RSpec::Core::Notifications::SummaryNotification
    # Let's mimic the BaseTextFormatter but without the failing test report
    output.puts "Finished in #{event.formatted_duration}"
    output.puts "#{event.colorized_totals_line}"
  end

  def failures?(examples)
    return examples.select { |e| e.metadata[:execution_result].status == :failed }.any?
  end

  def dump_failures(event)
    return unless failures?(event.examples)
    group = event.examples.each_with_object(Hash.new { |h, k| h[k] = [] }) do |e, m| 
      m[e.metadata[:full_description]] << e
      m
    end
    group.each { |description, examples| dump_example_summary(description, examples) }
  end

  def dump_example_summary(description, examples)
    output.puts description
    analysis = Flores::RSpec::Analyze::Analysis.new(group_by_result(examples))
    output.puts(analysis.to_s.gsub(/^/, "  "))
  end

  def group_by_result(examples) # rubocop:disable Metrics/AbcSize
    examples.each_with_object(Hash.new { |h, k| h[k] = [] }) do |example, results|
      status = example.metadata[:execution_result].status
      case status
      when :passed, :pending
        results[status] << [example.metadata[:values], nil]
      else
        exception = example.metadata[:execution_result].exception
        results[exception.class] << [example.metadata[:values], exception]
      end
      results
    end
  end

  def method_missing(m, *args)
    p m => args
  end
end