scottwillson/racing_on_rails

# frozen_string_literal: true

require "array/each_row"
require "enumerable/stable_sort"

module ResultsHelper
  # TODO: Move to module in Race?
  # Order is significant
  RESULT_COLUMNS = %w[
    place number name team_name age city age_group category_class category_name points_bonus points_bonus_penalty
    points_from_place points_penalty points_total time_bonus_penalty time_gap_to_leader time_gap_to_previous
    time_gap_to_winner points laps time time_total notes rejection_reason
  ].freeze

  # results for pagination
  def results_table(event, race, results = nil)
    return "" unless race

    table = Tabular::Table.new

    table.row_mapper = Results::Mapper.new(
                           %w[ place number name team_name ],
                           race.try(:custom_columns),
                           RESULT_COLUMNS - %w[ place name team_name ]
                         )

    table.rows = if results
                   results.sort
                 else
                   race.results.sort
                 end

    table.delete_blank_columns!
    table.delete_homogenous_columns!(except: %i[place number team_name time laps points])

    table.renderer = Results::Renderers::DefaultResultRenderer
    table.renderers[:name] = Results::Renderers::NameRenderer
    table.renderers[:team_name] = Results::Renderers::TeamNameRenderer
    table.renderers[:time] = Results::Renderers::TimeRenderer
    table.renderers[:time_bonus_penalty] = Results::Renderers::TimeRenderer
    table.renderers[:time_gap_to_leader] = Results::Renderers::TimeRenderer
    table.renderers[:time_gap_to_previous] = Results::Renderers::TimeRenderer
    table.renderers[:time_gap_to_winner] = Results::Renderers::TimeRenderer
    table.renderers[:time_total] = Results::Renderers::TimeRenderer
    table.renderers[:points] = Results::Renderers::PointsRenderer
    table.renderers[:points_bonus] = Results::Renderers::PointsRenderer
    table.renderers[:points_bonus_penalty] = Results::Renderers::PointsRenderer
    table.renderers[:points_from_place] = Results::Renderers::PointsRenderer
    table.renderers[:points_penalty] = Results::Renderers::PointsRenderer
    table.renderers[:points_total] = Results::Renderers::PointsRenderer
    table.renderers[:rejection_reason] = Results::Renderers::RejectionReasonRenderer

    css_class = "results individual"
    column_keys = table.columns.map(&:key)
    if (event.respond_to?(:team?) && event.team?) || (column_keys.include?(:team_name) && !column_keys.include?(:name))
      css_class = "results team"
    end

    render "results/table", table: table, css_class: css_class
  end

  def participant_event_results_table(participant, event_results)
    table = Tabular::Table.new
    css_class = "results individual"

    case participant
    when Person
      table.row_mapper = Results::Mapper.new(%w[ place event_full_name race_name event_date_range_s ])

    when Team
      table.row_mapper = Results::Mapper.new(%w[ place event_full_name race_name name event_date_range_s ])
      css_class = "results team"

    else
      raise ArgumentError, "participant must be a Person or Team but was #{participant.class}"
    end

    table.rows = event_results.sort_by(&:date).reverse
    table.renderer = Results::Renderers::DefaultResultRenderer
    table.renderers[:event_full_name] = Results::Renderers::EventFullNameRenderer
    table.renderers[:points] = Results::Renderers::PointsRenderer
    render "results/table", table: table, css_class: css_class
  end

  def scores_table(result)
    table = Tabular::Table.new
    css_class = "individual results scores"

    if result.team_competition_result?
      css_class = "team results scores"
      table.row_mapper = Results::Mapper.new(%w[ place event_full_name race_name name event_date_range_s notes points ])
    else
      table.row_mapper = Results::Mapper.new(%w[ place event_full_name race_name event_date_range_s points ])
    end

    table.rows = result.scores.sort_by { |score| [score.source_result.date, -score.points] }.map do |score|
      source_result = score.source_result
      source_result.notes = score.notes
      source_result.points = score.points
      source_result
    end
    table.rows << Tabular::Row.new(table, points: result.points)
    table.renderer = Results::Renderers::DefaultResultRenderer
    table.renderers[:event_full_name] = Results::Renderers::ScoreEventFullNameRenderer
    table.renderers[:points] = Results::Renderers::PointsRenderer
    table.delete_blank_columns!
    render "results/table", table: table, css_class: css_class
  end

  def sources_table(result)
    table = Tabular::Table.new
    css_class = "individual results scores"

    if result.team_competition_result?
      css_class = "team results scores"
      table.row_mapper = Results::Mapper.new(%w[ place event_full_name race_name name event_date_range_s notes points ])
    else
      table.row_mapper = Results::Mapper.new(%w[ place event_full_name race_name event_date_range_s points ])
    end

    table.rows = result.sources
                       .reject(&:rejected?)
                       .sort_by { |source| [source.source_result.date, -source.points] }
                       .map do |source|
                         source_result = source.source_result
                         source_result.notes = source.rejection_reason
                         source_result.points = source.points
                         source_result
                       end

    table.rows << Tabular::Row.new(table, points: result.points)
    table.renderer = Results::Renderers::DefaultResultRenderer
    table.renderers[:event_full_name] = Results::Renderers::ScoreEventFullNameRenderer
    table.renderers[:points] = Results::Renderers::PointsRenderer
    table.delete_blank_columns!
    render "results/table", table: table, css_class: css_class
  end

  def edit_results_table(race)
    table = Tabular::Table.new
    table.row_mapper = Results::Mapper.new(RESULT_COLUMNS, race.custom_columns)

    table.rows = race.results.sort

    table.delete_blank_columns! except: %i[place number name team_name time points laps]
    table.delete_homogenous_columns! except: %i[place number name team_name time points laps]

    table.renderer = Results::Renderers::DefaultResultRenderer
    table.renderers[:time] = Results::Renderers::TimeRenderer
    table.renderers[:time_bonus_penalty] = Results::Renderers::TimeRenderer
    table.renderers[:time_gap_to_leader] = Results::Renderers::TimeRenderer
    table.renderers[:time_gap_to_previous] = Results::Renderers::TimeRenderer
    table.renderers[:time_gap_to_winner] = Results::Renderers::TimeRenderer
    table.renderers[:time_total] = Results::Renderers::TimeRenderer
    table.renderers[:points] = Results::Renderers::PointsRenderer
    table.renderers[:points_bonus] = Results::Renderers::PointsRenderer
    table.renderers[:points_bonus_penalty] = Results::Renderers::PointsRenderer
    table.renderers[:points_from_place] = Results::Renderers::PointsRenderer
    table.renderers[:points_penalty] = Results::Renderers::PointsRenderer
    table.renderers[:points_total] = Results::Renderers::PointsRenderer

    table.columns << :bar

    render "admin/races/results", results_table_for_race: table, race: race, css_class: "results"
  end
end