require "rails_helper"

RSpec.describe FormHandler do
  let(:form_handler) { described_class.instance }
  let(:now) { Time.utc(2022, 9, 20) }

  around do |example|
    Timecop.freeze(now) do
      Singleton.__init__(described_class)
      example.run
    end
  end

  context "when accessing a form in a different year" do
    let(:now) { Time.utc(2021, 8, 3) }

    it "is able to load a current lettings form" do
      form = form_handler.get_form("current_lettings")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
    end

    it "is able to load a next lettings form" do
      form = form_handler.get_form("next_lettings")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
    end
  end

  describe "Get all forms" do
    it "is able to load all the forms" do
      all_forms = form_handler.forms
      expect(all_forms.count).to be >= 1
      expect(all_forms["current_sales"]).to be_a(Form)
    end

    context "when in 23/24 period or later" do
      let(:now) { Time.utc(2023, 6, 7) }

      it "does not load outdated forms" do
        all_forms = form_handler.forms
        expect(all_forms.keys).not_to include nil
      end

      it "loads archived forms" do
        all_forms = form_handler.forms
        expect(all_forms.keys).to include("archived_sales")
        expect(all_forms.keys).to include("archived_lettings")
      end
    end
  end

  describe "Get specific form" do
    let(:now) { Time.utc(2023, 9, 20) }

    it "is able to load a current lettings form" do
      form = form_handler.get_form("current_lettings")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
      expect(form.name).to eq("2023_2024_lettings")
    end

    it "is able to load a previous lettings form" do
      form = form_handler.get_form("previous_lettings")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
      expect(form.name).to eq("2022_2023_lettings")
    end

    it "is able to load a archived lettings form" do
      form = form_handler.get_form("archived_lettings")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
      expect(form.name).to eq("2021_2022_lettings")
    end

    it "is able to load a current sales form" do
      form = form_handler.get_form("current_sales")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
      expect(form.name).to eq("2023_2024_sales")
    end

    it "is able to load a previous sales form" do
      form = form_handler.get_form("previous_sales")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
      expect(form.name).to eq("2022_2023_sales")
    end

    it "is able to load a archived sales form" do
      form = form_handler.get_form("archived_sales")
      expect(form).to be_a(Form)
      expect(form.pages.count).to be_positive
      expect(form.name).to eq("2021_2022_sales")
    end
  end

  describe "Current form" do
    it "returns the latest form by date" do
      form = form_handler.current_lettings_form
      expect(form).to be_a(Form)
      expect(form.start_date.year).to eq(2022)
    end
  end

  describe "Current collection start year" do
    context "when the date is after 1st of April" do
      let(:now) { Time.utc(2023, 8, 3) }

      it "returns the same year as the current start year" do
        expect(form_handler.current_collection_start_year).to eq(2023)
      end

      it "returns the correct current lettings form name" do
        expect(form_handler.form_name_from_start_year(2023, "lettings")).to eq("current_lettings")
      end

      it "returns the correct previous lettings form name" do
        expect(form_handler.form_name_from_start_year(2022, "lettings")).to eq("previous_lettings")
      end

      it "returns the correct next lettings form name" do
        expect(form_handler.form_name_from_start_year(2024, "lettings")).to eq("next_lettings")
      end

      it "returns the correct archived lettings form name" do
        expect(form_handler.form_name_from_start_year(2021, "lettings")).to eq("archived_lettings")
      end

      it "returns the correct current sales form name" do
        expect(form_handler.form_name_from_start_year(2023, "sales")).to eq("current_sales")
      end

      it "returns the correct previous sales form name" do
        expect(form_handler.form_name_from_start_year(2022, "sales")).to eq("previous_sales")
      end

      it "returns the correct next sales form name" do
        expect(form_handler.form_name_from_start_year(2024, "sales")).to eq("next_sales")
      end

      it "returns the correct archived sales form name" do
        expect(form_handler.form_name_from_start_year(2021, "sales")).to eq("archived_sales")
      end

      it "returns the correct current start date" do
        expect(form_handler.current_collection_start_date).to eq(Time.zone.local(2023, 4, 1))
      end
    end

    context "with the date before 1st of April" do
      let(:now) { Time.utc(2023, 2, 3) }

      it "returns the previous year as the current start year" do
        expect(form_handler.current_collection_start_year).to eq(2022)
      end

      it "returns the correct current lettings form name" do
        expect(form_handler.form_name_from_start_year(2022, "lettings")).to eq("current_lettings")
      end

      it "returns the correct previous lettings form name" do
        expect(form_handler.form_name_from_start_year(2021, "lettings")).to eq("previous_lettings")
      end

      it "returns the correct next lettings form name" do
        expect(form_handler.form_name_from_start_year(2023, "lettings")).to eq("next_lettings")
      end

      it "returns the correct archived lettings form name" do
        expect(form_handler.form_name_from_start_year(2020, "lettings")).to eq("archived_lettings")
      end

      it "returns the correct current sales form name" do
        expect(form_handler.form_name_from_start_year(2022, "sales")).to eq("current_sales")
      end

      it "returns the correct previous sales form name" do
        expect(form_handler.form_name_from_start_year(2021, "sales")).to eq("previous_sales")
      end

      it "returns the correct next sales form name" do
        expect(form_handler.form_name_from_start_year(2023, "sales")).to eq("next_sales")
      end

      it "returns the correct archived sales form name" do
        expect(form_handler.form_name_from_start_year(2020, "sales")).to eq("archived_sales")
      end
    end
  end

  it "loads the form once at boot time" do
    form_handler = described_class.instance
    expect(Form).not_to receive(:new).with(:any, "current_sales")
    expect(form_handler.get_form("current_sales")).to be_a(Form)
  end

  it "correctly sets form type and start year" do
    form = form_handler.forms["current_lettings"]
    expect(form.type).to eq("lettings")
    expect(form.start_date.year).to eq(2022)
  end

  # rubocop:disable RSpec/PredicateMatcher
  describe "#in_crossover_period?" do
    context "when not in overlapping period" do
      it "returns false" do
        expect(form_handler.in_crossover_period?(now: Date.new(2023, 1, 1))).to be_falsey
      end
    end

    context "when in overlapping period" do
      it "returns true" do
        expect(form_handler.in_crossover_period?(now: Date.new(2022, 6, 1))).to be_truthy
      end
    end
  end

  describe "lettings_forms" do
    context "when current and previous forms are defined in JSON (current collection start year before 2023)" do
      let(:now) { Time.utc(2022, 9, 20) }

      it "creates a next_lettings form from ruby form objects" do
        expect(form_handler.lettings_forms["previous_lettings"]).to be_present
        expect(form_handler.lettings_forms["previous_lettings"].start_date.year).to eq(2021)
        expect(form_handler.lettings_forms["current_lettings"]).to be_present
        expect(form_handler.lettings_forms["current_lettings"].start_date.year).to eq(2022)
        expect(form_handler.lettings_forms["next_lettings"]).to be_present
        expect(form_handler.lettings_forms["next_lettings"].start_date.year).to eq(2023)
      end
    end

    context "when only previous form is defined in JSON (current collection start year 2023)" do
      let(:now) { Time.utc(2023, 9, 20) }

      it "creates current_lettings and next_lettings forms from ruby form objects" do
        expect(form_handler.lettings_forms["archived_lettings"]).to be_present
        expect(form_handler.lettings_forms["archived_lettings"].start_date.year).to eq(2021)
        expect(form_handler.lettings_forms["previous_lettings"]).to be_present
        expect(form_handler.lettings_forms["previous_lettings"].start_date.year).to eq(2022)
        expect(form_handler.lettings_forms["current_lettings"]).to be_present
        expect(form_handler.lettings_forms["current_lettings"].start_date.year).to eq(2023)
        expect(form_handler.lettings_forms["next_lettings"]).to be_present
        expect(form_handler.lettings_forms["next_lettings"].start_date.year).to eq(2024)
      end
    end

    context "when only archived form form is defined in JSON (current collection start year 2024 onwards)" do # TODO: CLDC-3505 remove this test on year hard end
      let(:now) { Time.utc(2024, 9, 20) }

      it "creates previous_lettings, current_lettings and next_lettings forms from ruby form objects and archived form from json" do
        expect(form_handler.lettings_forms["archived_lettings"]).to be_present
        expect(form_handler.lettings_forms["archived_lettings"].start_date.year).to eq(2022)
        expect(form_handler.lettings_forms["previous_lettings"]).to be_present
        expect(form_handler.lettings_forms["previous_lettings"].start_date.year).to eq(2023)
        expect(form_handler.lettings_forms["current_lettings"]).to be_present
        expect(form_handler.lettings_forms["current_lettings"].start_date.year).to eq(2024)
        expect(form_handler.lettings_forms["next_lettings"]).to be_present
        expect(form_handler.lettings_forms["next_lettings"].start_date.year).to eq(2025)
      end
    end
  end

  describe "#ordered_questions_for_year" do
    context "with lettings" do
      let(:result) { described_class.instance.ordered_questions_for_year(2936, "lettings") }
      let(:now) { Time.zone.local(2936, 5, 1) }

      it "returns an array of questions" do
        section = build(:section, :with_questions, question_ids: %w[1 2 3])
        lettings_form = FormFactory.new(year: 2936, type: "lettings")
                                .with_sections([section])
                                .build
        described_class.instance.use_fake_forms!({ "current_lettings" => lettings_form })
        expect(result).to(satisfy { |result| result.all? { |element| element.is_a?(Form::Question) } })
      end

      it "does not return multiple questions with the same id" do
        first_section = build(:section, :with_questions, question_ids: %w[1 2 3])
        second_section = build(:section, :with_questions, question_ids: %w[2 3 4 5])
        lettings_form = FormFactory.new(year: 2936, type: "lettings")
                                .with_sections([first_section, second_section])
                                .build
        described_class.instance.use_fake_forms!({ "current_lettings" => lettings_form })
        expect(result.map(&:id)).to eq %w[1 2 3 4 5]
      end

      it "returns the questions in the same order as the form" do
        first_section = build(:section, :with_questions, question_ids: %w[1 2 3])
        second_section = build(:section, :with_questions, question_ids: %w[4 5 6])
        lettings_form = FormFactory.new(year: 2936, type: "lettings")
                                .with_sections([first_section, second_section])
                                .build
        described_class.instance.use_fake_forms!({ "current_lettings" => lettings_form })
        expect(result.map(&:id)).to eq %w[1 2 3 4 5 6]
      end
    end

    context "with sales" do
      let(:result) { described_class.instance.ordered_questions_for_year(2936, "sales") }
      let(:now) { Time.zone.local(2936, 5, 1) }

      it "returns an array of questions" do
        section = build(:section, :with_questions, question_ids: %w[1 2 3])
        sales_form = FormFactory.new(year: 2936, type: "sales")
                                .with_sections([section])
                                .build
        described_class.instance.use_fake_forms!({ "current_sales" => sales_form })
        expect(result).to(satisfy { |result| result.all? { |element| element.is_a?(Form::Question) } })
      end

      it "does not return multiple questions with the same id" do
        first_section = build(:section, :with_questions, question_ids: %w[1 2 3])
        second_section = build(:section, :with_questions, question_ids: %w[2 3 4 5])
        sales_form = FormFactory.new(year: 2936, type: "sales")
                                .with_sections([first_section, second_section])
                                .build
        described_class.instance.use_fake_forms!({ "current_sales" => sales_form })
        expect(result.map(&:id)).to eq %w[1 2 3 4 5]
      end

      it "returns the questions in the same order as the form" do
        first_section = build(:section, :with_questions, question_ids: %w[1 2 3])
        second_section = build(:section, :with_questions, question_ids: %w[4 5 6])
        sales_form = FormFactory.new(year: 2936, type: "sales")
                                .with_sections([first_section, second_section])
                                .build
        described_class.instance.use_fake_forms!({ "current_sales" => sales_form })
        expect(result.map(&:id)).to eq %w[1 2 3 4 5 6]
      end
    end
  end
  # rubocop:enable RSpec/PredicateMatcher
end