#-- encoding: UTF-8

#-- copyright
# OpenProject is a project management system.
# Copyright (C) 2012-2018 the OpenProject Foundation (OPF)
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License version 3.
#
# OpenProject is a fork of ChiliProject, which is a fork of Redmine. The copyright follows:
# Copyright (C) 2006-2017 Jean-Philippe Lang
# Copyright (C) 2010-2013 the ChiliProject Team
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
#
# See docs/COPYRIGHT.rdoc for more details.
#++
require_relative '../legacy_spec_helper'

describe Project, type: :model do
  fixtures :all

  before do
    FactoryBot.create(:type_standard)
    @ecookbook = Project.find(1)
    @ecookbook_sub1 = Project.find(3)
    User.current = nil
  end

  it { is_expected.to validate_presence_of :name }
  it { is_expected.to validate_presence_of :identifier }

  it { is_expected.to validate_uniqueness_of :identifier }

  context 'associations' do
    it { is_expected.to have_many :members                                       }
    it { is_expected.to have_many(:users).through(:members)                      }
    it { is_expected.to have_many :member_principals                             }
    it { is_expected.to have_many(:principals).through(:member_principals)       }
    it { is_expected.to have_many :enabled_modules                               }
    it { is_expected.to have_many :work_packages                                 }
    it { is_expected.to have_many(:work_package_changes).through(:work_packages) }
    it { is_expected.to have_many :versions                                      }
    it { is_expected.to have_many :time_entries                                  }
    it { is_expected.to have_many :queries                                       }
    it { is_expected.to have_many :news                                          }
    it { is_expected.to have_many :categories                                    }
    it { is_expected.to have_many :forums                                        }
    it { is_expected.to have_many(:changesets).through(:repository)              }

    it { is_expected.to have_one :repository                                     }
    it { is_expected.to have_one :wiki                                           }

    it { is_expected.to have_and_belong_to_many :types                           }
    it { is_expected.to have_and_belong_to_many :work_package_custom_fields      }
  end

  it 'should truth' do
    assert_kind_of Project, @ecookbook
    assert_equal 'eCookbook', @ecookbook.name
  end

  context 'when default public', with_settings: { default_projects_public?: true } do
    it 'should default attributes' do
      assert_equal true, Project.new.is_public
      assert_equal false, Project.new(is_public: false).is_public

      assert_equal ::Type.all, Project.new.types
      assert_equal ::Type.find(1, 3), Project.new(type_ids: [1, 3]).types
    end
  end

  context 'when default private', with_settings: { default_projects_public?: false } do
    it 'should default attributes' do
      assert_equal false, Project.new.is_public
      assert_equal true, Project.new(is_public: true).is_public
    end
  end

  context 'with sequential identifiers',
          with_settings: { sequential_project_identifiers?: true } do
    it 'should default attributes' do
      assert !Project.new.identifier.blank?
      assert Project.new(identifier: '').identifier.blank?
    end
  end

  context 'with no sequential identifiers',
          with_settings: { sequential_project_identifiers?: false } do
    it 'should default attributes' do
      assert Project.new.identifier.blank?
      assert !Project.new(identifier: 'test').blank?
    end
  end

  it 'should update' do
    assert_equal 'eCookbook', @ecookbook.name
    @ecookbook.name = 'eCook'
    assert @ecookbook.save, @ecookbook.errors.full_messages.join('; ')
    @ecookbook.reload
    assert_equal 'eCook', @ecookbook.name
  end

  it 'should validate identifier' do
    to_test = { 'abc' => true,
                'ab12' => true,
                'ab-12' => true,
                'ab_12' => true,
                '12' => false,
                'new' => false }

    to_test.each do |identifier, valid|
      p = Project.new
      p.identifier = identifier
      p.valid?
      assert_equal valid, p.errors['identifier'].empty?
    end
  end

  it 'should members should be active users' do
    Project.all.each do |project|
      assert_nil project.members.detect { |m| !(m.user.is_a?(User) && m.user.active?) }
    end
  end

  it 'should users should be active users' do
    Project.all.each do |project|
      assert_nil project.users.detect { |u| !(u.is_a?(User) && u.active?) }
    end
  end

  it 'should archive' do
    user = @ecookbook.members.first.user
    @ecookbook.archive
    @ecookbook.reload

    assert !@ecookbook.active?
    assert @ecookbook.archived?
    assert !user.projects.include?(@ecookbook)
    # Subproject are also archived
    assert !@ecookbook.children.empty?
    assert @ecookbook.descendants.active.empty?
  end

  it 'should archive should fail if versions are used by non descendant projects' do
    # Assign an issue of a project to a version of a child project
    WorkPackage.find(4).update_attribute :fixed_version_id, 4

    assert_no_difference "Project.where('status = #{Project::STATUS_ARCHIVED}').count" do
      assert_equal false, @ecookbook.archive
    end
    @ecookbook.reload
    assert @ecookbook.active?
  end

  it 'should unarchive' do
    user = @ecookbook.members.first.user
    @ecookbook.archive
    # A subproject of an archived project can not be unarchived
    assert !@ecookbook_sub1.unarchive

    # Unarchive project
    assert @ecookbook.unarchive
    @ecookbook.reload
    assert @ecookbook.active?
    assert !@ecookbook.archived?
    assert user.projects.include?(@ecookbook)
    # Subproject can now be unarchived
    @ecookbook_sub1.reload
    assert @ecookbook_sub1.unarchive
  end

  # fails because @ecookbook.issues[5 und 6].destroy fails
  # because ActiveRecord::StaleObjectError
  it 'should destroy' do
    # 2 active members
    assert_equal 2, @ecookbook.members.size
    # and 1 is locked
    assert_equal 3, Member.where(['project_id = ?', @ecookbook.id]).size
    # some forums
    assert @ecookbook.forums.any?

    @ecookbook.destroy
    # make sure that the project non longer exists
    assert_raises(ActiveRecord::RecordNotFound) do Project.find(@ecookbook.id) end
    # make sure related data was removed
    assert_equal 0, Member.where(project_id: @ecookbook.id).count
    assert_equal 0, Forum.where(project_id: @ecookbook.id).count
    assert_equal 0, WorkPackage.where(project_id: @ecookbook.id).count
  end

  it 'should destroying root projects should clear data' do
    Journal.destroy_all
    WorkPackage.all.each(&:recreate_initial_journal!)

    Project.roots.each(&:destroy)

    assert_equal 0, Project.count, "Projects were not deleted: #{Project.all.inspect}"
    assert_equal 0, Member.count, "Members were not deleted: #{Member.all.inspect}"
    assert_equal 0, MemberRole.count
    assert_equal 0, WorkPackage.count
    assert_equal 0, Journal.count, "Journals were not deleted: #{Journal.all.inspect}"
    assert_equal 0, EnabledModule.count
    assert_equal 0, Category.count
    assert_equal 0, Relation.count
    assert_equal 0, Forum.count
    assert_equal 0, Message.count
    assert_equal 0, News.count
    assert_equal 0, Query.where('project_id IS NOT NULL').count
    assert_equal 0, Repository.count
    assert_equal 0, Changeset.count
    assert_equal 0, Change.count
    assert_equal 0, Comment.count
    assert_equal 0, TimeEntry.count
    assert_equal 0, Version.count
    assert_equal 0, Watcher.count
    assert_equal 0, Wiki.count
    assert_equal 0, WikiPage.count
    assert_equal 0, WikiContent.count
    assert_equal 0, Project.connection.select_all('SELECT * FROM custom_fields_projects').to_a.size
    assert_equal 0, CustomValue.where(customized_type: ['Project', 'Issue', 'TimeEntry', 'Version']).count
  end

  it 'should move an orphan project to a root project' do
    sub = Project.find(2)
    sub.set_parent! @ecookbook
    assert_equal @ecookbook.id, sub.parent.id
    @ecookbook.reload
    assert_equal 4, @ecookbook.children.size
  end

  it 'should move an orphan project to a subproject' do
    sub = Project.find(2)
    assert sub.set_parent!(@ecookbook_sub1)
  end

  it 'should move a root project to a project' do
    sub = @ecookbook
    assert sub.set_parent!(Project.find(2))
  end

  it 'should not move a project to its children' do
    sub = @ecookbook
    assert !(sub.set_parent!(Project.find(3)))
  end

  it 'should set parent should add roots in alphabetical order' do
    ProjectCustomField.destroy_all
    Project.delete_all
    Project.create!(name: 'Project C', identifier: 'project-c').set_parent!(nil)
    Project.create!(name: 'Project B', identifier: 'project-b').set_parent!(nil)
    Project.create!(name: 'Project D', identifier: 'project-d').set_parent!(nil)
    Project.create!(name: 'Project A', identifier: 'project-a').set_parent!(nil)

    assert_equal 4, Project.count
    assert_equal Project.all.sort_by(&:name), Project.all.sort_by(&:lft)
  end

  it 'should set parent should add children in alphabetical order' do
    ProjectCustomField.destroy_all
    parent = Project.create!(name: 'Parent', identifier: 'parent')
    Project.create!(name: 'Project C', identifier: 'project-c').set_parent!(parent)
    Project.create!(name: 'Project B', identifier: 'project-b').set_parent!(parent)
    Project.create!(name: 'Project D', identifier: 'project-d').set_parent!(parent)
    Project.create!(name: 'Project A', identifier: 'project-a').set_parent!(parent)

    parent.reload
    assert_equal 4, parent.children.size
    assert_equal parent.children.sort_by(&:name), parent.children
  end

  it 'should rebuild should sort children alphabetically' do
    ProjectCustomField.destroy_all
    parent = Project.create!(name: 'Parent', identifier: 'parent')
    Project.create!(name: 'Project C', identifier: 'project-c').move_to_child_of(parent)
    Project.create!(name: 'Project B', identifier: 'project-b').move_to_child_of(parent)
    Project.create!(name: 'Project D', identifier: 'project-d').move_to_child_of(parent)
    Project.create!(name: 'Project A', identifier: 'project-a').move_to_child_of(parent)

    Project.update_all('lft = NULL, rgt = NULL')
    Project.rebuild!

    parent.reload
    assert_equal 4, parent.children.size
    assert_equal parent.children.sort_by(&:name), parent.children
  end

  it 'should set parent should update issue fixed version associations when a fixed version is moved out of the hierarchy' do
    # Parent issue with a hierarchy project's fixed version
    parent_issue = WorkPackage.find(1)
    parent_issue.update_attribute(:fixed_version_id, 4)
    parent_issue.reload
    assert_equal 4, parent_issue.fixed_version_id

    # Should keep fixed versions for the issues
    issue_with_local_fixed_version = WorkPackage.find(5)
    issue_with_local_fixed_version.update_attribute(:fixed_version_id, 4)
    issue_with_local_fixed_version.reload
    assert_equal 4, issue_with_local_fixed_version.fixed_version_id

    # Local issue with hierarchy fixed_version
    issue_with_hierarchy_fixed_version = WorkPackage.find(13)
    issue_with_hierarchy_fixed_version.update_attribute(:fixed_version_id, 6)
    issue_with_hierarchy_fixed_version.reload
    assert_equal 6, issue_with_hierarchy_fixed_version.fixed_version_id

    # Move project out of the issue's hierarchy
    moved_project = Project.find(3)
    moved_project.set_parent!(Project.find(2))
    parent_issue.reload
    issue_with_local_fixed_version.reload
    issue_with_hierarchy_fixed_version.reload

    assert_equal 4, issue_with_local_fixed_version.fixed_version_id, 'Fixed version was not keep on an issue local to the moved project'
    assert_nil issue_with_hierarchy_fixed_version.fixed_version_id, 'Fixed version is still set after moving the Project out of the hierarchy where the version is defined in'
    assert_nil parent_issue.fixed_version_id, 'Fixed version is still set after moving the Version out of the hierarchy for the issue.'
  end

  it 'should parent' do
    p = Project.find(6).parent
    assert p.is_a?(Project)
    assert_equal 5, p.id
  end

  it 'should ancestors' do
    a = Project.find(6).ancestors
    assert a.first.is_a?(Project)
    assert_equal [1, 5], a.map(&:id).sort
  end

  it 'should root' do
    r = Project.find(6).root
    assert r.is_a?(Project)
    assert_equal 1, r.id
  end

  it 'should children' do
    c = Project.find(1).children
    assert c.first.is_a?(Project)
    # ignore ordering, since it depends on database collation configuration
    # and may order lowercase/uppercase chars in a different order
    assert_equal [3, 4, 5], c.map(&:id).sort!
  end

  it 'should descendants' do
    d = Project.find(1).descendants.pluck(:id)
    assert_equal [3,4,5,6], d.sort
  end

  it 'should allowed parents should be empty for non member user' do
    Role.non_member.add_permission!(:add_project)
    user = User.find(9)
    assert user.memberships.empty?
    User.current = user
    assert Project.new.allowed_parents.compact.empty?
  end

  it 'should allowed parents with add subprojects permission' do
    Role.find(1).remove_permission!(:add_project)
    Role.find(1).add_permission!(:add_subprojects)
    User.current = User.find(2)
    # new project
    assert !Project.new.allowed_parents.include?(nil)
    assert Project.new.allowed_parents.include?(Project.find(1))
    # existing root project
    assert Project.find(1).allowed_parents.include?(nil)
    # existing child
    assert Project.find(3).allowed_parents.include?(Project.find(1))
    assert !Project.find(3).allowed_parents.include?(nil)
  end

  it 'should allowed parents with add project permission' do
    Role.find(1).add_permission!(:add_project)
    Role.find(1).remove_permission!(:add_subprojects)
    User.current = User.find(2)
    # new project
    assert Project.new.allowed_parents.include?(nil)
    assert !Project.new.allowed_parents.include?(Project.find(1))
    # existing root project
    assert Project.find(1).allowed_parents.include?(nil)
    # existing child
    assert Project.find(3).allowed_parents.include?(Project.find(1))
    assert Project.find(3).allowed_parents.include?(nil)
  end

  it 'should allowed parents with add project and subprojects permission' do
    Role.find(1).add_permission!(:add_project)
    Role.find(1).add_permission!(:add_subprojects)
    User.current = User.find(2)
    # new project
    assert Project.new.allowed_parents.include?(nil)
    assert Project.new.allowed_parents.include?(Project.find(1))
    # existing root project
    assert Project.find(1).allowed_parents.include?(nil)
    # existing child
    assert Project.find(3).allowed_parents.include?(Project.find(1))
    assert Project.find(3).allowed_parents.include?(nil)
  end

  it 'should users by role' do
    users_by_role = Project.find(1).users_by_role
    assert_kind_of Hash, users_by_role
    role = Role.find(1)
    assert_kind_of Array, users_by_role[role]
    assert users_by_role[role].include?(User.find(2))
  end

  it 'should rolled up types' do
    parent = Project.find(1)
    parent.types = ::Type.find([1, 2])
    child = parent.children.find(3)

    assert_equal [1, 2], parent.type_ids
    assert_equal [2, 3], child.types.map(&:id)

    assert_kind_of ::Type, parent.rolled_up_types.first

    assert_equal [999, 1, 2, 3], parent.rolled_up_types.map(&:id)
    assert_equal [2, 3], child.rolled_up_types.map(&:id)
  end

  it 'should rolled up types should ignore archived subprojects' do
    parent = Project.find(1)
    parent.types = ::Type.find([1, 2])
    child = parent.children.find(3)
    child.types = ::Type.find([1, 3])
    parent.children.each(&:archive)

    assert_equal [1, 2], parent.rolled_up_types.map(&:id)
  end

  context 'description' do
    before do
      # this block unfortunately isn't run
      # move first two lines of next to specs up here
      # when you know that it will work
    end

    it 'should short description returns shortened description' do
      @project = FactoryBot.create(:project)
      @project.description = ('Abcd ' * 5 + "\n") * 11
      assert_equal (('Abcd ' * 5 + "\n") * 10)[0..-2] + '...', @project.short_description
    end
  end

  context '#rolled_up_versions' do
    before do
      @project = FactoryBot.create(:project)
      @parent_version_1 = FactoryBot.create(:version, project: @project)
      @parent_version_2 = FactoryBot.create(:version, project: @project)
    end

    it 'should include the versions for the current project' do
      assert_same_elements [@parent_version_1, @parent_version_2], @project.rolled_up_versions
    end

    it 'should include versions for a subproject' do
      @subproject = FactoryBot.create(:project)
      @subproject.set_parent!(@project)
      @subproject_version = FactoryBot.create(:version, project: @subproject)

      assert_same_elements [
        @parent_version_1,
        @parent_version_2,
        @subproject_version
      ], @project.rolled_up_versions
    end

    it 'should include versions for a sub-subproject' do
      @subproject = FactoryBot.create(:project)
      @subproject.set_parent!(@project)
      @sub_subproject = FactoryBot.create(:project)
      @sub_subproject.set_parent!(@subproject)
      @sub_subproject_version = FactoryBot.create(:version, project: @sub_subproject)

      @project.reload

      assert_same_elements [
        @parent_version_1,
        @parent_version_2,
        @sub_subproject_version
      ], @project.rolled_up_versions
    end

    it 'should only check active projects' do
      @subproject = FactoryBot.create(:project)
      @subproject.set_parent!(@project)
      @subproject_version = FactoryBot.create(:version, project: @subproject)
      assert @subproject.archive

      @project.reload

      assert !@subproject.active?
      assert_same_elements [@parent_version_1, @parent_version_2], @project.rolled_up_versions
    end
  end

  it 'should shared versions none sharing' do
    p = Project.find(5)
    v = Version.create!(name: 'none_sharing', project: p, sharing: 'none')
    assert p.shared_versions.include?(v)
    assert !p.children.first.shared_versions.include?(v)
    assert !p.root.shared_versions.include?(v)
    assert !p.siblings.first.shared_versions.include?(v)
    assert !p.root.siblings.first.shared_versions.include?(v)
  end

  it 'should shared versions descendants sharing' do
    p = Project.find(5)
    v = Version.create!(name: 'descendants_sharing', project: p, sharing: 'descendants')
    assert p.shared_versions.include?(v)
    assert p.children.first.shared_versions.include?(v)
    assert !p.root.shared_versions.include?(v)
    assert !p.siblings.first.shared_versions.include?(v)
    assert !p.root.siblings.first.shared_versions.include?(v)
  end

  it 'should shared versions hierarchy sharing' do
    p = Project.find(5)
    v = Version.create!(name: 'hierarchy_sharing', project: p, sharing: 'hierarchy')
    assert p.shared_versions.include?(v)
    assert p.children.first.shared_versions.include?(v)
    assert p.root.shared_versions.include?(v)
    assert !p.siblings.first.shared_versions.include?(v)
    assert !p.root.siblings.first.shared_versions.include?(v)
  end

  it 'should shared versions tree sharing' do
    p = Project.find(5)
    v = Version.create!(name: 'tree_sharing', project: p, sharing: 'tree')
    assert p.shared_versions.include?(v)
    assert p.children.first.shared_versions.include?(v)
    assert p.root.shared_versions.include?(v)
    assert p.siblings.first.shared_versions.include?(v)
    assert !p.root.siblings.first.shared_versions.include?(v)
  end

  it 'should shared versions system sharing' do
    p = Project.find(5)
    v = Version.create!(name: 'system_sharing', project: p, sharing: 'system')
    assert p.shared_versions.include?(v)
    assert p.children.first.shared_versions.include?(v)
    assert p.root.shared_versions.include?(v)
    assert p.siblings.first.shared_versions.include?(v)
    assert p.root.siblings.first.shared_versions.include?(v)
  end

  it 'should shared versions' do
    parent = Project.find(1)
    child = parent.children.find(3)
    private_child = parent.children.find(5)

    assert_equal [1, 2, 3], parent.version_ids.sort
    assert_equal [4], child.version_ids
    assert_equal [6], private_child.version_ids
    assert_equal [7], Version.where(sharing: 'system').map(&:id)

    assert_equal 6, parent.shared_versions.size
    parent.shared_versions.each do |version|
      assert_kind_of Version, version
    end

    assert_equal [1, 2, 3, 4, 6, 7], parent.shared_versions.map(&:id).sort
  end

  it 'should shared versions should ignore archived subprojects' do
    parent = Project.find(1)
    child = parent.children.find(3)
    child.archive
    parent.reload

    assert_equal [1, 2, 3], parent.version_ids.sort
    assert_equal [4], child.version_ids
    assert !parent.shared_versions.map(&:id).include?(4)
  end

  it 'should shared versions visible to user' do
    user = User.find(3)
    parent = Project.find(1)
    child = parent.children.find(5)

    assert_equal [1, 2, 3], parent.version_ids.sort
    assert_equal [6], child.version_ids

    versions = parent.shared_versions.visible(user)

    assert_equal 4, versions.size
    versions.each do |version|
      assert_kind_of Version, version
    end

    assert !versions.map(&:id).include?(6)
  end

  it 'should next identifier' do
    ProjectCustomField.delete_all
    Project.create!(name: 'last', identifier: 'p2008040')
    assert_equal 'p2008041', Project.next_identifier
  end

  it 'should next identifier first project' do
    Project.delete_all
    assert_nil Project.next_identifier
  end

  context 'with modules',
          with_settings: { default_projects_modules: ['work_package_tracking', 'repository'] } do
    it 'should enabled module names' do
      project = Project.new

      project.enabled_module_names = %w(work_package_tracking news)
      assert_equal %w(news work_package_tracking), project.enabled_module_names.sort
    end
  end

  it 'should enabled module names should not recreate enabled modules' do
    project = Project.find(1)
    # Remove one module
    modules = project.enabled_modules.to_a.slice(0..-2)
    assert modules.any?
    assert_difference 'EnabledModule.count', -1 do
      project.enabled_module_names = modules.map(&:name)
    end
    project.reload
    # Ids should be preserved
    assert_equal project.enabled_module_ids.sort, modules.map(&:id).sort
  end

  it 'should copy from existing project' do
    source_project = Project.find(1)
    copied_project = Project.copy(1)

    assert copied_project
    # Cleared attributes
    assert copied_project.id.blank?
    assert copied_project.name.blank?
    assert copied_project.identifier.blank?

    # Duplicated attributes
    assert_equal source_project.description, copied_project.description
    assert_equal source_project.enabled_module_names.sort, copied_project.enabled_module_names.sort
    assert_equal source_project.types, copied_project.types

    # Default attributes
    assert_equal 1, copied_project.status
  end

  it 'should activities should use the system activities' do
    project = Project.find(1)
    assert_equal project.activities, TimeEntryActivity.where(active: true).to_a
  end

  it 'should activities should use the project specific activities' do
    project = Project.find(1)
    overridden_activity = TimeEntryActivity.new(name: 'Project', project: project)
    assert overridden_activity.save!

    assert project.activities.include?(overridden_activity), 'Project specific Activity not found'
  end

  it 'should activities should not include the inactive project specific activities' do
    project = Project.find(1)
    overridden_activity = TimeEntryActivity.new(name: 'Project', project: project, parent: TimeEntryActivity.first, active: false)
    assert overridden_activity.save!

    assert !project.activities.include?(overridden_activity), 'Inactive Project specific Activity found'
  end

  it 'should activities should not include project specific activities from other projects' do
    project = Project.find(1)
    overridden_activity = TimeEntryActivity.new(name: 'Project', project: Project.find(2))
    assert overridden_activity.save!

    assert !project.activities.include?(overridden_activity), 'Project specific Activity found on a different project'
  end

  it 'should activities should handle nils' do
    overridden_activity = TimeEntryActivity.new(name: 'Project', project: Project.find(1), parent: TimeEntryActivity.first)
    TimeEntryActivity.delete_all

    # No activities
    project = Project.find(1)
    assert project.activities.empty?

    # No system, one overridden
    assert overridden_activity.save!
    project.reload
    assert_equal [overridden_activity], project.activities
  end

  it 'should activities should override system activities with project activities' do
    project = Project.find(1)
    parent_activity = TimeEntryActivity.first
    overridden_activity = TimeEntryActivity.new(name: 'Project', project: project, parent: parent_activity)
    assert overridden_activity.save!

    assert project.activities.include?(overridden_activity), 'Project specific Activity not found'
    assert !project.activities.include?(parent_activity), 'System Activity found when it should have been overridden'
  end

  it 'should activities should include inactive activities if specified' do
    project = Project.find(1)
    overridden_activity = TimeEntryActivity.new(name: 'Project', project: project, parent: TimeEntryActivity.first, active: false)
    assert overridden_activity.save!

    assert project.activities(true).include?(overridden_activity), 'Inactive Project specific Activity not found'
  end

  specify 'activities should not include active System activities if the project has an override that is inactive' do
    project = Project.find(1)
    system_activity = TimeEntryActivity.find_by(name: 'Design')
    assert system_activity.active?
    overridden_activity = FactoryBot.create(:time_entry_activity, project: project, parent: system_activity, active: false)
    assert overridden_activity.save!

    assert !project.activities.include?(overridden_activity), 'Inactive Project specific Activity not found'
    assert !project.activities.include?(system_activity), 'System activity found when the project has an inactive override'
  end

  it 'should close completed versions' do
    Version.update_all("status = 'open'")
    project = Project.find(1)
    refute_nil project.versions.detect { |v| v.completed? && v.status == 'open' }
    refute_nil project.versions.detect { |v| !v.completed? && v.status == 'open' }
    project.close_completed_versions
    project.reload
    assert_nil project.versions.detect { |v| v.completed? && v.status != 'closed' }
    refute_nil project.versions.detect { |v| !v.completed? && v.status == 'open' }
  end

  it 'should export work packages is allowed' do
    project = Project.find(1)
    assert project.allows_to?(:export_work_packages)
  end

  context 'Project#copy' do
    before do
      ProjectCustomField.destroy_all # Custom values are a mess to isolate in tests
      Project.where(identifier: 'copy-test').destroy_all
      @source_project = Project.find(2)
      @project = Project.new(name: 'Copy Test', identifier: 'copy-test')
      @project.types = @source_project.types
      @project.enabled_module_names = @source_project.enabled_modules.map(&:name)
    end

    it 'should copy work units' do
      work_package = FactoryBot.create(:work_package,
                                        status: Status.find_by_name('Closed'),
                                        subject: 'copy issue status',
                                        type_id: 1,
                                        assigned_to_id: 2,
                                        project_id: @source_project.id)

      @source_project.work_packages << work_package
      assert @project.valid?
      assert @project.work_packages.empty?
      assert @project.copy(@source_project)

      assert_equal @source_project.work_packages.size, @project.work_packages.size
      @project.work_packages.each do |issue|
        assert issue.valid?
        assert !issue.assigned_to.blank?
        assert_equal @project, issue.project
      end

      copied_issue = @project.work_packages.find_by(subject: 'copy issue status')
      assert copied_issue
      assert copied_issue.status
      assert_equal 'Closed', copied_issue.status.name
    end

    it 'should change the new issues to use the copied version' do
      User.current = User.find(1)
      assigned_version = FactoryBot.create(:version, name: 'Assigned Issues', status: 'open')
      @source_project.versions << assigned_version
      assert_equal 3, @source_project.versions.size
      FactoryBot.create(:work_package, project: @source_project,
                                        fixed_version_id: assigned_version.id,
                                        subject: 'change the new issues to use the copied version',
                                        type_id: 1,
                                        project_id: @source_project.id)

      assert @project.copy(@source_project)
      @project.reload
      copied_issue = @project.work_packages.find_by(subject: 'change the new issues to use the copied version')

      assert copied_issue
      assert copied_issue.fixed_version
      assert_equal 'Assigned Issues', copied_issue.fixed_version.name # Same name
      refute_equal assigned_version.id, copied_issue.fixed_version.id # Different record
    end

    it 'should change the new issues to use the copied closed version' do
      User.current = User.find(1)
      assigned_version = FactoryBot.create(:version, name: 'Assigned Issues', status: 'open')
      @source_project.versions << assigned_version
      assert_equal 3, @source_project.versions.size
      FactoryBot.create(:work_package, project: @source_project,
                                        fixed_version_id: assigned_version.id,
                                        subject: 'change the new issues to use the copied version',
                                        type_id: 1,
                                        project_id: @source_project.id)
      assigned_version.update_attribute(:status, 'closed')

      assert @project.copy(@source_project)
      @project.reload
      copied_issue = @project.work_packages.find_by(subject: 'change the new issues to use the copied version')

      assert copied_issue
      assert copied_issue.fixed_version
      assert_equal 'Assigned Issues', copied_issue.fixed_version.name # Same name
      refute_equal assigned_version.id, copied_issue.fixed_version.id # Different record
    end

    it 'should copy issue relations' do
      Setting.cross_project_work_package_relations = '1'

      second_issue = FactoryBot.create(:work_package, status_id: 5,
                                        subject: 'copy issue relation',
                                        type_id: 1,
                                        assigned_to_id: 2,
                                        project_id: @source_project.id)
      source_relation = FactoryBot.create(:relation, from: WorkPackage.find(4),
                                           to: second_issue,
                                           relation_type: 'relates')
      source_relation_cross_project = FactoryBot.create(:relation, from: WorkPackage.find(1),
                                                         to: second_issue,
                                                         relation_type: 'duplicates')

      assert @project.copy(@source_project)
      assert_equal @source_project.work_packages.count, @project.work_packages.count
      copied_issue = @project.work_packages.find_by(subject: 'Issue on project 2') # Was #4
      copied_second_issue = @project.work_packages.find_by(subject: 'copy issue relation')

      # First issue with a relation on project
      # copied relation + reflexive relation
      assert_equal 2, copied_issue.relations.size, 'Relation not copied'
      copied_relation = copied_issue.relations.direct.first
      assert_equal 'relates', copied_relation.relation_type
      assert_equal copied_second_issue.id, copied_relation.to_id
      refute_equal source_relation.id, copied_relation.id

      # Second issue with a cross project relation
      # copied relation + reflexive relation
      assert_equal 3, copied_second_issue.relations.size, 'Relation not copied'
      copied_relation = copied_second_issue.relations.direct.find { |r| r.relation_type == 'duplicates' }
      assert_equal 'duplicates', copied_relation.relation_type
      assert_equal 1, copied_relation.from_id, 'Cross project relation not kept'
      refute_equal source_relation_cross_project.id, copied_relation.id
    end

    it 'should copy memberships' do
      assert @project.valid?
      assert @project.members.empty?
      assert @project.copy(@source_project)

      assert_equal @source_project.memberships.size, @project.memberships.size
      @project.memberships.each do |membership|
        assert membership
        assert_equal @project, membership.project
      end
    end

    it 'should copy memberships with groups and additional roles' do
      group = Group.create!(lastname: 'Copy group')
      user = User.find(7)

      group.users << user

      # group role
      (Member.new.tap do |m|
        m.attributes = { project_id: @source_project.id,
                         principal: group,
                         role_ids: [2] }
      end).save!

      member = Member.find_by(user_id: user.id, project_id: @source_project.id)
      # additional role
      member.role_ids = [1]

      assert @project.copy(@source_project)
      member = Member.find_by(user_id: user.id, project_id: @project.id)
      refute_nil member
      assert_equal [1, 2], member.roles.all.map(&:id).sort
    end

    it 'should copy project specific queries' do
      assert @project.valid?
      assert @project.queries.empty?
      assert @project.copy(@source_project)

      assert_equal @source_project.queries.size, @project.queries.size
      @project.queries.each do |query|
        assert query
        assert_equal @project, query.project
      end
    end

    it 'should copy versions' do
      @source_project.versions << FactoryBot.create(:version)
      @source_project.versions << FactoryBot.create(:version)

      assert @project.versions.empty?
      assert @project.copy(@source_project)

      assert_equal @source_project.versions.size, @project.versions.size
      @project.versions.each do |version|
        assert version
        assert_equal @project, version.project
      end
    end

    it 'should copy wiki' do
      assert_difference 'Wiki.count' do
        assert @project.copy(@source_project)
      end

      assert @project.wiki
      refute_equal @source_project.wiki, @project.wiki
      assert_equal 'Start page', @project.wiki.start_page
    end

    it 'should copy wiki pages and content with hierarchy' do
      assert_difference 'WikiPage.count', @source_project.wiki.pages.size do
        assert @project.copy(@source_project)
      end

      assert @project.wiki
      assert_equal @source_project.wiki.pages.size, @project.wiki.pages.size

      @project.wiki.pages.each do |wiki_page|
        assert wiki_page.content
        assert !@source_project.wiki.pages.include?(wiki_page)
      end

      parent = @project.wiki.find_page('Parent page')
      child1 = @project.wiki.find_page('Child page 1')
      child2 = @project.wiki.find_page('Child page 2')
      assert_equal parent, child1.parent
      assert_equal parent, child2.parent
    end

    it 'should copy issue categories' do
      assert @project.copy(@source_project)

      assert_equal 2, @project.categories.size
      @project.categories.each do |category|
        assert !@source_project.categories.include?(category)
      end
    end

    it 'should copy forums' do
      assert @project.copy(@source_project)

      assert_equal 1, @project.forums.size
      @project.forums.each do |forum|
        assert !@source_project.forums.include?(forum)
      end
    end

    it 'should change the new issues to use the copied issue categories' do
      issue = WorkPackage.find(4)
      issue.update_attribute(:category_id, 3)

      assert @project.copy(@source_project)

      @project.work_packages.each do |issue|
        assert issue.category
        assert_equal 'Stock management', issue.category.name # Same name
        refute_equal Category.find(3), issue.category # Different record
      end
    end

    it 'should limit copy with :only option' do
      assert @project.members.empty?
      assert @project.categories.empty?
      assert @source_project.work_packages.any?

      assert @project.copy(@source_project, only: ['members', 'categories'])

      assert @project.members.any?
      assert @project.categories.any?
      assert @project.work_packages.empty?
    end
  end

  context '#start_date' do
    before do
      ProjectCustomField.destroy_all # Custom values are a mess to isolate in tests
      @project = FactoryBot.create(:project, identifier: 'test0')
      @project.types << FactoryBot.create(:type)
    end

    it 'should be nil if there are no issues on the project' do
      assert_nil @project.start_date
    end

    it "should be the earliest start date of it's issues" do
      early = 7.days.ago.to_date
      FactoryBot.create(:work_package, project: @project, start_date: Date.today)
      FactoryBot.create(:work_package, project: @project, start_date: early)

      assert_equal early, @project.start_date
    end
  end

  context '#due_date' do
    before do
      ProjectCustomField.destroy_all # Custom values are a mess to isolate in tests
      @project = FactoryBot.create(:project, identifier: 'test0')
      @project.types << FactoryBot.create(:type)
    end

    it 'should be nil if there are no issues on the project' do
      assert_nil @project.due_date
    end

    it "should be the latest finish date of it's issues" do
      future = 7.days.from_now.to_date
      FactoryBot.create(:work_package, project: @project, due_date: future)
      FactoryBot.create(:work_package, project: @project, due_date: Date.today)

      assert_equal future, @project.due_date
    end

    it "should be the latest finish date of it's versions" do
      future = 7.days.from_now.to_date
      @project.versions << FactoryBot.create(:version, effective_date: future)
      @project.versions << FactoryBot.create(:version, effective_date: Date.today)

      assert_equal future, @project.due_date
    end

    it "should pick the latest date from it's issues and versions" do
      future = 7.days.from_now.to_date
      far_future = 14.days.from_now.to_date
      FactoryBot.create(:work_package, project: @project, due_date: far_future)
      @project.versions << FactoryBot.create(:version, effective_date: future)

      assert_equal far_future, @project.due_date
    end
  end

  context 'Project#completed_percent' do
    before do
      ProjectCustomField.destroy_all # Custom values are a mess to isolate in tests
      @project = FactoryBot.create(:project, identifier: 'test0')
      @project.types << FactoryBot.create(:type)
    end

    context 'no versions' do
      it 'should be 100' do
        assert_equal 100, @project.completed_percent
      end
    end

    context 'with versions' do
      it 'should return 0 if the versions have no issues' do
        FactoryBot.create(:version, project: @project)
        FactoryBot.create(:version, project: @project)

        assert_equal 0, @project.completed_percent
      end

      it 'should return 100 if the version has only closed issues' do
        v1 = FactoryBot.create(:version, project: @project)
        v2 = FactoryBot.create(:version, project: @project)
        FactoryBot.create(:work_package, project: @project, status: Status.find_by_name('Closed'), fixed_version: v1)
        FactoryBot.create(:work_package, project: @project, status: Status.find_by_name('Closed'), fixed_version: v2)

        assert_equal 100, @project.completed_percent
      end

      it 'should return the averaged completed percent of the versions (not weighted)' do
        v1 = FactoryBot.create(:version, project: @project)
        v2 = FactoryBot.create(:version, project: @project)
        FactoryBot.create(:work_package, project: @project, status: Status.find_by_name('New'), estimated_hours: 10, done_ratio: 50, fixed_version: v1)
        FactoryBot.create(:work_package, project: @project, status: Status.find_by_name('New'), estimated_hours: 10, done_ratio: 50, fixed_version: v2)

        assert_equal 50, @project.completed_percent
      end
    end
  end

  context '#notified_users' do
    before do
      @project = FactoryBot.create(:project)
      @role = FactoryBot.create(:role)

      @user_with_membership_notification = FactoryBot.create(:user, mail_notification: 'selected')
      Member.create!(project: @project, principal: @user_with_membership_notification, mail_notification: true) do |member|
        member.role_ids = [@role.id]
      end

      @all_events_user = FactoryBot.create(:user, mail_notification: 'all')
      Member.create!(project: @project, principal: @all_events_user) do |member|
        member.role_ids = [@role.id]
      end

      @no_events_user = FactoryBot.create(:user, mail_notification: 'none')
      Member.create!(project: @project, principal: @no_events_user) do |member|
        member.role_ids = [@role.id]
      end

      @only_my_events_user = FactoryBot.create(:user, mail_notification: 'only_my_events')
      Member.create!(project: @project, principal: @only_my_events_user) do |member|
        member.role_ids = [@role.id]
      end

      @only_assigned_user = FactoryBot.create(:user, mail_notification: 'only_assigned')
      Member.create!(project: @project, principal: @only_assigned_user) do |member|
        member.role_ids = [@role.id]
      end

      @only_owned_user = FactoryBot.create(:user, mail_notification: 'only_owner')
      Member.create!(project: @project, principal: @only_owned_user) do |member|
        member.role_ids = [@role.id]
      end
    end

    it 'should include members with a mail notification' do
      assert @project.notified_users.include?(@user_with_membership_notification)
    end

    it "should include users with the 'all' notification option" do
      assert @project.notified_users.include?(@all_events_user)
    end

    it "should not include users with the 'none' notification option" do
      assert !@project.notified_users.include?(@no_events_user)
    end

    it "should not include users with the 'only_my_events' notification option" do
      assert !@project.notified_users.include?(@only_my_events_user)
    end

    it "should not include users with the 'only_assigned' notification option" do
      assert !@project.notified_users.include?(@only_assigned_user)
    end

    it "should not include users with the 'only_owner' notification option" do
      assert !@project.notified_users.include?(@only_owned_user)
    end
  end
end