#  Copyright (c) 2012-2024, Schweizer Blasmusikverband. This file is part of
#  hitobito_sbv and licensed under the Affero General Public License version 3
#  or later. See the COPYING file at the top-level directory or at
#  https://github.com/hitobito/hitobito.

require "spec_helper"

describe Export::Tabular::People::TableDisplays do
  let(:person) { people(:top_leader) }
  let(:group) { groups(:top_group) }
  let!(:registered_columns) { TableDisplay.table_display_columns.clone }
  let!(:registered_multi_columns) { TableDisplay.multi_columns.clone }

  before do
    TableDisplay.table_display_columns = {}
    TableDisplay.multi_columns = {}
  end

  after do
    TableDisplay.table_display_columns = registered_columns
    TableDisplay.multi_columns = registered_multi_columns
  end

  context "people" do
    let(:people_list) { Export::Tabular::People::TableDisplays.new(list, table_display, group) }
    let(:table_display) { TableDisplay.new(person: person, table_model_class: "Person") }
    let(:list) do
      Person.where(id: person.id)
        .includes(:phone_numbers, :additional_emails, :primary_group)
        .references(:phone_numbers, :additional_emails, :primary_group)
    end

    before { TableDisplay.register_column(Person, TestUpdateableColumn, [:additional_information]) }

    subject { people_list }

    its(:attributes) do
      should == [:first_name, :last_name, :nickname, :company_name, :company, :email,
        :address_care_of, :street, :housenumber, :postbox, :zip_code, :town, :country,
        :layer_group, :roles]
    end

    it "model class is actually person" do
      expect(people_list.class.model_class).to eq Person
    end

    it "does not allow accessing unregistered columns" do
      table_display.selected = [:years]
      expect(people_list.labels.last).to eq "Rollen"
      expect(people_list.attributes.last).to eq :roles
      expect(people_list.attributes.grep(/years/).count).to eq 0
    end

    it "includes additional information if configured" do
      table_display.selected = [:additional_information]
      expect(people_list.labels.last).to eq "Zusätzliche Angaben"
      expect(people_list.attributes.last).to eq :additional_information
      expect(people_list.data_rows.first.last).to eq "bla bla"
    end

    it "does not include additional information if no access" do
      table_display.person = people(:bottom_member)
      table_display.selected = [:additional_information]
      expect(people_list.labels.last).to eq "Zusätzliche Angaben"
      expect(people_list.attributes.last).to eq :additional_information
      expect(people_list.data_rows.first.last).to eq "fehlende Berechtigung"
    end

    it "does not include the same attribute twice" do
      table_display.selected = [:first_name]
      expect(people_list.attributes.grep(/first_name/).count).to eq 1
    end

    it "does include dynamic attributes" do
      person.phone_numbers.create!(label: "foobar", number: "0790000000")
      expect(people_list.labels.last).to eq "Telefonnummer foobar"
      expect(people_list.data_rows.first.last).to eq "+41 79 000 00 00"
    end

    it "does not fail when dynamic attributes include a ." do
      person.phone_numbers.create!(label: "foo.bar", number: "0790000000")
      expect(people_list.labels.last).to eq "Telefonnummer foo.bar"
      expect(people_list.data_rows.first.last).to eq "+41 79 000 00 00"
    end

    it "does exclude attribute if exclude_attr of certain column is true" do
      table_display.selected = [:additional_information]
      allow_any_instance_of(TestUpdateableColumn).to receive(:exclude_attr?).and_return(true)
      expect(people_list.labels).not_to include("Zusätzliche Angaben")
    end

    it "does set table on table_display columns" do
      table_display.selected = [:"person.additional_information"]
      expect { people_list }.to change { table_display.selected_group }.from(nil).to(group)
      column = table_display.column_for(:additional_information)
      expect(column.table).to eq OpenStruct.new(template: OpenStruct.new(parent: group))
    end

    context :with_limited_select do
      let(:list) do
        Person.where(id: person.id)
          .select("email", "primary_group_id")
          .includes(:phone_numbers, :additional_emails, :primary_group)
          .references(:phone_numbers, :additional_emails, :primary_group)
      end

      it "does not fail" do
        table_display.selected = [:additional_information]
        expect { people_list.data_rows.collect(&:presence) }.not_to raise_error
        expect(people_list.data_rows.collect(&:presence).compact.size).to eq 1
      end
    end
  end

  context "participations" do
    let(:people_list) do
      Export::Tabular::Event::Participations::TableDisplays.new(list, table_display, group)
    end
    let(:table_display) do
      TableDisplay.new(person: person, table_model_class: "Event::Participation")
    end
    let(:participation) { event_participations(:top) }
    let(:person) { participation.person }
    let(:list) do
      participations = Event::Participation.where(id: participation.id)
      Event::Participation::PreloadParticipations.preload(participations)
      participations
    end
    let(:question) { event_questions(:top_ov) }
    let(:top_course) { participation.event }

    subject { people_list }

    before do
      TableDisplay.register_column(
        Event::Participation,
        TableDisplays::PolymorphicPublicColumn,
        [:"participant.additional_information"]
      )
      TableDisplay.register_multi_column(
        Event::Participation, TableDisplays::Event::Participations::QuestionColumn
      )
    end

    its(:attributes) do
      should == [:first_name, :last_name, :nickname, :company_name, :company, :email,
        :address_care_of, :street, :housenumber, :postbox, :zip_code, :town, :country,
        :layer_group, :roles]
    end

    it "model class is actually participation" do
      expect(people_list.class.model_class).to eq Event::Participation
    end

    it "includes additional person attributes if configured" do
      table_display.selected = [:"participant.additional_information"]
      person.update!(additional_information: "bla bla")
      expect(people_list.labels.last).to eq "Zusätzliche Angaben"
      expect(people_list.attributes.last).to eq :"participant.additional_information"
      expect(people_list.data_rows.first.last).to eq "bla bla"
    end

    it "includes configured questions that exist on this event" do
      participation.answers.create!(question: question, answer: "GA")
      table_display.selected = [:event_question_1, :"event_question_#{question.id}",
        :event_question_2]
      expect(people_list.labels.last).to eq "GA oder Halbtax?"
      expect(people_list.attributes.last.to_s).to eq "event_question_#{question.id}"
      expect(people_list.data_rows.first.last).to eq "GA"
    end

    it "does not include the same attribute twice" do
      table_display.selected = [:"participant.additional_information", :"participant.additional_information"]
      expect(people_list.attributes.grep(/additional_information/).count).to eq 1
    end

    it "has assumptions" do
      person.phone_numbers.create!(label: "foobar", number: "0790000000")

      expect(subject.attributes).to include(:roles)
      expect(subject).to respond_to(:build_attribute_labels)

      expect(PhoneNumber.where(public: true).count).to be 1
      first_number = PhoneNumber.where(public: true).first
      expect(first_number.label).to eq "foobar"

      people_ids = subject.send(:people_ids)
      list = subject.list
      expect(list).to be_an(Array).or be_a(ActiveRecord::Relation)

      expect(people_ids).to match_array [person.id]

      scope = PhoneNumber.where(public: true)
        .where(contactable_id: people_ids, contactable_type: Person.sti_name)
        .distinct_on(:label)

      expect(scope.count).to be 1
    end

    it "does include dynamic attributes" do
      person.phone_numbers.create!(label: "foobar", number: "0790000000")
      expect(people_list.labels.last).to eq "Telefonnummer foobar"
      expect(people_list.data_rows.first.last).to eq "+41 79 000 00 00"
    end

    it "does not fail when dynamic attributes include a ." do
      person.phone_numbers.create!(label: "foo.bar", number: "0790000000")
      expect(people_list.labels.last).to eq "Telefonnummer foo.bar"
      expect(people_list.data_rows.first.last).to eq "+41 79 000 00 00"
    end

    it "does exclude attribute if exclude_attr of certain column is true" do
      table_display.selected = [:event_question_1]
      allow_any_instance_of(TableDisplays::Event::Participations::QuestionColumn).to receive(:exclude_attr?).and_return(true)
      expect(people_list.labels).not_to include("GA oder Halbtax?")
    end

    context :with_permission_check do
      before do
        TableDisplay.register_column(Event::Participation,
          TableDisplays::ShowFullColumn,
          [:"person.additional_information"])
      end

      context :event_leader do
        let(:person) do
          Fabricate(Event::Role::Leader.sti_name,
            participation: Fabricate(:event_participation, event: top_course)).person
        end

        it "does include value of configured questions" do
          participation.answers.create!(question: question, answer: "GA")
          table_display.selected = [:event_question_1, :"event_question_#{question.id}",
            :event_question_2]
          expect(people_list.data_rows.first.last).to eq "GA"
        end

        it "does not include value of protected attr" do
          table_display.selected = [:"person.additional_information"]
          person.update!(additional_information: "bla bla")
          expect(people_list.labels.last).to eq "Zusätzliche Angaben"
          expect(people_list.attributes.last).to eq :"person.additional_information"
          expect(people_list.data_rows.first.last).to eq "fehlende Berechtigung"
        end
      end

      context :event_participant do
        let(:person) do
          Fabricate(Event::Role::Participant.sti_name,
            participation: Fabricate(:event_participation, event: top_course)).person
        end

        it "does not include value of configured questions" do
          participation.answers.create!(question: question, answer: "GA")
          table_display.selected = [:event_question_1,
            :"event_question_#{question.id}",
            :event_question_2]
          expect(people_list.data_rows.first.last).to eq "fehlende Berechtigung"
        end
      end
    end
  end
end

class TestUpdateableColumn < TableDisplays::PublicColumn
  def required_permission(_attr)
    :update
  end
end
