require 'rails_helper'

describe ResponseRateLoader do
  let(:school) { create(:school, name: 'milford-high-school') }
  let(:academic_year) { create(:academic_year, range: '2020-21') }
  let(:respondent) do
    respondent = create(:respondent, school:, academic_year:)
    respondent.total_students = 10
    respondent.total_teachers = 10
    respondent.save
  end

  let(:short_form_survey) do
    survey = create(:survey, school:, academic_year:)
    survey.form = :short
    survey.save
    survey
  end

  let(:subcategory) { create(:subcategory, subcategory_id: '5D', name: 'Health') }
  let(:measure) { create(:measure, measure_id: '5D-ii', subcategory:) }

  let(:s_acst_q1) { create(:survey_item, survey_item_id: 's-acst-q1', scale: s_acst) }
  let(:s_acst_q2) { create(:survey_item, survey_item_id: 's-acst-q2', scale: s_acst, on_short_form: true) } # short form
  let(:s_acst_q3) { create(:survey_item, survey_item_id: 's-acst-q3', scale: s_acst) }
  let(:s_poaf_q1) { create(:survey_item, survey_item_id: 's-poaf-q1', scale: s_poaf) }
  let(:s_poaf_q2) { create(:survey_item, survey_item_id: 's-poaf-q2', scale: s_poaf) }
  let(:s_poaf_q3) { create(:survey_item, survey_item_id: 's-poaf-q3', scale: s_poaf, on_short_form: true) } # short form
  let(:s_poaf_q4) { create(:survey_item, survey_item_id: 's-poaf-q4', scale: s_poaf) }
  let(:t_phya_q2) { create(:survey_item, survey_item_id: 't-phya-q2', scale: t_phya) }
  let(:t_phya_q3) { create(:survey_item, survey_item_id: 't-phya-q3', scale: t_phya) }

  let(:s_acst) { create(:scale, scale_id: 's-acst', measure:) }
  let(:s_poaf) { create(:scale, scale_id: 's-poaf', measure:) }
  let(:t_phya) { create(:scale, scale_id: 't-phya', measure:) }
  let(:response_rate) { ResponseRate.find_by(school:, academic_year:) }
  before do
    short_form_survey
    respondent
  end

  after do
    DatabaseCleaner.clean
  end

  describe 'self.reset' do
    context 'When resetting response rates' do
      context 'and half the students responded to each question' do
        before :each do
          create_list(:survey_item_response, 5, survey_item: s_acst_q1, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: s_acst_q2, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: s_acst_q3, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: s_poaf_q1, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: s_poaf_q2, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: s_poaf_q3, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: s_poaf_q4, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: t_phya_q2, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: t_phya_q3, likert_score: 3, school:, academic_year:)

          ResponseRateLoader.reset(schools: [school], academic_years: [academic_year])
        end

        it 'populates the database with response rates' do
          expect(s_acst_q1.survey_item_id).to eq 's-acst-q1'
          expect(subcategory.subcategory_id).to eq '5D'
          expect(subcategory.name).to eq 'Health'
          expect(s_acst.score(school:, academic_year:)).to eq 3
          expect(s_poaf.score(school:, academic_year:)).to eq 3
          expect(t_phya.score(school:, academic_year:)).to eq 3
          expect(response_rate.student_response_rate).to eq 50
          expect(response_rate.teacher_response_rate).to eq 50
          expect(response_rate.meets_student_threshold).to be true
          expect(response_rate.meets_teacher_threshold).to be true
        end
        context 'when running the loader a second time' do
          it 'is idempotent' do
            response_count = ResponseRate.count
            ResponseRateLoader.reset(schools: [school], academic_years: [academic_year])
            second_count = ResponseRate.count

            expect(response_count).to eq second_count
          end
        end
      end

      context 'and only the first question was asked; e.g. its on a short form and this is marked as a short form school' do
        before do
          create_list(:survey_item_response, 5, survey_item: s_acst_q1, likert_score: 3, school:, academic_year:)
          s_acst_q1.update(on_short_form: true)
          create_list(:survey_item_response, 5, survey_item: s_poaf_q1, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: t_phya_q2, likert_score: 3, school:, academic_year:)

          ResponseRateLoader.reset(schools: [school], academic_years: [academic_year])
        end

        it 'only takes into account the first question and ignores the other questions in the scale' do
          expect(response_rate.student_response_rate).to eq 50
          expect(response_rate.teacher_response_rate).to eq 50
        end
      end

      context 'and no respondent entry exists for the school and year' do
        before do
          Respondent.delete_all
          create_list(:survey_item_response, 5, survey_item: s_acst_q1, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: s_poaf_q1, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 5, survey_item: t_phya_q2, likert_score: 3, school:, academic_year:)

          ResponseRateLoader.reset(schools: [school], academic_years: [academic_year])
        end

        it 'since no score can be calculated, it returns a default of 100' do
          expect(response_rate.student_response_rate).to eq 100
          expect(response_rate.teacher_response_rate).to eq 100
        end
      end

      context 'and the school took the short form student survey' do
        before do
          create_list(:survey_item_response, 1, survey_item: s_acst_q1, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 6, survey_item: s_acst_q2, likert_score: 3, school:, academic_year:) # short form
          create_list(:survey_item_response, 1, survey_item: s_acst_q3, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 1, survey_item: s_poaf_q1, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 1, survey_item: s_poaf_q2, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 6, survey_item: s_poaf_q3, likert_score: 3, school:, academic_year:) # short form
          create_list(:survey_item_response, 1, survey_item: s_poaf_q4, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 1, survey_item: t_phya_q2, likert_score: 3, school:, academic_year:)
          create_list(:survey_item_response, 1, survey_item: t_phya_q3, likert_score: 3, school:, academic_year:)
          short_form_survey

          ResponseRateLoader.reset(schools: [school], academic_years: [academic_year])
        end

        it 'only counts responses from survey items on the short form' do
          expect(response_rate.student_response_rate).to eq 60
        end
      end
    end
  end
end