#-- 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 . principal . is_a? ( User ) && m . principal . 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 . principal
@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 . principal
@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 " active " , 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