# frozen_string_literal: true

RSpec.describe About do
  describe "stats cache" do
    include_examples "stats cacheable"
  end

  def register_stat(name, stats_block)
    DiscoursePluginRegistry.register_stat(
      Stat.new(name, expose_via_api: true, &stats_block),
      stub(enabled?: true),
    )
  end

  after { DiscoursePluginRegistry.reset! }

  describe "#stats" do
    it "adds plugin stats to the output" do
      stats = { :last_day => 1, "7_days" => 10, "30_days" => 100, :count => 1000 }
      register_stat("some_group", Proc.new { stats })
      expect(described_class.new.stats.with_indifferent_access).to match(
        hash_including(
          some_group_last_day: 1,
          some_group_7_days: 10,
          some_group_30_days: 100,
          some_group_count: 1000,
        ),
      )
    end

    it "uses the cache" do
      cold_cache_count = track_sql_queries { described_class.new.stats }.count
      hot_cache_count = track_sql_queries { described_class.new.stats }.count

      expect(cold_cache_count + hot_cache_count).to eq(cold_cache_count)
    end

    it "does not add plugin stats to the output if they are missing one of the required keys" do
      stats = { "7_days" => 10, "30_days" => 100, :count => 1000 }
      register_stat("some_group", Proc.new { stats })
      expect(described_class.new.stats).not_to match(
        hash_including(
          some_group_last_day: 1,
          some_group_7_days: 10,
          some_group_30_days: 100,
          some_group_count: 1000,
        ),
      )
    end

    it "does not error if any of the plugin stat blocks throw an error and still adds the non-errored stats to output" do
      stats = { :last_day => 1, "7_days" => 10, "30_days" => 100, :count => 1000 }
      register_stat("some_group", Proc.new { stats })
      register_stat("other_group", Proc.new { raise StandardError })
      expect(described_class.new.stats.with_indifferent_access).to match(
        hash_including(
          some_group_last_day: 1,
          some_group_7_days: 10,
          some_group_30_days: 100,
          some_group_count: 1000,
        ),
      )
      expect { described_class.new.stats.with_indifferent_access }.not_to raise_error
    end
  end

  describe "#category_moderators" do
    fab!(:user)
    fab!(:public_cat_moderator) { Fabricate(:user, last_seen_at: 1.month.ago) }
    fab!(:private_cat_moderator) { Fabricate(:user, last_seen_at: 2.months.ago) }
    fab!(:common_moderator) { Fabricate(:user, last_seen_at: 3.months.ago) }
    fab!(:common_moderator_2) { Fabricate(:user, last_seen_at: 4.months.ago) }

    fab!(:public_group) do
      Fabricate(:public_group, users: [public_cat_moderator, common_moderator, common_moderator_2])
    end

    fab!(:private_group) do
      Fabricate(:group, users: [private_cat_moderator, common_moderator, common_moderator_2])
    end

    fab!(:public_cat, :category)
    fab!(:public_category_moderation_group) do
      Fabricate(:category_moderation_group, category: public_cat, group: public_group)
    end

    fab!(:private_cat) { Fabricate(:private_category, group: private_group) }
    fab!(:private_category_moderation_group) do
      Fabricate(:category_moderation_group, category: private_cat, group: private_group)
    end

    it "lists moderators of the category that the current user can see" do
      results = About.new(private_cat_moderator).category_moderators
      expect(results.map(&:category).map(&:id)).to contain_exactly(public_cat.id, private_cat.id)
      expect(results.map(&:moderators).flatten.map(&:id).uniq).to contain_exactly(
        public_cat_moderator.id,
        common_moderator.id,
        common_moderator_2.id,
        private_cat_moderator.id,
      )

      [public_cat_moderator, user, nil].each do |u|
        results = About.new(u).category_moderators
        expect(results.map(&:category).map(&:id)).to contain_exactly(public_cat.id)
        expect(results.map(&:moderators).flatten.map(&:id)).to eq(
          [public_cat_moderator.id, common_moderator.id, common_moderator_2.id],
        )
      end
    end

    it "limit category moderators when there are too many for perf reasons" do
      about = About.new(private_cat_moderator)
      about.category_mods_limit = 4
      results = about.category_moderators
      expect(results.size).to eq(2)
      results.each { |res| expect(res.moderators.size).to eq(2) }
    end

    it "doesn't list the same user twice as a category mod if the user is member of multiple groups" do
      Fabricate(:category_moderation_group, category: public_cat, group: private_group)

      results = About.new(nil).category_moderators
      mods = results.find { |r| r.category.id == public_cat.id }.moderators
      expect(mods.map(&:id)).to contain_exactly(
        public_cat_moderator.id,
        common_moderator.id,
        common_moderator_2.id,
        private_cat_moderator.id,
      )
    end
  end

  describe "#moderators" do
    fab!(:mod_1, :moderator)
    fab!(:mod_2, :moderator)
    fab!(:mod_3, :moderator)

    context "with the about_page_hidden_groups setting" do
      fab!(:group_1) { Fabricate(:group, users: [mod_1, mod_3]) }
      fab!(:group_2) { Fabricate(:group, users: [mod_3]) }
      fab!(:group_3, :group)

      before { SiteSetting.about_page_hidden_groups = [group_1.id, group_2.id].join("|") }

      it "hides moderators that are in any of the specified groups" do
        expect(About.new.moderators).to contain_exactly(mod_2)
      end

      it "doesn't hide any moderators if the setting is empty" do
        SiteSetting.about_page_hidden_groups = ""
        expect(About.new.moderators).to contain_exactly(mod_1, mod_2, mod_3)
      end
    end
  end

  describe "#admins" do
    fab!(:admin_mark) { Fabricate(:admin, name: "mark") }
    fab!(:admin_matt) { Fabricate(:admin, name: "matt") }
    fab!(:admin_kate) { Fabricate(:admin, name: "kate") }

    context "with about_admins plugin modifier registered" do
      let(:modifier_block) { Proc.new { |admins| admins.select { |admin| admin.name != "mark" } } }

      it "Applies registered modifiers (filtering out admins in this case)" do
        plugin_instance = Plugin::Instance.new
        plugin_instance.register_modifier(:about_admins, &modifier_block)
        expect(About.new(Fabricate(:user)).admins).to match_array([admin_matt, admin_kate])
      ensure
        DiscoursePluginRegistry.unregister_modifier(plugin_instance, :about_admins, &modifier_block)
      end
    end

    context "with the about_page_hidden_groups setting" do
      fab!(:group_1) { Fabricate(:group, users: [admin_mark, admin_matt]) }
      fab!(:group_2) { Fabricate(:group, users: [admin_mark]) }
      fab!(:group_3) { Fabricate(:group, users: [admin_kate]) }

      before { SiteSetting.about_page_hidden_groups = [group_1.id, group_2.id].join("|") }

      it "hides admins that are in any of the specified groups" do
        expect(About.new.admins).to contain_exactly(admin_kate)
      end

      it "doesn't hide any admins if the setting is empty" do
        SiteSetting.about_page_hidden_groups = ""
        expect(About.new.admins).to contain_exactly(admin_kate, admin_mark, admin_matt)
      end
    end
  end
end