sqm-dashboards/app/presenters/analyze/graph/column/grouped_bar_column_presenter.rb

# frozen_string_literal: true

module Analyze
  module Graph
    module Column
      class GroupedBarColumnPresenter
        include AnalyzeHelper

        attr_reader :measure_name, :measure_id, :category, :position, :measure, :school, :academic_years,
                    :number_of_columns

        def initialize(measure:, school:, academic_years:, position:, number_of_columns:)
          @measure = measure
          @measure_name = @measure.name
          @measure_id = @measure.measure_id
          @category = @measure.subcategory.category
          @school = school
          @academic_years = academic_years
          @position = position
          @number_of_columns = number_of_columns
        end

        def academic_year_for_year_index(year_index)
          academic_years[year_index]
        end

        def score(year_index)
          measure.score(school:, academic_year: academic_years[year_index]) || 0
        end

        def bars
          @bars ||= yearly_scores.map.each_with_index do |yearly_score, index|
            year = yearly_score.year
            Analyze::BarPresenter.new(measure:, academic_year: year,
                                      score: yearly_score.score,
                                      x_position: bar_x(index),
                                      color: bar_color(year))
          end
        end

        def label
          "All Data"
        end

        def basis
          ""
        end

        def show_irrelevancy_message?
          false
        end

        def show_insufficient_data_message?
          scores = academic_years.map do |year|
            measure.score(school:, academic_year: year)
          end

          scores.all? do |score|
            !score.meets_teacher_threshold? && !score.meets_student_threshold? && !score.meets_admin_data_threshold?
          end
        end

        def column_midpoint
          zone_label_width + (grouped_chart_column_width * (position + 1)) - (grouped_chart_column_width / 2)
        end

        def bar_width
          min_bar_width(10.5 / data_sources)
        end

        def min_bar_width(number)
          min_width = 2
          number < min_width ? min_width : number
        end

        def message_x
          column_midpoint - message_width / 2
        end

        def message_y
          17
        end

        def message_width
          20
        end

        def message_height
          34
        end

        def column_end_x
          zone_label_width + (grouped_chart_column_width * (position + 1))
        end

        def column_start_x
          zone_label_width + (grouped_chart_column_width * position)
        end

        def grouped_chart_column_width
          graph_width / data_sources
        end

        def bar_label_height
          (100 - ((100 - analyze_graph_height) / 2))
        end

        def data_sources
          number_of_columns
        end

        def basis
          "student surveys"
        end

        def type
          :all_data
        end

        def show_popover?
          %i[student teacher].include? type
        end

        def n_size(year_index)
          SurveyItemResponse.where(survey_item: measure.student_survey_items, school:, grade: grades(year_index),
                                   academic_year: academic_years[year_index]).select(:response_id).distinct.count
        end

        def popover_content(year_index)
          "#{n_size(year_index)} #{type.to_s.capitalize}s"
        end

        def insufficiency_message
          ["survey response", "rate below 25%"]
        end

        def sufficient_data?(year_index)
          case basis
          when "student"
            score(year_index).meets_student_threshold
          when "teacher"
            score(year_index).meets_teacher_threshold
          else
            true
          end
        end

        def grades(year_index)
          Respondent.find_by(school:, academic_year: academic_years[year_index]).counts_by_grade.keys
        end

        private

        YearlyScore = Struct.new(:year, :score)
        def yearly_scores
          yearly_scores = academic_years.each_with_index.map do |year, index|
            YearlyScore.new(year, score(index))
          end
          yearly_scores.reject do |yearly_score|
            yearly_score.score.blank?
          end
        end

        def bar_color(year)
          @available_academic_years ||= AcademicYear.order(:range).all
          colors[@available_academic_years.find_index(year)]
        end

        def bar_x(index)
          column_start_x + (index * bar_width * 1.2) +
            ((column_end_x - column_start_x) - (yearly_scores.size * bar_width * 1.2)) / 2
        end
      end
    end
  end
end