RSpec.describe 'Commands / Delete' do
  include_context 'users and tasks'

  subject(:users) { container.commands.users }

  with_adapters do
    before do
      conf.relation(:users) do
        def by_name(name)
          where(name: name)
        end
      end

      conf.commands(:users) do
        define(:delete) do
          result :one
        end
      end

      container.relations.users.insert(id: 3, name: 'Jade')
      container.relations.users.insert(id: 4, name: 'John')
    end

    describe '#transaction' do
      it 'deletes in normal way if no error raised' do
        expect {
          users.delete.transaction do
            users.delete.by_name('Jade').call
          end
        }.to change { container.relations.users.count }.by(-1)
      end

      it 'deletes nothing if error was raised' do
        expect {
          users.delete.transaction do
            users.delete.by_name('Jade').call
            raise ROM::SQL::Rollback
          end
        }.to_not change { container.relations.users.count }
      end
    end

    describe '#call' do
      it 'deletes all tuples in a restricted relation' do
        result = users.try { users.delete.by_name('Jade').call }

        expect(result.value).to eql(id: 3, name: 'Jade')
      end

      it 're-raises database error' do
        command = users.delete.by_name('Jade')

        expect(command.relation).to receive(:delete).and_raise(
          Sequel::DatabaseError, 'totally wrong'
        )

        expect {
          users.try { command.call }
        }.to raise_error(ROM::SQL::DatabaseError, /totally wrong/)
      end
    end

    describe '#execute' do
      context 'with postgres adapter' do
        context 'with a single record' do
          it 'materializes the result' do
            result = container.command(:users).delete.by_name(%w(Jade)).execute
            expect(result).to eq([
              { id: 3, name: 'Jade' }
            ])
          end
        end

        context 'with multiple records' do
          it 'materializes the results' do
            result = container.command(:users).delete.by_name(%w(Jade John)).execute
            expect(result).to eq([
              { id: 3, name: 'Jade' },
              { id: 4, name: 'John' }
            ])
          end
        end
      end

      context 'with other adapter', adapter: :sqlite do
        let(:uri) { SQLITE_DB_URI }

        context 'with a single record' do
          it 'materializes the result' do
            result = container.command(:users).delete.by_name(%w(Jade)).execute
            expect(result).to eq([
              { id: 3, name: 'Jade' }
            ])
          end
        end

        context 'with multiple records' do
          it 'materializes the results' do
            result = container.command(:users).delete.by_name(%w(Jade John)).execute
            expect(result).to eq([
              { id: 3, name: 'Jade' },
              { id: 4, name: 'John' }
            ])
          end
        end
      end
    end
  end
end