# 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 AuthSourcesControllerTest < Redmine::ControllerTest
  fixtures :users, :auth_sources

  def setup
    @request.session[:user_id] = 1
  end

  def test_index
    get :index
    assert_response :success
  end

  def test_new
    get :new
    assert_response :success

    assert_select 'form#auth_source_form' do
      assert_select 'input[name=type][value=AuthSourceLdap]'
      assert_select 'input[name=?]', 'auth_source[host]'
    end
  end

  def test_new_with_invalid_type_should_respond_with_404
    get(
      :new,
      :params => {
        :type => 'foo'
      }
    )
    assert_response 404
  end

  def test_create
    assert_difference 'AuthSourceLdap.count' do
      post(
        :create,
        :params => {
          :type => 'AuthSourceLdap',
          :auth_source => {
            :name => 'Test',
            :host => '127.0.0.1',
            :port => '389',
            :attr_login => 'cn'
          }
        }
      )
      assert_redirected_to '/auth_sources'
    end

    source = AuthSourceLdap.order('id DESC').first
    assert_equal 'Test', source.name
    assert_equal '127.0.0.1', source.host
    assert_equal 389, source.port
    assert_equal 'cn', source.attr_login
  end

  def test_create_with_failure
    assert_no_difference 'AuthSourceLdap.count' do
      post(
        :create,
        :params => {
          :type => 'AuthSourceLdap',
          :auth_source => {
            :name => 'Test',
            :host => '',
            :port => '389',
            :attr_login => 'cn'
          }
        }
      )
      assert_response :success
    end
    assert_select_error /host cannot be blank/i
  end

  def test_edit
    get(
      :edit,
      :params => {
        :id => 1
      }
    )
    assert_response :success

    assert_select 'form#auth_source_form' do
      assert_select 'input[name=?]', 'auth_source[host]'
    end
  end

  def test_edit_should_not_contain_password
    AuthSource.find(1).update_column :account_password, 'secret'

    get(
      :edit,
      :params => {
        :id => 1
      }
    )
    assert_response :success
    assert_select 'input[value=secret]', 0
    assert_select 'input[name=dummy_password][value^=xxxxxx]'
  end

  def test_edit_invalid_should_respond_with_404
    get(
      :edit,
      :params => {
        :id => 99
      }
    )
    assert_response 404
  end

  def test_update
    put(
      :update,
      :params => {
        :id => 1,
        :auth_source => {
          :name => 'Renamed',
          :host => '192.168.0.10',
          :port => '389',
          :attr_login => 'uid'
        }
      }
    )
    assert_redirected_to '/auth_sources'
    source = AuthSourceLdap.find(1)
    assert_equal 'Renamed', source.name
    assert_equal '192.168.0.10', source.host
  end

  def test_update_with_failure
    put(
      :update,
      :params => {
        :id => 1,
        :auth_source => {
          :name => 'Renamed',
          :host => '',
          :port => '389',
          :attr_login => 'uid'
        }
      }
    )
    assert_response :success
    assert_select_error /host cannot be blank/i
  end

  def test_destroy
    assert_difference 'AuthSourceLdap.count', -1 do
      delete(
        :destroy,
        :params => {
          :id => 1
        }
      )
      assert_redirected_to '/auth_sources'
    end
  end

  def test_destroy_auth_source_in_use
    User.find(2).update_attribute :auth_source_id, 1

    assert_no_difference 'AuthSourceLdap.count' do
      delete(
        :destroy,
        :params => {
          :id => 1
        }
      )
      assert_redirected_to '/auth_sources'
      assert_equal 'This authentication mode is in use and cannot be deleted.', flash[:error]
    end
  end

  def test_test_connection
    AuthSourceLdap.any_instance.stubs(:test_connection).returns(true)

    get(
      :test_connection,
      :params => {
        :id => 1
      }
    )
    assert_redirected_to '/auth_sources'
    assert_not_nil flash[:notice]
    assert_match /successful/i, flash[:notice]
  end

  def test_test_connection_with_failure
    AuthSourceLdap.any_instance.stubs(:initialize_ldap_con).raises(Net::LDAP::Error.new("Something went wrong"))

    get(
      :test_connection,
      :params => {
        :id => 1
      }
    )
    assert_redirected_to '/auth_sources'
    assert_not_nil flash[:error]
    assert_include 'Something went wrong', flash[:error]
  end

  def test_autocomplete_for_new_user
    AuthSource.expects(:search).with('foo').returns(
      [
        {:login => 'foo1', :firstname => 'John', :lastname => 'Smith',
         :mail => 'foo1@example.net', :auth_source_id => 1},
        {:login => 'Smith', :firstname => 'John', :lastname => 'Doe',
         :mail => 'foo2@example.net', :auth_source_id => 1}
      ]
    )
    get(
      :autocomplete_for_new_user,
      :params => {
        :term => 'foo'
      }
    )
    assert_response :success
    assert_equal 'application/json', response.media_type
    json = ActiveSupport::JSON.decode(response.body)
    assert_kind_of Array, json
    assert_equal 2, json.size
    assert_equal 'foo1', json.first['value']
    assert_equal 'foo1 (John Smith)', json.first['label']
  end
end
