module Analyze
  class Presenter
    attr_reader :params, :school, :academic_year

    def initialize(params:, school:, academic_year:)
      @params = params
      @school = school
    end

    def category
      @category ||= Category.find_by_category_id(params[:category]) || Category.order(:category_id).first
    end

    def categories
      @categories = Category.all.order(:category_id)
    end

    def subcategory
      @subcategory ||= Subcategory.find_by_subcategory_id(params[:subcategory]) || subcategories.first
    end

    def subcategories
      @subcategories = category.subcategories.order(:subcategory_id)
    end

    def measures
      @measures = subcategory.measures.order(:measure_id).includes(%i[admin_data_items subcategory])
    end

    def academic_years
      @academic_years = AcademicYear.order(:range).all
    end

    def selected_academic_years
      @selected_academic_years ||= begin
        array = []

        keys = params.keys.select { |key| key.start_with? "academic_year" }
        keys.each do |key|
          year_params = params[key]&.chomp
          next if year_params.nil?

          array << AcademicYear.find_by_range(year_params)
        end
        array
      end
    end

    def races
      @races ||= Race.all.order(designation: :ASC)
    end

    def selected_races
      @selected_races ||= selected_items(name: "race", list: races)
    end

    def ells
      @ells ||= Ell.all.order(slug: :ASC)
    end

    def selected_ells
      @selected_ells ||= selected_items(name: "ell", list: ells)
    end

    def selected_items(name:, list:)
      selected_params = params.select { |key, _| key.start_with?(name) && key.end_with?("checkbox") }
      return list unless selected_params.keys.length.positive?

      selected_params.values
                     .map { |slug| list.find { |item| item.slug == slug } }
    end

    def speds
      @speds ||= Sped.all.order(id: :ASC)
    end

    def selected_speds
      @selected_speds ||= selected_items(name: "sped", list: speds)
    end

    def selected_grades
      @selected_grades ||= begin
        selected_params = params.select { |key, _| key.start_with?("grade") && key.end_with?("checkbox") }
        return grades unless selected_params.keys.length.positive?

        selected_params.values.map(&:to_i)
      end
    end

    def selected_genders
      @selected_genders ||= selected_items(name: "gender", list: genders)
    end

    def genders
      @genders ||= Gender.all.order(designation: :ASC)
    end

    def groups
      @groups = [Analyze::Group::Ell.new, Analyze::Group::Gender.new, Analyze::Group::Grade.new, Analyze::Group::Income.new,
                 Analyze::Group::Race.new, Analyze::Group::Sped.new]
    end

    def group
      @group ||= groups.reduce(groups.first) do |acc, group|
        group.slug == params[:group] ? group : acc
      end
    end

    def slice
      @slice ||= graph.slice || slices.first
    end

    def slices
      graphs.map { |graph| graph.slice }.uniq
    end

    def source
      @source ||= graph&.source || sources.first
    end

    def show_secondary_graph?(measure:)
      return false unless measure.includes_parent_survey_items?

      graph.slug == "all-data"
    end

    def columns_for_measure(measure:)
      return unless measure.includes_parent_survey_items?

      measure.scales.parent_scales.map do |scale|
        Analyze::Graph::Column::Parent::Scale.new(scale:)
      end
    end

    def sources
      all_data_slice = Analyze::Slice::AllData.new
      all_data_slice.graph = Analyze::Graph::AllData.new
      all_data_slices = [all_data_slice]

      all_data_source = Analyze::Source::AllData.new(slices: all_data_slices)
      all_data_source.graph = Analyze::Graph::AllData.new

      students_and_teachers = Analyze::Slice::StudentsAndTeachers.new
      students_by_group = Analyze::Slice::StudentsByGroup.new
      students_by_group.graph = Analyze::Graph::StudentsByEll.new(ells: selected_ells)

      survey_data_slices = [students_and_teachers, students_by_group]
      survey_data_source = Analyze::Source::SurveyData.new(slices: survey_data_slices)
      survey_data_source.graph = Analyze::Graph::StudentsAndTeachers.new

      @sources = [all_data_source, survey_data_source]
    end

    def graphs
      @graphs ||= [Analyze::Graph::AllData.new,
                   Analyze::Graph::StudentsAndTeachers.new,
                   Analyze::Graph::StudentsByRace.new(races: selected_races),
                   Analyze::Graph::StudentsByGrade.new(grades: selected_grades),
                   Analyze::Graph::StudentsByGender.new(genders: selected_genders),
                   Analyze::Graph::StudentsByIncome.new(incomes: selected_incomes),
                   Analyze::Graph::StudentsByEll.new(ells: selected_ells),
                   Analyze::Graph::StudentsBySped.new(speds: selected_speds)]
    end

    def graph
      @graph ||= graphs.find do |graph|
        graph.slug == params[:graph]
      end || graphs.first
    end

    def grades
      @grades ||= SurveyItemResponse.where(school:, academic_year: academic_years)
                                    .where.not(grade: nil)
                                    .group(:grade)
                                    .select(:response_id)
                                    .distinct(:response_id)
                                    .count.reject do |_key, value|
        value < 10
      end.keys
    end

    def incomes
      @incomes ||= Income.all
    end

    def selected_incomes
      @selected_incomes ||= selected_items(name: "income", list: incomes)
    end

    def cache_objects
      [category,
       subcategory,
       selected_academic_years,
       graph,
       selected_races,
       selected_grades,
       grades,
       selected_genders,
       genders,
       selected_ells,
       ells,
       selected_speds,
       speds]
    end
  end
end