# frozen_string_literal: true

# Redmine - project management software
# Copyright (C) 2006-2023  Jean-Philippe Lang
#
# 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.

require_relative '../../test_helper'

class Redmine::ApiTest::MembershipsTest < Redmine::ApiTest::Base
  fixtures :projects, :users, :roles, :members, :member_roles

  test "GET /projects/:project_id/memberships.xml should return memberships" do
    get '/projects/1/memberships.xml', :headers => credentials('jsmith')

    assert_response :success
    assert_equal 'application/xml', @response.media_type
    assert_select 'memberships[type=array] membership id', :text => '2' do
      assert_select '~ user[id="3"][name="Dave Lopper"]'
      assert_select '~ roles role[id="2"][name=Developer]'
    end
  end

  test "GET /projects/:project_id/memberships.json should return memberships" do
    get '/projects/1/memberships.json', :headers => credentials('jsmith')

    assert_response :success
    assert_equal 'application/json', @response.media_type
    json = ActiveSupport::JSON.decode(response.body)
    assert_equal 3,  json["total_count"]
    assert_equal 25, json["limit"]
    assert_equal 0,  json["offset"]
    assert_include(
      {
        "id"=>1,
        "project" => {"name"=>"eCookbook", "id"=>1},
        "roles" => [{"name"=>"Manager", "id"=>1}],
        "user" => {"name"=>"John Smith", "id"=>2}
      },
      json["memberships"]
    )
  end

  test "GET /projects/:project_id/memberships.xml should succeed for closed project" do
    project = Project.find(1)
    project.close
    assert !project.reload.active?
    get '/projects/1/memberships.json', :headers => credentials('jsmith')
    assert_response :success
  end

  test "GET /projects/:project_id/memberships.xml should include locked users" do
    assert User.find(3).lock!
    get '/projects/ecookbook/memberships.xml', :headers => credentials('jsmith')
    assert_response :success
    assert_select 'memberships[type=array] membership id', :text => '2' do
      assert_select '~ user[id="3"][name="Dave Lopper"]'
    end
  end

  test "POST /projects/:project_id/memberships.xml should create the membership" do
    assert_difference 'Member.count' do
      post(
        '/projects/1/memberships.xml',
        :params => {:membership => {:user_id => 7, :role_ids => [2, 3]}},
        :headers => credentials('jsmith')
      )
      assert_response :created
    end
  end

  test "POST /projects/:project_id/memberships.xml should create the group membership" do
    group = Group.find(11)

    assert_difference 'Member.count', 1 + group.users.count do
      post(
        '/projects/1/memberships.xml',
        :params => {:membership => {:user_id => 11, :role_ids => [2, 3]}},
        :headers => credentials('jsmith')
      )
      assert_response :created
    end
  end

  test "POST /projects/:project_id/memberships.xml with invalid parameters should return errors" do
    assert_no_difference 'Member.count' do
      post(
        '/projects/1/memberships.xml',
        :params => {:membership => {:role_ids => [2, 3]}},
        :headers => credentials('jsmith')
      )
      assert_response :unprocessable_entity
      assert_equal 'application/xml', @response.media_type
      assert_select 'errors error', :text => 'User or Group cannot be blank'
    end
  end

  test "GET /memberships/:id.xml should return the membership" do
    get '/memberships/2.xml', :headers => credentials('jsmith')

    assert_response :success
    assert_equal 'application/xml', @response.media_type
    assert_select 'membership id', :text => '2' do
      assert_select '~ user[id="3"][name="Dave Lopper"]'
      assert_select '~ roles role[id="2"][name=Developer]'
    end
  end

  test "GET /memberships/:id.json should return the membership" do
    get '/memberships/2.json', :headers => credentials('jsmith')

    assert_response :success
    assert_equal 'application/json', @response.media_type
    json = ActiveSupport::JSON.decode(response.body)
    assert_equal(
      {
        "membership" => {
          "id" => 2,
          "project" => {"name"=>"eCookbook", "id"=>1},
          "roles" => [{"name"=>"Developer", "id"=>2}],
          "user" => {"name"=>"Dave Lopper", "id"=>3}
        }
      },
      json
    )
  end

  test "PUT /memberships/:id.xml should update the membership" do
    assert_not_equal [1, 2], Member.find(2).role_ids.sort
    assert_no_difference 'Member.count' do
      put(
        '/memberships/2.xml',
        :params => {:membership => {:user_id => 3, :role_ids => [1, 2]}},
        :headers => credentials('jsmith')
      )
      assert_response :no_content
      assert_equal '', @response.body
    end
    member = Member.find(2)
    assert_equal [1, 2], member.role_ids.sort
  end

  test "PUT /memberships/:id.xml with invalid parameters should return errors" do
    put(
      '/memberships/2.xml',
      :params => {:membership => {:user_id => 3, :role_ids => [99]}},
      :headers => credentials('jsmith')
    )
    assert_response :unprocessable_entity
    assert_equal 'application/xml', @response.media_type
    assert_select 'errors error', :text => "Role cannot be empty"
  end

  test "DELETE /memberships/:id.xml should destroy the membership" do
    assert_difference 'Member.count', -1 do
      delete '/memberships/2.xml', :headers => credentials('jsmith')

      assert_response :no_content
      assert_equal '', @response.body
    end
    assert_nil Member.find_by_id(2)
  end

  test "DELETE /memberships/:id.xml should respond with 422 on failure" do
    assert_no_difference 'Member.count' do
      # A membership with an inherited role cannot be deleted
      Member.find(2).member_roles.first.update_attribute :inherited_from, 99
      delete '/memberships/2.xml', :headers => credentials('jsmith')

      assert_response :unprocessable_entity
    end
  end
end
