#-- encoding: UTF-8
#-- copyright
# OpenProject is a project management system.
# Copyright (C) 2012-2015 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-2013 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 doc/COPYRIGHT.rdoc for more details.
#++
require 'legacy_spec_helper'
require 'roles_controller'

describe RolesController, type: :controller do
  render_views

  fixtures :all

  before do
    User.current = nil
    session[:user_id] = 1 # admin
  end

  it 'should get index' do
    get :index
    assert_response :success
    assert_template 'index'

    refute_nil assigns(:roles)
    assert_equal Role.order('builtin, position').to_a, assigns(:roles)

    assert_select 'a', attributes: { href: edit_role_path(1) },
               content: 'Manager'
  end

  it 'should get new' do
    get :new
    assert_response :success
    assert_template 'new'
  end

  it 'should post new with validaton failure' do
    post :create, role: { name: '',
                          permissions: ['add_work_packages', 'edit_work_packages', 'log_time', ''],
                          assignable: '0' }

    assert_response :success
    assert_template 'new'
    assert_select 'div', attributes: { id: 'errorExplanation' }
  end

  it 'should post new without workflow copy' do
    post :create, role: { name: 'RoleWithoutWorkflowCopy',
                          permissions: ['add_work_packages', 'edit_work_packages', 'log_time', ''],
                          assignable: '0' }

    assert_redirected_to roles_path
    role = Role.find_by(name: 'RoleWithoutWorkflowCopy')
    refute_nil role
    assert_equal [:add_work_packages, :edit_work_packages, :log_time], role.permissions
    assert !role.assignable?
  end

  it 'should post new with workflow copy' do
    post :create, role: { name: 'RoleWithWorkflowCopy',
                          permissions: ['add_work_packages', 'edit_work_packages', 'log_time', ''],
                          assignable: '0' },
                  copy_workflow_from: '1'

    assert_redirected_to roles_path
    role = Role.find_by(name: 'RoleWithWorkflowCopy')
    refute_nil role
    assert_equal Role.find(1).workflows.size, role.workflows.size
  end

  it 'should get edit' do
    get :edit, id: 1
    assert_response :success
    assert_template 'edit'
    assert_equal Role.find(1), assigns(:role)
  end

  it 'should put update' do
    put :update, id: 1,
                 role: { name: 'Manager',
                         permissions: ['edit_project', ''],
                         assignable: '0' }

    assert_redirected_to roles_path
    role = Role.find(1)
    assert_equal [:edit_project], role.permissions
  end

  it 'should destroy' do
    r = Role.new(name: 'ToBeDestroyed', permissions: [:view_wiki_pages])
    assert r.save

    delete :destroy, id: r
    assert_redirected_to roles_path
    assert_nil Role.find_by(id: r.id)
  end

  it 'should destroy role in use' do
    delete :destroy, id: 1
    assert_redirected_to roles_path
    assert flash[:error] == 'This role is in use and cannot be deleted.'
    refute_nil Role.find_by(id: 1)
  end

  it 'should get report' do
    get :report
    assert_response :success
    assert_template 'report'

    refute_nil assigns(:roles)
    assert_equal Role.order('builtin, position'), assigns(:roles)

    assert_select 'input', attributes: { type: 'checkbox',
                                           name: 'permissions[3][]',
                                           value: 'add_work_packages',
                                           checked: 'checked' }

    assert_select 'input', attributes: { type: 'checkbox',
                                           name: 'permissions[3][]',
                                           value: 'delete_work_packages',
                                           checked: nil }
  end

  it 'should put bulk update' do
    put :bulk_update, permissions: { '0' => '', '1' => ['edit_work_packages'], '3' => ['add_work_packages', 'delete_work_packages'] }
    assert_redirected_to roles_path

    assert_equal [:edit_work_packages], Role.find(1).permissions
    assert_equal [:add_work_packages, :delete_work_packages], Role.find(3).permissions
    assert Role.find(2).permissions.empty?
  end

  it 'should clear all permissions' do
    put :bulk_update, permissions: { '0' => '' }
    assert_redirected_to roles_path
    assert Role.find(1).permissions.empty?
  end

  it 'should move highest' do
    put :update, id: 3, role: { move_to: 'highest' }
    assert_redirected_to roles_path
    assert_equal 1, Role.find(3).position
  end

  it 'should move higher' do
    position = Role.find(3).position
    put :update, id: 3, role: { move_to: 'higher' }
    assert_redirected_to roles_path
    assert_equal position - 1, Role.find(3).position
  end

  it 'should move lower' do
    position = Role.find(2).position
    put :update, id: 2, role: { move_to: 'lower' }
    assert_redirected_to roles_path
    assert_equal position + 1, Role.find(2).position
  end

  it 'should move lowest' do
    put :update, id: 2, role: { move_to: 'lowest' }
    assert_redirected_to roles_path
    assert_equal Role.count, Role.find(2).position
  end
end