require 'test_helper'

class GuidanceGroupTest < ActiveSupport::TestCase
  
  setup do
    @user_one = User.first
    @user_two = User.order(surname: :desc).first
    @user_three = User.last
    
    @org_type = OrganisationType.first
    
    @organisations = Organisation.all
  end
  
  # ---------- can_view? ----------
  test "DCC guidance groups should be viewable" do
#    assert GuidanceGroup.can_view?(@user_one, guidance_groups(:dcc_guidance_group_1))
  end

  test "Funder guidance groups should be viewable" do
=begin
    @org_type.organisations.each do |org|
      org.guidance_groups.each do |funder_group|
        assert GuidanceGroup.can_view?(@user_one, funder_group)
      end
    end
=end
  end

  test "User's organisation groups should be viewable" do
=begin
    assert GuidanceGroup.can_view?(@user_one, guidance_groups(:institution_guidance_group_1).id) , "user_one cannot view aru_institution_guidance"

    assert GuidanceGroup.can_view?(@user_two, guidance_groups(:institution_guidance_group_2).id), "user_two cannot view au_..._1"

    assert GuidanceGroup.can_view?(@user_three, guidance_groups(:institution_guidance_group_3).id), "user_three cannot view bu_..._1"
    assert GuidanceGroup.can_view?(@user_three, guidance_groups(:institution_guidance_group_4).id), "user_three cannot view bu_..._2"
=end
  end

  test "No other organisations's groups should be viewable"  do
=begin
    assert_not GuidanceGroup.can_view?(@user_one, guidance_groups(:institution_guidance_group_2).id)
    assert_not GuidanceGroup.can_view?(@user_one, guidance_groups(:institution_guidance_group_3).id)
    assert_not GuidanceGroup.can_view?(@user_one, guidance_groups(:institution_guidance_group_4).id)

    assert_not GuidanceGroup.can_view?(@user_two, guidance_groups(:institution_guidance_group_1).id)
    assert_not GuidanceGroup.can_view?(@user_two, guidance_groups(:institution_guidance_group_3).id)
    assert_not GuidanceGroup.can_view?(@user_two, guidance_groups(:institution_guidance_group_4).id)

    assert_not GuidanceGroup.can_view?(@user_three, guidance_groups(:institution_guidance_group_1).id)
    assert_not GuidanceGroup.can_view?(@user_three, guidance_groups(:institution_guidance_group_2).id)
=end
  end


  # ---------- all_viewable ----------
  # ensure that the all_viewable function returns all viewable groups
  #   should return true for groups owned by funders
  #   should return true for groups owned by DCC
  #   should return true for groups owned by the user's organisation
  #   should not return true for an organisation outwith those above
  test "all_viewable returns all dcc groups" do
    all_viewable_groups = GuidanceGroup.all_viewable(@user_one)
    @organisations.first.guidance_groups.each do |group|
      assert_includes(all_viewable_groups, group)
    end
  end

  test "all_viewable returns all funder groups" do
    all_viewable_groups = GuidanceGroup.all_viewable(@user_one)
    @org_type.organisations.each do |org|
      org.guidance_groups.each do |group|
        assert_includes(all_viewable_groups, group)
      end
    end
  end

  test "all_viewable returns all of a user's organisations's guidances" do 
    all_viewable_groups_one = GuidanceGroup.all_viewable(@user_one)
    @organisations.first.guidance_groups.each do |group|
      assert_includes(all_viewable_groups_one, group)
    end

    all_viewable_groups_two = GuidanceGroup.all_viewable(@user_two)
    @organisations[1].guidance_groups.each do |group|
      assert_includes(all_viewable_groups_two, group)
    end

    all_viewable_groups_three = GuidanceGroup.all_viewable(@user_three)
    @organisations.last.guidance_groups.each do |group|
      assert_includes(all_viewable_groups_three, group)
    end
  end

  test "all_viewable does not return any other organisaition's guidance" do
=begin
    all_viewable_groups = GuidanceGroup.all_viewable(@user_one)
    all_viewable_groups.delete_if do |group|
      if group.organisation.id == @organisation.id
        true
      elsif group.organisation.organisation_type.id == @org_type.id
        true
      elsif group.organisation.id == @user_one.organisation.id
        true
      else
        false
      end
    end
    assert_empty(all_viewable_groups)
=end
  end


  # ---------- display_name ----------
  test "display_name should return an org name for an org with one guidance" do
#    assert_equal(guidance_groups(:funder_guidance_group_1).display_name, "Arts and Humanities Research Council", "result of display_name for an org with one group should be the org name")
  end

  test "display_name should return an org and group name for an org with more than one guidance" do
#    assert_equal(guidance_groups(:institution_guidance_group_4).display_name, "Bangor University: Bangor University guidance group 2", "result of display_name for an org with more than one group should be <org_name>: <group_name>")
  end

  # ---------- self.guidance_groups_excluding ----------
  test "guidance_groups_excluding should not return a group belonging to specified single org" do
=begin
    # generate a list
    excluding_list = GuidanceGroup.guidance_groups_excluding([@organisation])
    excluding_list.each do |group|
      refute_equal(group.organisation, @organisation, "#{group.name} is owned by dcc")
    end
=end
  end

  test "guidance_groups_excluding should not return a group belonging to specified orgs" do
=begin
    org_list = [organisations.first, organisations.last]
    excluding_list = GuidanceGroup.guidance_groups_excluding(org_list)
    excluding_list.each do |group|
      org_list.each do |org|
        refute_equal(group.organisation, org, "#{group.name} is owned by specified org: #{org.name}")
      end
    end
=end
  end

  test "guidance_groups_excluding should return all groups not belonging to the specified org" do
=begin
    excluding_list = GuidanceGroup.guidance_groups_excluding([@organisation])
    GuidanceGroup.all.each do |group|
      if group.organisation_id != @organisation.id
        assert_includes(excluding_list, group, "#{group.name} is not owned by dcc so should be included")
      end
    end
=end
  end

  test "guidance_groups_excluding should return all groups not belonging to specified orgs" do
=begin
    excluded =false
    org_list = [organisations.first, organisations.last]
    excluding_list = GuidanceGroup.guidance_groups_excluding(org_list)
    GuidanceGroup.all.each do |group|
      excluded = false
      org_list.each do |org|
        if group.organisation == org
          excluded = true
        end
      end
      unless excluded
        assert_includes(excluding_list, group, "#{group.name} is not owned by a specified org so should be included")
      end
    end
=end
  end

end