# frozen_string_literal: true

require 'spec_helper'

describe 'Auth' do
  # User creation with a password fails on the server if, for example,
  # only MONGODB-AWS auth mechanism is allowed in server configuration.
  require_no_external_user

  describe 'Unauthorized exception message' do
    let(:server) do
      authorized_client.cluster.next_primary
    end

    let(:base_options) do
      SpecConfig.instance.monitoring_options.merge(connect: SpecConfig.instance.test_options[:connect])
    end

    let(:connection) do
      Mongo::Server::Connection.new(server, base_options.merge(options))
    end

    before(:all) do
      # If auth is configured, the test suite uses the configured user
      # and does not create its own users. However, the configured user may
      # not have the auth mechanisms we need. Therefore we create a user
      # for this test without specifying auth mechanisms, which gets us
      # server default

      users = ClientRegistry.instance.global_client('root_authorized').use(:admin).database.users
      users.remove('existing_user') unless users.info('existing_user').empty?
      users.create('existing_user', password: 'password')
    end

    context 'user mechanism not provided' do
      context 'user does not exist' do
        let(:options) do
          { user: 'nonexistent_user' }
        end

        before do
          expect(connection.app_metadata.send(:document)[:saslSupportedMechs]).to eq('admin.nonexistent_user')
        end

        # An existing user will negotiate scram-sha-256.
        # A non-existing user negotiate scram-sha-1.
        it 'indicates scram-sha-1 was used' do
          expect do
            connection.connect!
          end.to raise_error(Mongo::Auth::Unauthorized,
                             /User nonexistent_user \(mechanism: scram\) is not authorized to access admin.*used mechanism: SCRAM-SHA-1/)
        end
      end

      context 'user exists' do
        let(:options) do
          { user: 'existing_user', password: 'bogus' }
        end

        before do
          expect(connection.app_metadata.send(:document)[:saslSupportedMechs]).to eq('admin.existing_user')
        end

        # An existing user will negotiate scram-sha-256.
        # A non-existing user will negotiate scram-sha-1.
        it 'indicates scram-sha-256 was used' do
          expect do
            connection.connect!
          end.to raise_error(Mongo::Auth::Unauthorized,
                             /User existing_user \(mechanism: scram256\) is not authorized to access admin.*used mechanism: SCRAM-SHA-256/)
        end
      end
    end

    context 'user mechanism is provided' do
      context 'scram-sha-1 requested' do
        let(:options) do
          { user: 'nonexistent_user', auth_mech: :scram }
        end

        it 'indicates scram-sha-1 was requested and used' do
          expect do
            connection.connect!
          end.to raise_error(Mongo::Auth::Unauthorized,
                             /User nonexistent_user \(mechanism: scram\) is not authorized to access admin.*used mechanism: SCRAM-SHA-1/)
        end
      end

      context 'scram-sha-256 requested' do
        let(:options) do
          { user: 'nonexistent_user', auth_mech: :scram256 }
        end

        it 'indicates scram-sha-256 was requested and used' do
          expect do
            connection.connect!
          end.to raise_error(Mongo::Auth::Unauthorized,
                             /User nonexistent_user \(mechanism: scram256\) is not authorized to access admin.*used mechanism: SCRAM-SHA-256/)
        end
      end
    end

    context 'when authentication fails' do
      let(:options) do
        { user: 'nonexistent_user', password: 'foo' }
      end

      it 'reports which server authentication was attempted against' do
        expect do
          connection.connect!
        end.to raise_error(Mongo::Auth::Unauthorized, /used server: #{connection.address}/)
      end

      context 'with default auth source' do
        it 'reports auth source used' do
          expect do
            connection.connect!
          end.to raise_error(Mongo::Auth::Unauthorized, /auth source: admin/)
        end
      end

      context 'with custom auth source' do
        let(:options) do
          { user: 'nonexistent_user', password: 'foo', auth_source: 'authdb' }
        end

        it 'reports auth source used' do
          expect do
            connection.connect!
          end.to raise_error(Mongo::Auth::Unauthorized, /auth source: authdb/)
        end
      end
    end

    context 'attempting to connect to a non-tls server with tls' do
      require_no_tls

      let(:options) { { ssl: true } }

      it 'reports host, port and tls status' do
        begin
          connection.connect!
        rescue Mongo::Error::SocketError => e
        end
        expect(e).not_to be_nil
        expect(e.message).to include('OpenSSL::SSL::SSLError')
        expect(e.message).to include(server.address.to_s)
        expect(e.message).to include('TLS')
        expect(e.message).not_to include('no TLS')
      end
    end

    context 'attempting to connect to a tls server without tls' do
      require_tls

      let(:options) { { ssl: false } }

      it 'reports host, port and tls status' do
        begin
          connection.connect!
        rescue Mongo::Error::SocketError => e
        end
        expect(e).not_to be_nil
        expect(e.message).not_to include('OpenSSL::SSL::SSLError')
        addresses = Socket.getaddrinfo(server.address.host, nil)
        expect(addresses.any? do |address|
          e.message.include?("#{address[2]}:#{server.address.port}")
        end).to be true
        expect(e.message).to include('no TLS')
      end
    end
  end

  shared_examples_for 'caches client key' do
    it 'caches' do
      client.close
      Mongo::Auth::CredentialCache.clear

      RSpec::Mocks.with_temporary_scope do
        expect_any_instance_of(conversation_class).to receive(:hi).exactly(:once).and_call_original

        client.reconnect
        server = client.cluster.next_primary
        server.with_connection do
          server.with_connection do
            # nothing
          end
        end
      end
    end
  end

  describe 'scram-sha-1 client key caching' do
    clean_slate
    require_no_external_user

    let(:client) { authorized_client.with(max_pool_size: 2, auth_mech: :scram) }
    let(:conversation_class) { Mongo::Auth::Scram::Conversation }

    it_behaves_like 'caches client key'
  end

  describe 'scram-sha-256 client key caching' do
    clean_slate
    require_no_external_user

    let(:client) { authorized_client.with(max_pool_size: 2, auth_mech: :scram256) }
    let(:conversation_class) { Mongo::Auth::Scram256::Conversation }

    it_behaves_like 'caches client key'
  end

  context 'when only auth source is specified' do
    require_no_auth

    let(:client) do
      new_local_client(SpecConfig.instance.addresses, SpecConfig.instance.monitoring_options.merge(
                                                        auth_source: 'foo'
                                                      ))
    end

    it 'does not authenticate' do
      expect(Mongo::Auth::User).not_to receive(:new)
      client.database.command(ping: 1)
    end
  end

  context 'when only auth mechanism is specified' do
    require_x509_auth

    let(:client) do
      new_local_client(SpecConfig.instance.addresses, base_options.merge(
                                                        auth_mech: :mongodb_x509
                                                      ))
    end

    it 'authenticates' do
      expect(Mongo::Auth::User).to receive(:new).and_call_original
      client.database.command(ping: 1)
    end
  end

  context 'in lb topology' do
    require_topology :load_balanced

    context 'when authentication fails with network error' do
      let(:server) do
        authorized_client.cluster.next_primary
      end

      let(:base_options) do
        SpecConfig.instance.monitoring_options.merge(connect: SpecConfig.instance.test_options[:connect])
      end

      let(:connection) do
        Mongo::Server::Connection.new(server, base_options)
      end

      it 'includes service id in exception' do
        expect_any_instance_of(Mongo::Server::PendingConnection).to receive(:authenticate!).and_raise(Mongo::Error::SocketError)

        begin
          connection.connect!
        rescue Mongo::Error::SocketError => e
          e.service_id.should_not be_nil
        else
          raise 'Expected the SocketError to be raised'
        end
      end
    end
  end
end
