mongo 2.4.1 → 2.14.0

data/spec/mongo/database_spec.rb

@@ -2,16 +2,29 @@ require 'spec_helper'
 
 describe Mongo::Database do
 
+  shared_context 'more than 100 collections' do
+    let(:client) do
+      root_authorized_client.use('many-collections')
+    end
+
+    before do
+      120.times do |i|
+        client["coll-#{i}"].drop
+        client["coll-#{i}"].create
+      end
+    end
+  end
+
   describe '#==' do
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
     context 'when the names are the same' do
 
       let(:other) do
-        described_class.new(authorized_client, TEST_DB)
+        described_class.new(authorized_client, SpecConfig.instance.test_db)
       end
 
       it 'returns true' do
@@ -41,7 +54,7 @@ describe Mongo::Database do
   describe '#[]' do
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
     context 'when providing a valid name' do
@@ -67,7 +80,7 @@ describe Mongo::Database do
     context 'when the client has options' do
 
       let(:client) do
-        Mongo::Client.new([default_address.host], read: { mode: :secondary })
+        new_local_client([default_address.host], SpecConfig.instance.test_options.merge(read: { mode: :secondary }))
       end
 
       let(:database) do
@@ -79,7 +92,8 @@ describe Mongo::Database do
       end
 
       it 'applies the options to the collection' do
-        expect(collection.read_preference).to eq(Mongo::ServerSelector.get(mode: :secondary))
+        expect(collection.server_selector).to eq(Mongo::ServerSelector.get(mode: :secondary))
+        expect(collection.read_preference).to eq(BSON::Document.new(mode: :secondary))
       end
     end
   end
@@ -87,23 +101,46 @@ describe Mongo::Database do
   describe '#collection_names' do
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
     before do
-      database[:users].create
+      database['users'].drop
+      database['users'].create
     end
 
-    after do
-      database[:users].drop
+    let(:actual) do
+      database.collection_names
     end
 
     it 'returns the stripped names of the collections' do
-      expect(database.collection_names).to include('users')
+      expect(actual).to include('users')
     end
 
     it 'does not include system collections' do
-      expect(database.collection_names).to_not include('system.indexes')
+      expect(actual).to_not include('version')
+      expect(actual).to_not include('system.version')
+    end
+
+    context 'on 2.6 server' do
+      max_server_version '2.6'
+    end
+
+    it 'does not include collections with $ in names' do
+      expect(actual.none? { |name| name.include?('$') }).to be true
+    end
+
+    context 'when provided a session' do
+
+      let(:operation) do
+        database.collection_names(session: session)
+      end
+
+      let(:client) do
+        authorized_client
+      end
+
+      it_behaves_like 'an operation using a session'
     end
 
     context 'when specifying a batch size' do
@@ -116,28 +153,114 @@ describe Mongo::Database do
     context 'when there are more collections than the initial batch size' do
 
       before do
+        2.times do |i|
+          database["#{i}_dalmatians"].drop
+        end
         2.times do |i|
           database["#{i}_dalmatians"].create
         end
       end
 
-      after do
-        2.times do |i|
-          database["#{i}_dalmatians"].drop
+      it 'returns all collections' do
+        collection_names = database.collection_names(batch_size: 1)
+        expect(collection_names).to include('0_dalmatians')
+        expect(collection_names).to include('1_dalmatians')
+      end
+    end
+
+    context 'when provided a filter' do
+      min_server_fcv '3.0'
+
+      before do
+        database['users2'].drop
+        database['users2'].create
+      end
+
+      let(:result) do
+        database.collection_names(filter: { name: 'users2' })
+      end
+
+      it 'returns users2 collection' do
+        expect(result.length).to eq(1)
+        expect(result.first).to eq('users2')
+      end
+    end
+
+    context 'when provided authorized_collections or not' do
+
+      context 'on server versions >= 4.0' do
+        min_server_fcv '4.0'
+
+        let(:database) do
+          described_class.new(client, SpecConfig.instance.test_db)
+        end
+
+        let(:subscriber) { EventSubscriber.new }
+
+        let(:client) do
+          authorized_client.tap do |client|
+            client.subscribe(Mongo::Monitoring::COMMAND, subscriber)
+          end
+        end
+
+        context 'when authorized_collections is provided' do
+          let(:options) do
+            { authorized_collections: true }
+          end
+
+          let!(:result) do
+            database.collections(options)
+          end
+
+          let(:events) do
+            subscriber.command_started_events('listCollections')
+          end
+
+          it 'passes authorized_collections to the server' do
+            expect(events.length).to eq(1)
+            command = events.first.command
+            expect(command['authorizedCollections']).to eq(true)
+          end
+        end
+
+        context 'when no options are provided' do
+          let!(:result) do
+            database.collection_names
+          end
+
+          let(:events) do
+            subscriber.command_started_events('listCollections')
+          end
+
+          it 'authorized_collections not passed to server' do
+            expect(events.length).to eq(1)
+            command = events.first.command
+            expect(command['nameOnly']).to eq(true)
+            expect(command['authorizedCollections']).to be_nil
+          end
         end
       end
+    end
 
-      it 'returns all collections' do
-        expect(database.collection_names(batch_size: 1).select { |c| c =~ /dalmatians/}.size).to eq(2)
+    context 'when there are more than 100 collections' do
+      include_context 'more than 100 collections'
+
+      let(:collection_names) do
+        client.database.collection_names.sort
       end
 
+      it 'lists all collections' do
+        collection_names.length.should == 120
+        collection_names.should include('coll-0')
+        collection_names.should include('coll-119')
+      end
     end
   end
 
   describe '#list_collections' do
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
     let(:result) do
@@ -147,19 +270,172 @@ describe Mongo::Database do
     end
 
     before do
-      database[:users].create
+      database['acol'].drop
+      database['acol'].create
+    end
+
+    context 'server 3.0+' do
+      min_server_fcv '3.0'
+
+      it 'returns a list of the collections info' do
+        expect(result).to include('acol')
+      end
+
+      context 'with more than one collection' do
+        before do
+          database['anothercol'].drop
+          database['anothercol'].create
+
+          expect(database.collections.length).to be > 1
+        end
+
+        let(:result) do
+          database.list_collections(filter: { name: 'anothercol' }).map do |info|
+            info['name']
+          end
+        end
+
+        it 'can filter by collection name' do
+          expect(result.length).to eq(1)
+          expect(result.first).to eq('anothercol')
+        end
+      end
+    end
+
+    context 'server 2.6' do
+      max_server_fcv '2.6'
+
+      it 'returns a list of the collections info' do
+        expect(result).to include("#{SpecConfig.instance.test_db}.acol")
+      end
+    end
+
+    it 'does not include collections with $ in names' do
+      expect(result.none? { |name| name.include?('$') }).to be true
     end
 
-    after do
-      database[:users].drop
+    context 'on admin database' do
+      let(:database) do
+        described_class.new(root_authorized_client, 'admin')
+      end
+
+      it 'does not include system collections' do
+        expect(result.none? { |name| name =~ /(^|\.)system\./ }).to be true
+      end
+
+      context 'server 3.0+' do
+        min_server_fcv '3.0'
+
+        it 'returns results' do
+          expect(result).to include('acol')
+        end
+      end
+
+      context 'server 2.6-' do
+        max_server_version '2.6'
+
+        it 'returns results' do
+          expect(result).to include('admin.acol')
+        end
+      end
     end
 
-    it 'returns a list of the collections info', if: list_command_enabled?  do
-      expect(result).to include('users')
+    context 'when provided authorized_collections or name_only options or not' do
+
+      context 'on server versions >= 4.0' do
+        min_server_fcv '4.0'
+
+        let(:database) do
+          described_class.new(client, SpecConfig.instance.test_db)
+        end
+
+        let(:subscriber) { EventSubscriber.new }
+
+        let(:client) do
+          authorized_client.tap do |client|
+            client.subscribe(Mongo::Monitoring::COMMAND, subscriber)
+          end
+        end
+
+        context 'when both are provided' do
+          let(:options) do
+            { name_only: true, authorized_collections: true }
+          end
+
+          let!(:result) do
+            database.list_collections(options)
+          end
+
+          let(:events) do
+            subscriber.command_started_events('listCollections')
+          end
+
+          it 'passes original options to the server' do
+            expect(events.length).to eq(1)
+            command = events.first.command
+            expect(command['nameOnly']).to eq(true)
+            expect(command['authorizedCollections']).to eq(true)
+          end
+        end
+
+        context 'when name_only is provided' do
+          let(:options) do
+            { name_only: false }
+          end
+
+          let!(:result) do
+            database.list_collections(options)
+          end
+
+          let(:events) do
+            subscriber.command_started_events('listCollections')
+          end
+
+          it 'no options passed to server because false' do
+            expect(events.length).to eq(1)
+            command = events.first.command
+            expect(command['nameOnly']).to be_nil
+            expect(command['authorizedCollections']).to be_nil
+          end
+        end
+
+        context 'when no options provided' do
+
+          let!(:result) do
+            database.list_collections
+          end
+
+          let(:events) do
+            subscriber.command_started_events('listCollections')
+          end
+
+          it 'no options passed to server because none provided' do
+            expect(events.length).to eq(1)
+            command = events.first.command
+            expect(command['nameOnly']).to be_nil
+            expect(command['authorizedCollections']).to be_nil
+          end
+        end
+      end
     end
 
-    it 'returns a list of the collections info', unless: list_command_enabled?  do
-      expect(result).to include("#{TEST_DB}.users")
+    context 'when there are more than 100 collections' do
+      include_context 'more than 100 collections'
+
+      let(:collections) do
+        client.database.list_collections
+      end
+
+      let(:collection_names) do
+        # 2.6 server prefixes collection names with database name
+        collections.map { |info| info['name'].sub(/^many-collections\./, '') }.sort
+      end
+
+      it 'lists all collections' do
+        collections.length.should == 120
+        collection_names.should include('coll-0')
+        collection_names.should include('coll-119')
+      end
     end
   end
 
@@ -168,7 +444,7 @@ describe Mongo::Database do
     context 'when the database exists' do
 
       let(:database) do
-        described_class.new(authorized_client, TEST_DB)
+        described_class.new(authorized_client, SpecConfig.instance.test_db)
       end
 
       let(:collection) do
@@ -176,16 +452,30 @@ describe Mongo::Database do
       end
 
       before do
-        database[:users].create
-      end
-
-      after do
-        database[:users].drop
+        database['users'].drop
+        database['users'].create
       end
 
       it 'returns collection objects for each name' do
         expect(database.collections).to include(collection)
       end
+
+      it 'does not include collections with $ in names' do
+        expect(database.collections.none? { |c| c.name.include?('$') }).to be true
+      end
+    end
+
+    context 'on admin database' do
+
+      let(:database) do
+        described_class.new(root_authorized_client, 'admin')
+      end
+
+      it 'does not include the system collections' do
+        collection_names = database.collections.map(&:name)
+        expect(collection_names).not_to include('system.version')
+        expect(collection_names.none? { |name| name =~ /(^|\.)system\./ }).to be true
+      end
     end
 
     context 'when the database does not exist' do
@@ -194,15 +484,16 @@ describe Mongo::Database do
         described_class.new(authorized_client, 'invalid_database')
       end
 
-      it 'returns an empty list', if: write_command_enabled? do
+      it 'returns an empty list' do
         expect(database.collections).to be_empty
       end
     end
 
-    context 'when the user is not authorized', if: auth_enabled? do
+    context 'when the user is not authorized' do
+      require_auth
 
       let(:database) do
-        described_class.new(unauthorized_client, TEST_DB)
+        described_class.new(unauthorized_client, SpecConfig.instance.test_db)
       end
 
       it 'raises an exception' do
@@ -211,19 +502,166 @@ describe Mongo::Database do
         }.to raise_error(Mongo::Error::OperationFailure)
       end
     end
+
+    context 'when provided a filter' do
+      min_server_fcv '3.0'
+
+      let(:database) do
+        described_class.new(authorized_client, SpecConfig.instance.test_db)
+      end
+
+      let(:collection2) do
+        Mongo::Collection.new(database, 'users2')
+      end
+
+      before do
+        database['users1'].drop
+        database['users1'].create
+
+        database['users2'].drop
+        database['users2'].create
+      end
+
+      let(:result) do
+        database.collections(filter: { name: 'users2' })
+      end
+
+      it 'returns users2 collection' do
+        expect(result.length).to eq(1)
+        expect(database.collections).to include(collection2)
+      end
+    end
+
+    context 'when provided authorized_collections or not' do
+
+      context 'on server versions >= 4.0' do
+        min_server_fcv '4.0'
+
+        let(:database) do
+          described_class.new(client, SpecConfig.instance.test_db)
+        end
+
+        let(:subscriber) { EventSubscriber.new }
+
+        let(:client) do
+          authorized_client.tap do |client|
+            client.subscribe(Mongo::Monitoring::COMMAND, subscriber)
+          end
+        end
+
+        context 'when authorized_collections are provided' do
+          let(:options) do
+            { authorized_collections: false }
+          end
+
+          let!(:result) do
+            database.collections(options)
+          end
+
+          let(:events) do
+            subscriber.command_started_events('listCollections')
+          end
+
+          it 'authorized_collections not passed to server because false' do
+            expect(events.length).to eq(1)
+            command = events.first.command
+            expect(command['nameOnly']).to eq(true)
+            expect(command['authorizedCollections']).to be_nil
+          end
+        end
+
+        context 'when no options are provided' do
+          let!(:result) do
+            database.collections
+          end
+
+          let(:events) do
+            subscriber.command_started_events('listCollections')
+          end
+
+          it 'authorized_collections not passed to server because not provided' do
+            expect(events.length).to eq(1)
+            command = events.first.command
+            expect(command['authorizedCollections']).to be_nil
+          end
+        end
+      end
+    end
+
+    context 'when there are more than 100 collections' do
+      include_context 'more than 100 collections'
+
+      let(:collections) do
+        client.database.collections
+      end
+
+      let(:collection_names) do
+        collections.map(&:name).sort
+      end
+
+      it 'lists all collections' do
+        collections.length.should == 120
+        collection_names.should include('coll-0')
+        collection_names.should include('coll-119')
+      end
+    end
   end
 
   describe '#command' do
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
     it 'sends the query command to the cluster' do
       expect(database.command(:ismaster => 1).written_count).to eq(0)
     end
 
-    context 'when a read concern is provided', if: find_command_enabled? do
+    it 'does not mutate the command selector' do
+      expect(database.command({:ismaster => 1}.freeze).written_count).to eq(0)
+    end
+
+    context 'when provided a session' do
+      min_server_fcv '3.6'
+
+      let(:operation) do
+        client.database.command({ :ismaster => 1 }, session: session)
+      end
+
+      let(:failed_operation) do
+        client.database.command({ :invalid => 1 }, session: session)
+      end
+
+      let(:session) do
+        client.start_session
+      end
+
+      let(:subscriber) { EventSubscriber.new }
+
+      let(:client) do
+        authorized_client.tap do |client|
+          client.subscribe(Mongo::Monitoring::COMMAND, subscriber)
+        end
+      end
+
+      it_behaves_like 'an operation using a session'
+      it_behaves_like 'a failed operation using a session'
+
+
+      let(:full_command) do
+        subscriber.started_events.find { |cmd| cmd.command_name == 'ismaster' }.command
+      end
+
+      it 'does not add a afterClusterTime field' do
+        # Ensure that the session has an operation time
+        client.database.command({ ping: 1 }, session: session)
+        operation
+        expect(full_command['readConcern']).to be_nil
+      end
+    end
+
+    context 'when a read concern is provided' do
+      min_server_fcv '3.2'
 
       context 'when the read concern is valid' do
 
@@ -235,8 +673,9 @@ describe Mongo::Database do
       end
 
       context 'when the read concern is not valid' do
+        require_topology :single, :replica_set
 
-        it 'raises an exception', if: (find_command_enabled? && !sharded?) do
+        it 'raises an exception' do
           expect {
             database.command(:ismaster => 1, readConcern: { level: 'yay' })
           }.to raise_error(Mongo::Error::OperationFailure)
@@ -244,7 +683,8 @@ describe Mongo::Database do
       end
     end
 
-    context 'when no read preference is provided', unless: sharded? do
+    context 'when no read preference is provided' do
+      require_topology :single, :replica_set
 
       let!(:primary_server) do
         database.cluster.next_primary
@@ -259,7 +699,8 @@ describe Mongo::Database do
       end
     end
 
-    context 'when the client has a read preference set', unless: sharded? do
+    context 'when the client has a read preference set' do
+      require_topology :single, :replica_set
 
       let!(:primary_server) do
         database.cluster.next_primary
@@ -274,7 +715,7 @@ describe Mongo::Database do
       end
 
       let(:database) do
-        described_class.new(client, TEST_DB, client.options)
+        described_class.new(client, SpecConfig.instance.test_db, client.options)
       end
 
       before do
@@ -286,7 +727,8 @@ describe Mongo::Database do
       end
     end
 
-    context 'when there is a read preference argument provided', unless: sharded? do
+    context 'when there is a read preference argument provided' do
+      require_topology :single, :replica_set
 
       let(:read_preference) do
         { :mode => :secondary, :tag_sets => [{ 'non' => 'existent' }] }
@@ -297,7 +739,7 @@ describe Mongo::Database do
       end
 
       let(:database) do
-        described_class.new(client, TEST_DB, client.options)
+        described_class.new(client, SpecConfig.instance.test_db, client.options)
       end
 
       before do
@@ -311,14 +753,15 @@ describe Mongo::Database do
       end
     end
 
-    context 'when the client has a server_selection_timeout set', unless: sharded? do
+    context 'when the client has a server_selection_timeout set' do
+      require_topology :single, :replica_set
 
       let(:client) do
         authorized_client.with(server_selection_timeout: 0)
       end
 
       let(:database) do
-        described_class.new(client, TEST_DB, client.options)
+        described_class.new(client, SpecConfig.instance.test_db, client.options)
       end
 
       it 'uses the client server_selection_timeout' do
@@ -330,13 +773,14 @@ describe Mongo::Database do
 
     context 'when a write concern is not defined on the client/database object' do
 
-      context 'when a write concern is provided in the selector', if: standalone? do
+      context 'when a write concern is provided in the selector' do
+        require_topology :single
 
         let(:cmd) do
           {
               insert: TEST_COLL,
               documents: [ { a: 1 } ],
-              writeConcern: { w: WRITE_CONCERN[:w]+1 }
+              writeConcern: INVALID_WRITE_CONCERN
           }
         end
 
@@ -352,15 +796,15 @@ describe Mongo::Database do
 
       let(:client_options) do
         {
-          write: { w: WRITE_CONCERN[:w] + 1 }
+          write: INVALID_WRITE_CONCERN
         }
       end
 
       let(:database) do
-        described_class.new(authorized_client.with(client_options), TEST_DB)
+        described_class.new(authorized_client.with(client_options), SpecConfig.instance.test_db)
       end
 
-      context 'when a write concern is not in the command selector', if: write_command_enabled? do
+      context 'when a write concern is not in the command selector' do
 
         let(:cmd) do
           {
@@ -374,13 +818,14 @@ describe Mongo::Database do
         end
       end
 
-      context 'when a write concern is provided in the command selector', if: write_command_enabled? && standalone? do
+      context 'when a write concern is provided in the command selector' do
+        require_topology :single
 
         let(:cmd) do
           {
               insert: TEST_COLL,
               documents: [ { a: 1 } ],
-              writeConcern: { w: WRITE_CONCERN[:w]+1 }
+              writeConcern: INVALID_WRITE_CONCERN
           }
         end
 
@@ -396,24 +841,31 @@ describe Mongo::Database do
   describe '#drop' do
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
-    it 'drops the database', if: write_command_enabled? do
+    it 'drops the database' do
       expect(database.drop).to be_successful
     end
 
-    it 'raises an exception', if: (!write_command_enabled? && auth_enabled?) do
-      expect {
-        database.drop
-      }.to raise_error(Mongo::Error::OperationFailure)
+    context 'when provided a session' do
+
+      let(:operation) do
+        database.drop(session: session)
+      end
+
+      let(:client) do
+        authorized_client
+      end
+
+      it_behaves_like 'an operation using a session'
     end
 
     context 'when the client/database has a write concern' do
 
       let(:client_options) do
         {
-          write: { w: WRITE_CONCERN[:w] + 1 },
+          write: INVALID_WRITE_CONCERN,
           database: :safe_to_drop
         }
       end
@@ -426,7 +878,9 @@ describe Mongo::Database do
         client.database
       end
 
-      context 'when the server supports write concern on the dropDatabase command', if: (collation_enabled? && standalone?) do
+      context 'when the server supports write concern on the dropDatabase command' do
+        min_server_fcv '3.4'
+        require_topology :single
 
         it 'applies the write concern' do
           expect{
@@ -435,7 +889,52 @@ describe Mongo::Database do
         end
       end
 
-      context 'when the server does not support write concern on the dropDatabase command', unless: collation_enabled? do
+      context 'when write concern is passed in as an option' do
+        min_server_fcv '3.4'
+        require_topology :single
+
+        let(:client_options) do
+          {
+            write_concern: {w: 0},
+            database: :test
+          }
+        end
+
+        let(:session) do
+          client.start_session
+        end
+
+        let(:subscriber) { EventSubscriber.new }
+
+        let(:client) do
+          root_authorized_client.tap do |client|
+            client.subscribe(Mongo::Monitoring::COMMAND, subscriber)
+          end.with(client_options)
+        end
+
+        let(:events) do
+          subscriber.command_started_events('dropDatabase')
+        end
+
+        let(:database_test_wc) do
+          client.database
+        end
+
+        let!(:command) do
+          Utils.get_command_event(client, 'dropDatabase') do |client|
+            database_test_wc.drop({ write_concern: {w: 'majority'} })
+          end.command
+        end
+
+        it 'applies the write concern passed in as an option' do
+          expect(events.length).to eq(1)
+          expect(command).to_not be_nil
+          expect(command[:writeConcern][:w]).to eq('majority')
+        end
+      end
+
+      context 'when the server does not support write concern on the dropDatabase command' do
+        max_server_version '3.2'
 
         it 'does not apply the write concern' do
           expect(database_with_write_options.drop).to be_successful
@@ -449,11 +948,11 @@ describe Mongo::Database do
     context 'when provided a valid name' do
 
       let(:database) do
-        described_class.new(authorized_client, TEST_DB)
+        described_class.new(authorized_client, SpecConfig.instance.test_db)
       end
 
       it 'sets the name as a string' do
-        expect(database.name).to eq(TEST_DB)
+        expect(database.name).to eq(SpecConfig.instance.test_db)
       end
 
       it 'sets the client' do
@@ -474,7 +973,7 @@ describe Mongo::Database do
   describe '#inspect' do
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
     it 'includes the object id' do
@@ -486,10 +985,11 @@ describe Mongo::Database do
     end
   end
 
-  describe '#fs', unless: sharded? do
+  describe '#fs' do
+    require_topology :single, :replica_set
 
     let(:database) do
-      described_class.new(authorized_client, TEST_DB)
+      described_class.new(authorized_client, SpecConfig.instance.test_db)
     end
 
     shared_context 'a GridFS database' do
@@ -504,7 +1004,7 @@ describe Mongo::Database do
           Mongo::Grid::File.new('Hello!', :filename => 'test.txt')
         end
 
-        after do
+        before do
           fs.files_collection.delete_many
           fs.chunks_collection.delete_many
         end
@@ -558,4 +1058,178 @@ describe Mongo::Database do
       end
     end
   end
+
+  describe '#write_concern' do
+
+    let(:client) do
+      new_local_client(['127.0.0.1:27017'],
+        {monitoring_io: false}.merge(client_options))
+    end
+
+    let(:database) { client.database }
+
+    context 'when client write concern uses :write' do
+
+      let(:client_options) do
+        { :write => { :w => 1 } }
+      end
+
+      it 'is the correct write concern' do
+        expect(database.write_concern).to be_a(Mongo::WriteConcern::Acknowledged)
+        expect(database.write_concern.options).to eq(w: 1)
+      end
+    end
+
+    context 'when client write concern uses :write_concern' do
+
+      let(:client_options) do
+        { :write_concern => { :w => 1 } }
+      end
+
+      it 'is the correct write concern' do
+        expect(database.write_concern).to be_a(Mongo::WriteConcern::Acknowledged)
+        expect(database.write_concern.options).to eq(w: 1)
+      end
+    end
+  end
+
+  describe '#aggregate' do
+    min_server_fcv '3.6'
+
+    let(:client) do
+      root_authorized_admin_client
+    end
+
+    let(:database) { client.database }
+
+    let(:pipeline) do
+      [{'$currentOp' => {}}]
+    end
+
+    describe 'updating cluster time' do
+      # The shared examples use their own client which we cannot override
+      # from here, and it uses the wrong credentials for admin database which
+      # is the one we need for our pipeline when auth is on.
+      require_no_auth
+
+      let(:database_via_client) do
+        client.use(:admin).database
+      end
+
+      let(:operation) do
+        database_via_client.aggregate(pipeline).first
+      end
+
+      let(:operation_with_session) do
+        database_via_client.aggregate(pipeline, session: session).first
+      end
+
+      let(:second_operation) do
+        database_via_client.aggregate(pipeline, session: session).first
+      end
+
+      it_behaves_like 'an operation updating cluster time'
+    end
+
+    it 'returns an Aggregation object' do
+      expect(database.aggregate(pipeline)).to be_a(Mongo::Collection::View::Aggregation)
+    end
+
+    context 'when options are provided' do
+
+      let(:options) do
+        { :allow_disk_use => true, :bypass_document_validation => true }
+      end
+
+      it 'sets the options on the Aggregation object' do
+        expect(database.aggregate(pipeline, options).options).to eq(BSON::Document.new(options))
+      end
+
+      context 'when the :comment option is provided' do
+
+        let(:options) do
+          { :comment => 'testing' }
+        end
+
+        it 'sets the options on the Aggregation object' do
+          expect(database.aggregate(pipeline, options).options).to eq(BSON::Document.new(options))
+        end
+      end
+
+      context 'when a session is provided' do
+
+        let(:session) do
+          client.start_session
+        end
+
+        let(:operation) do
+          database.aggregate(pipeline, session: session).to_a
+        end
+
+        let(:failed_operation) do
+          database.aggregate([ { '$invalid' => 1 }], session: session).to_a
+        end
+
+        it_behaves_like 'an operation using a session'
+        it_behaves_like 'a failed operation using a session'
+      end
+
+      context 'when a hint is provided' do
+
+        let(:options) do
+          { 'hint' => { 'y' => 1 } }
+        end
+
+        it 'sets the options on the Aggregation object' do
+          expect(database.aggregate(pipeline, options).options).to eq(options)
+        end
+      end
+
+      context 'when collation is provided' do
+
+        let(:pipeline) do
+          [{ "$currentOp" => {} }]
+        end
+
+        let(:options) do
+          { collation: { locale: 'en_US', strength: 2 } }
+        end
+
+        let(:result) do
+          database.aggregate(pipeline, options).collect { |doc| doc.keys.grep(/host/).first }
+        end
+
+        context 'when the server selected supports collations' do
+          min_server_fcv '3.4'
+
+          it 'applies the collation' do
+            expect(result.uniq).to eq(['host'])
+          end
+        end
+
+        context 'when the server selected does not support collations' do
+          max_server_version '3.2'
+
+          it 'raises an exception' do
+            expect {
+              result
+            }.to raise_exception(Mongo::Error::UnsupportedCollation)
+          end
+
+          context 'when a String key is used' do
+
+            let(:options) do
+              { 'collation' => { locale: 'en_US', strength: 2 } }
+            end
+
+            it 'raises an exception' do
+              expect {
+                result
+              }.to raise_exception(Mongo::Error::UnsupportedCollation)
+            end
+          end
+        end
+      end
+    end
+  end
 end