mongo 2.4.1 → 2.14.0

data/lib/mongo/cluster.rb

@@ -1,4 +1,4 @@
-# Copyright (C) 2014-2016 MongoDB, Inc.
+# Copyright (C) 2014-2020 MongoDB Inc.
 #
 # Licensed under the Apache License, Version 2.0 (the "License");
 # you may not use this file except in compliance with the License.
@@ -13,13 +13,14 @@
 # limitations under the License.
 
 require 'mongo/cluster/topology'
-require 'mongo/cluster/cursor_reaper'
-require 'mongo/cluster/app_metadata'
+require 'mongo/cluster/reapers/socket_reaper'
+require 'mongo/cluster/reapers/cursor_reaper'
+require 'mongo/cluster/periodic_executor'
 
 module Mongo
 
-  # Represents a group of servers on the server side, either as a single server, a
-  # replica set, or a single or multiple mongos.
+  # Represents a group of servers on the server side, either as a
+  # single server, a replica set, or a single or multiple mongos.
   #
   # @since 2.0.0
   class Cluster
@@ -27,13 +28,20 @@ module Mongo
     include Monitoring::Publishable
     include Event::Subscriber
     include Loggable
+    include ClusterTime::Consumer
 
-    # The default number of mongos read retries.
+    # The default number of legacy read retries.
     #
     # @since 2.1.1
     MAX_READ_RETRIES = 1
 
-    # The default mongos read retry interval, in seconds.
+    # The default number of legacy write retries.
+    #
+    # @since 2.4.2
+    MAX_WRITE_RETRIES = 1
+
+    # The default read retry interval, in seconds, when using legacy read
+    # retries.
     #
     # @since 2.1.1
     READ_RETRY_INTERVAL = 5
@@ -43,6 +51,228 @@ module Mongo
     # @since 2.4.0
     IDLE_WRITE_PERIOD_SECONDS = 10
 
+    # The cluster time key in responses from mongos servers.
+    #
+    # @since 2.5.0
+    # @deprecated
+    CLUSTER_TIME = 'clusterTime'.freeze
+
+    # Instantiate the new cluster.
+    #
+    # @api private
+    #
+    # @example Instantiate the cluster.
+    #   Mongo::Cluster.new(["127.0.0.1:27017"], monitoring)
+    #
+    # @note Cluster should never be directly instantiated outside of a Client.
+    #
+    # @note When connecting to a mongodb+srv:// URI, the client expands such a
+    #   URI into a list of servers and passes that list to the Cluster
+    #   constructor. When connecting to a standalone mongod, the Cluster
+    #   constructor receives the corresponding address as an array of one string.
+    #
+    # @param [ Array<String> ] seeds The addresses of the configured servers
+    # @param [ Monitoring ] monitoring The monitoring.
+    # @param [ Hash ] options Options. Client constructor forwards its
+    #   options to Cluster constructor, although Cluster recognizes
+    #   only a subset of the options recognized by Client.
+    #
+    # @option options [ true | false ] :direct_connection Whether to connect
+    #   directly to the specified seed, bypassing topology discovery. Exactly
+    #   one seed must be provided.
+    # @option options [ Symbol ] :connect Deprecated - use :direct_connection
+    #   option instead of this option. The connection method to use. This
+    #   forces the cluster to behave in the specified way instead of
+    #   auto-discovering. One of :direct, :replica_set, :sharded
+    # @option options [ Symbol ] :replica_set The name of the replica set to
+    #   connect to. Servers not in this replica set will be ignored.
+    # @option options [ true | false ] :scan Whether to scan all seeds
+    #   in constructor. The default in driver version 2.x is to do so;
+    #   driver version 3.x will not scan seeds in constructor. Opt in to the
+    #   new behavior by setting this option to false. *Note:* setting
+    #   this option to nil enables scanning seeds in constructor in driver
+    #   version 2.x. Driver version 3.x will recognize this option but
+    #   will ignore it and will never scan seeds in the constructor.
+    # @option options [ true | false ] :monitoring_io For internal driver
+    #   use only. Set to false to prevent SDAM-related I/O from being
+    #   done by this cluster or servers under it. Note: setting this option
+    #   to false will make the cluster non-functional. It is intended for
+    #   use in tests which manually invoke SDAM state transitions.
+    # @option options [ true | false ] :cleanup For internal driver use only.
+    #   Set to false to prevent endSessions command being sent to the server
+    #   to clean up server sessions when the cluster is disconnected, and to
+    #   to not start the periodic executor. If :monitoring_io is false,
+    #   :cleanup automatically defaults to false as well.
+    # @option options [ Float ] :heartbeat_frequency The interval, in seconds,
+    #   for the server monitor to refresh its description via ismaster.
+    # @option options [ Hash ] :resolv_options For internal driver use only.
+    #   Options to pass through to Resolv::DNS constructor for SRV lookups.
+    #
+    # @since 2.0.0
+    def initialize(seeds, monitoring, options = Options::Redacted.new)
+      if seeds.nil?
+        raise ArgumentError, 'Seeds cannot be nil'
+      end
+
+      options = options.dup
+      if options[:monitoring_io] == false && !options.key?(:cleanup)
+        options[:cleanup] = false
+      end
+      @options = options.freeze
+
+      # @update_lock covers @servers, @connecting, @connected, @topology and
+      # @sessions_supported. Generally instance variables that do not have a
+      # designated for them lock should only be modified under the update lock.
+      # Note that topology change is locked by @update_lock and not by
+      # @sdam_flow_lock.
+      @update_lock = Mutex.new
+      @servers = []
+      @monitoring = monitoring
+      @event_listeners = Event::Listeners.new
+      @app_metadata = Server::AppMetadata.new(@options)
+      @cluster_time_lock = Mutex.new
+      @cluster_time = nil
+      @srv_monitor_lock = Mutex.new
+      @srv_monitor = nil
+      @server_selection_semaphore = Semaphore.new
+      @topology = Topology.initial(self, monitoring, options)
+      # State change lock is similar to the sdam flow lock, but is designed
+      # to serialize state changes initated by consumers of Cluster
+      # (e.g. application connecting or disconnecting the cluster), so that
+      # e.g. an application calling disconnect-connect-disconnect rapidly
+      # does not put the cluster into an inconsistent state.
+      # Monitoring updates performed internally by the driver do not take
+      # the state change lock.
+      @state_change_lock = Mutex.new
+      # @sdam_flow_lock covers just the sdam flow. Note it does not apply
+      # to @topology replacements which are done under @update_lock.
+      @sdam_flow_lock = Mutex.new
+      Session::SessionPool.create(self)
+
+      # The opening topology is always unknown with no servers.
+      # https://github.com/mongodb/specifications/pull/388
+      opening_topology = Topology::Unknown.new(options, monitoring, self)
+
+      publish_sdam_event(
+        Monitoring::TOPOLOGY_OPENING,
+        Monitoring::Event::TopologyOpening.new(opening_topology)
+      )
+
+      @seeds = seeds = seeds.uniq
+      servers = seeds.map do |seed|
+        # Server opening events must be sent after topology change events.
+        # Therefore separate server addition, done here before topoolgy change
+        # event is published, from starting to monitor the server which is
+        # done later.
+        add(seed, monitor: false)
+      end
+
+      if seeds.size >= 1
+        # Recreate the topology to get the current server list into it
+        @topology = topology.class.new(topology.options, topology.monitoring, self)
+        publish_sdam_event(
+          Monitoring::TOPOLOGY_CHANGED,
+          Monitoring::Event::TopologyChanged.new(opening_topology, @topology)
+        )
+      end
+
+      if options[:monitoring_io] == false
+        # Omit periodic executor construction, because without servers
+        # no commands can be sent to the cluster and there shouldn't ever
+        # be anything that needs to be cleaned up.
+        #
+        # Omit monitoring individual servers and the legacy single round of
+        # of SDAM on the main thread, as it would race with tests that mock
+        # SDAM responses.
+        @connecting = @connected = false
+        return
+      end
+
+      # Update instance variables prior to starting monitoring threads.
+      @connecting = false
+      @connected = true
+
+      if options[:cleanup] != false
+        @cursor_reaper = CursorReaper.new
+        @socket_reaper = SocketReaper.new(self)
+        @periodic_executor = PeriodicExecutor.new([
+          @cursor_reaper, @socket_reaper,
+        ], options)
+
+        ObjectSpace.define_finalizer(self, self.class.finalize(
+          {}, @periodic_executor, @session_pool))
+
+        @periodic_executor.run!
+      end
+
+      # Need to record start time prior to starting monitoring
+      start_time = Time.now
+
+      servers.each do |server|
+        server.start_monitoring
+      end
+
+      if options[:scan] != false
+        server_selection_timeout = options[:server_selection_timeout] || ServerSelector::SERVER_SELECTION_TIMEOUT
+        # The server selection timeout can be very short especially in
+        # tests, when the client waits for a synchronous scan before
+        # starting server selection. Limiting the scan to server selection time
+        # then aborts the scan before it can process even local servers.
+        # Therefore, allow at least 3 seconds for the scan here.
+        if server_selection_timeout < 3
+          server_selection_timeout = 3
+        end
+        deadline = start_time + server_selection_timeout
+        # Wait for the first scan of each server to complete, for
+        # backwards compatibility.
+        # If any servers are discovered during this SDAM round we are going to
+        # wait for these servers to also be queried, and so on, up to the
+        # server selection timeout or the 3 second minimum.
+        loop do
+          # Ensure we do not try to read the servers list while SDAM is running
+          servers = @sdam_flow_lock.synchronize do
+            servers_list.dup
+          end
+          if servers.all? { |server| server.last_scan && server.last_scan >= start_time }
+            break
+          end
+          if (time_remaining = deadline - Time.now) <= 0
+            break
+          end
+          log_debug("Waiting for up to #{'%.2f' % time_remaining} seconds for servers to be scanned: #{summary}")
+          # Since the semaphore may have been signaled between us checking
+          # the servers list above and the wait call below, we should not
+          # wait for the full remaining time - wait for up to 1 second, then
+          # recheck the state.
+          server_selection_semaphore.wait([time_remaining, 1].min)
+        end
+      end
+
+      start_stop_srv_monitor
+    end
+
+    # Create a cluster for the provided client, for use when we don't want the
+    # client's original cluster instance to be the same.
+    #
+    # @api private
+    #
+    # @example Create a cluster for the client.
+    #   Cluster.create(client)
+    #
+    # @param [ Client ] client The client to create on.
+    #
+    # @return [ Cluster ] The cluster.
+    #
+    # @since 2.0.0
+    def self.create(client)
+      cluster = Cluster.new(
+        client.cluster.addresses.map(&:to_s),
+        Monitoring.new,
+        client.cluster_options,
+      )
+      client.instance_variable_set(:@cluster, cluster)
+    end
+
     # @return [ Hash ] The options hash.
     attr_reader :options
 
@@ -52,153 +282,144 @@ module Mongo
     # @return [ Object ] The cluster topology.
     attr_reader :topology
 
-    # @return [ Mongo::Cluster::AppMetadata ] The application metadata, used for connection
-    #   handshakes.
+    # @return [ Mongo::Server::AppMetadata ] The application metadata, used for
+    #   connection handshakes.
     #
     # @since 2.4.0
     attr_reader :app_metadata
 
+    # @return [ Array<String> ] The addresses of seed servers. Contains
+    #   addresses that were given to Cluster when it was instantiated, not
+    #   current addresses that the cluster is using as a result of SDAM.
+    #
+    # @since 2.7.0
+    # @api private
+    attr_reader :seeds
+
+    # @private
+    #
+    # @since 2.5.1
+    attr_reader :session_pool
+
     def_delegators :topology, :replica_set?, :replica_set_name, :sharded?,
-                   :single?, :unknown?, :member_discovered
-    def_delegators :@cursor_reaper, :register_cursor, :schedule_kill_cursor, :unregister_cursor
+                   :single?, :unknown?
 
-    # Determine if this cluster of servers is equal to another object. Checks the
-    # servers currently in the cluster, not what was configured.
+    [:register_cursor, :schedule_kill_cursor, :unregister_cursor].each do |m|
+      define_method(m) do |*args|
+        if options[:cleanup] != false
+          @cursor_reaper.send(m, *args)
+        end
+      end
+    end
+
+    # @api private
+    attr_reader :srv_monitor
+
+    # Get the maximum number of times the client can retry a read operation
+    # when using legacy read retries.
     #
-    # @example Is the cluster equal to the object?
-    #   cluster == other
+    # @note max_read_retries should be retrieved from the Client instance,
+    #   not from a Cluster instance, because clusters may be shared between
+    #   clients with different values for max read retries.
     #
-    # @param [ Object ] other The object to compare to.
+    # @example Get the max read retries.
+    #   cluster.max_read_retries
     #
-    # @return [ true, false ] If the objects are equal.
+    # @return [ Integer ] The maximum number of retries.
     #
-    # @since 2.0.0
-    def ==(other)
-      return false unless other.is_a?(Cluster)
-      addresses == other.addresses && options == other.options
+    # @since 2.1.1
+    # @deprecated
+    def max_read_retries
+      options[:max_read_retries] || MAX_READ_RETRIES
     end
 
-    # Add a server to the cluster with the provided address. Useful in
-    # auto-discovery of new servers when an existing server executes an ismaster
-    # and potentially non-configured servers were included.
+    # Get the interval, in seconds, in which read retries when using legacy
+    # read retries.
     #
-    # @example Add the server for the address to the cluster.
-    #   cluster.add('127.0.0.1:27018')
+    # @note read_retry_interval should be retrieved from the Client instance,
+    #   not from a Cluster instance, because clusters may be shared between
+    #   clients with different values for the read retry interval.
     #
-    # @param [ String ] host The address of the server to add.
+    # @example Get the read retry interval.
+    #   cluster.read_retry_interval
     #
-    # @return [ Server ] The newly added server, if not present already.
+    # @return [ Float ] The interval.
     #
-    # @since 2.0.0
-    def add(host)
-      address = Address.new(host)
-      if !addresses.include?(address)
-        if addition_allowed?(address)
-          @update_lock.synchronize { @addresses.push(address) }
-          server = Server.new(address, self, @monitoring, event_listeners, options)
-          @update_lock.synchronize { @servers.push(server) }
-          server
-        end
-      end
+    # @since 2.1.1
+    # @deprecated
+    def read_retry_interval
+      options[:read_retry_interval] || READ_RETRY_INTERVAL
     end
 
-    # Determine if the cluster would select a readable server for the
-    # provided read preference.
+    # Get the refresh interval for the server. This will be defined via an
+    # option or will default to 10.
     #
-    # @example Is a readable server present?
-    #   topology.has_readable_server?(server_selector)
+    # @return [ Float ] The heartbeat interval, in seconds.
     #
-    # @param [ ServerSelector ] server_selector The server
-    #   selector.
-    #
-    # @return [ true, false ] If a readable server is present.
-    #
-    # @since 2.4.0
-    def has_readable_server?(server_selector = nil)
-      topology.has_readable_server?(self, server_selector)
+    # @since 2.10.0
+    # @api private
+    def heartbeat_interval
+      options[:heartbeat_frequency] || Server::Monitor::DEFAULT_HEARTBEAT_INTERVAL
     end
 
-    # Determine if the cluster would select a writable server.
+    # Whether the cluster object is in the process of connecting to its cluster.
     #
-    # @example Is a writable server present?
-    #   topology.has_writable_server?
+    # @return [ true|false ] Whether the cluster is connecting.
     #
-    # @return [ true, false ] If a writable server is present.
-    #
-    # @since 2.4.0
-    def has_writable_server?
-      topology.has_writable_server?(self)
+    # @api private
+    def connecting?
+      @update_lock.synchronize do
+        !!@connecting
+      end
     end
 
-    # Instantiate the new cluster.
+    # Whether the cluster object is connected to its cluster.
     #
-    # @api private
+    # @return [ true|false ] Whether the cluster is connected.
     #
-    # @example Instantiate the cluster.
-    #   Mongo::Cluster.new(["127.0.0.1:27017"], monitoring)
+    # @api private
+    # @since 2.7.0
+    def connected?
+      @update_lock.synchronize do
+        !!@connected
+      end
+    end
+
+    # Get a list of server candidates from the cluster that can have operations
+    # executed on them.
     #
-    # @note Cluster should never be directly instantiated outside of a Client.
+    # @example Get the server candidates for an operation.
+    #   cluster.servers
     #
-    # @param [ Array<String> ] seeds The addresses of the configured servers.
-    # @param [ Monitoring ] monitoring The monitoring.
-    # @param [ Hash ] options The options.
+    # @return [ Array<Server> ] The candidate servers.
     #
     # @since 2.0.0
-    def initialize(seeds, monitoring, options = Options::Redacted.new)
-      @addresses = []
-      @servers = []
-      @monitoring = monitoring
-      @event_listeners = Event::Listeners.new
-      @options = options.freeze
-      @app_metadata ||= AppMetadata.new(self)
-      @update_lock = Mutex.new
-      @pool_lock = Mutex.new
-      @topology = Topology.initial(seeds, monitoring, options)
-
-      publish_sdam_event(
-        Monitoring::TOPOLOGY_OPENING,
-        Monitoring::Event::TopologyOpening.new(@topology)
-      )
-
-      subscribe_to(Event::STANDALONE_DISCOVERED, Event::StandaloneDiscovered.new(self))
-      subscribe_to(Event::DESCRIPTION_CHANGED, Event::DescriptionChanged.new(self))
-      subscribe_to(Event::MEMBER_DISCOVERED, Event::MemberDiscovered.new(self))
-
-      seeds.each{ |seed| add(seed) }
-
-      publish_sdam_event(
-        Monitoring::TOPOLOGY_CHANGED,
-        Monitoring::Event::TopologyChanged.new(@topology, @topology)
-      ) if @servers.size > 1
-
-      @cursor_reaper = CursorReaper.new
-      @cursor_reaper.run!
-
-      ObjectSpace.define_finalizer(self, self.class.finalize(pools))
+    def servers
+      topology.servers(servers_list)
     end
 
-    # Finalize the cluster for garbage collection. Disconnects all the scoped
-    # connection pools.
-    #
-    # @example Finalize the cluster.
-    #   Cluster.finalize(pools)
+    # The addresses in the cluster.
     #
-    # @param [ Hash<Address, Server::ConnectionPool> ] pools The connection
-    #   pools.
+    # @example Get the addresses in the cluster.
+    #   cluster.addresses
     #
-    # @return [ Proc ] The Finalizer.
+    # @return [ Array<Mongo::Address> ] The addresses.
     #
-    # @since 2.2.0
-    def self.finalize(pools)
-      proc do
-        begin; @cursor_reaper.kill_cursors; rescue; end
-        @cursor_reaper.stop!
-        pools.values.each do |pool|
-          pool.disconnect!
-        end
-      end
+    # @since 2.0.6
+    def addresses
+      servers_list.map(&:address)
     end
 
+    # The logical session timeout value in minutes.
+    #
+    # @example Get the logical session timeout in minutes.
+    #   cluster.logical_session_timeout
+    #
+    # @return [ Integer, nil ] The logical session timeout.
+    #
+    # @since 2.5.0
+    def_delegators :topology, :logical_session_timeout
+
     # Get the nicer formatted string for use in inspection.
     #
     # @example Inspect the cluster.
@@ -208,263 +429,566 @@ module Mongo
     #
     # @since 2.0.0
     def inspect
-      "#<Mongo::Cluster:0x#{object_id} servers=#{servers} topology=#{topology.display_name}>"
+      "#<Mongo::Cluster:0x#{object_id} servers=#{servers} topology=#{topology.summary}>"
     end
 
-    # Get the next primary server we can send an operation to.
+    # @note This method is experimental and subject to change.
     #
-    # @example Get the next primary server.
-    #   cluster.next_primary
+    # @api experimental
+    # @since 2.7.0
+    def summary
+      "#<Cluster " +
+      "topology=#{topology.summary} "+
+      "servers=[#{servers_list.map(&:summary).join(',')}]>"
+    end
+
+    # @api private
+    attr_reader :server_selection_semaphore
+
+    # Finalize the cluster for garbage collection.
     #
-    # @param [ true, false ] ping Whether to ping the server before selection.
+    # @example Finalize the cluster.
+    #   Cluster.finalize(pools)
     #
-    # @return [ Mongo::Server ] A primary server.
+    # @param [ Hash<Address, Server::ConnectionPool> ] pools Ignored.
+    # @param [ PeriodicExecutor ] periodic_executor The periodic executor.
+    # @param [ SessionPool ] session_pool The session pool.
     #
-    # @since 2.0.0
-    def next_primary(ping = true)
-      @primary_selector ||= ServerSelector.get(ServerSelector::PRIMARY)
-      @primary_selector.select_server(self, ping)
+    # @return [ Proc ] The Finalizer.
+    #
+    # @since 2.2.0
+    def self.finalize(pools, periodic_executor, session_pool)
+      proc do
+        session_pool.end_sessions
+        periodic_executor.stop!
+      end
     end
 
-    # Elect a primary server from the description that has just changed to a
-    # primary.
+    # Closes the cluster.
     #
-    # @example Elect a primary server.
-    #   cluster.elect_primary!(description)
+    # @note Applications should call Client#close to disconnect from
+    # the cluster rather than calling this method. This method is for
+    # internal driver use only.
     #
-    # @param [ Server::Description ] description The newly elected primary.
+    # Disconnects all servers in the cluster, publishing appropriate SDAM
+    # events in the process. Stops SRV monitoring if it is active.
+    # Marks the cluster disconnected.
     #
-    # @return [ Topology ] The cluster topology.
+    # @return [ true ] Always true.
     #
-    # @since 2.0.0
-    def elect_primary!(description)
-      @topology = topology.elect_primary(description, servers_list)
+    # @since 2.1.0
+    def disconnect!
+      @state_change_lock.synchronize do
+        unless connecting? || connected?
+          return true
+        end
+        if options[:cleanup] != false
+          session_pool.end_sessions
+          @periodic_executor.stop!
+        end
+        @srv_monitor_lock.synchronize do
+          if @srv_monitor
+            @srv_monitor.stop!
+          end
+        end
+        @servers.each do |server|
+          if server.connected?
+            server.disconnect!
+            publish_sdam_event(
+              Monitoring::SERVER_CLOSED,
+              Monitoring::Event::ServerClosed.new(server.address, topology)
+            )
+          end
+        end
+        publish_sdam_event(
+          Monitoring::TOPOLOGY_CLOSED,
+          Monitoring::Event::TopologyClosed.new(topology)
+        )
+        @update_lock.synchronize do
+          @connecting = @connected = false
+        end
+      end
+      true
     end
 
-    # Get the maximum number of times the cluster can retry a read operation on
-    # a mongos.
+    # Reconnect all servers.
     #
-    # @example Get the max read retries.
-    #   cluster.max_read_retries
+    # @example Reconnect the cluster's servers.
+    #   cluster.reconnect!
     #
-    # @return [ Integer ] The maximum retries.
+    # @return [ true ] Always true.
     #
-    # @since 2.1.1
-    def max_read_retries
-      options[:max_read_retries] || MAX_READ_RETRIES
+    # @since 2.1.0
+    # @deprecated Use Client#reconnect to reconnect to the cluster instead of
+    #   calling this method. This method does not send SDAM events.
+    def reconnect!
+      @state_change_lock.synchronize do
+        @update_lock.synchronize do
+          @connecting = true
+        end
+        scan!
+        servers.each do |server|
+          server.reconnect!
+        end
+        @periodic_executor.restart!
+        @srv_monitor_lock.synchronize do
+          if @srv_monitor
+            @srv_monitor.run!
+          end
+        end
+        @update_lock.synchronize do
+          @connecting = false
+          @connected = true
+        end
+      end
     end
 
-    # Get the scoped connection pool for the server.
+    # Force a scan of all known servers in the cluster.
     #
-    # @example Get the connection pool.
-    #   cluster.pool(server)
+    # If the sync parameter is true which is the default, the scan is
+    # performed synchronously in the thread which called this method.
+    # Each server in the cluster is checked sequentially. If there are
+    # many servers in the cluster or they are slow to respond, this
+    # can be a long running operation.
     #
-    # @param [ Server ] server The server.
+    # If the sync parameter is false, this method instructs all server
+    # monitor threads to perform an immediate scan and returns without
+    # waiting for scan results.
     #
-    # @return [ Server::ConnectionPool ] The connection pool.
+    # @note In both synchronous and asynchronous scans, each monitor
+    #   thread maintains a minimum interval between scans, meaning
+    #   calling this method may not initiate a scan on a particular server
+    #   the very next instant.
     #
-    # @since 2.2.0
-    def pool(server)
-      @pool_lock.synchronize do
-        pools[server.address] ||= Server::ConnectionPool.get(server)
+    # @example Force a full cluster scan.
+    #   cluster.scan!
+    #
+    # @return [ true ] Always true.
+    #
+    # @since 2.0.0
+    def scan!(sync=true)
+      if sync
+        servers_list.each do |server|
+          if server.monitor
+            server.monitor.scan!
+          else
+            log_warn("Synchronous scan requested on cluster #{summary} but server #{server} has no monitor")
+          end
+        end
+      else
+        servers_list.each do |server|
+          server.scan_semaphore.signal
+        end
       end
+      true
     end
 
-    # Get the interval, in seconds, in which a mongos read operation is
-    # retried.
+    # Runs SDAM flow on the cluster.
     #
-    # @example Get the read retry interval.
-    #   cluster.read_retry_interval
+    # This method can be invoked to process a new server description returned
+    # by the server on a monitoring or non-monitoring connection, and also
+    # by the driver when it marks a server unknown as a result of a (network)
+    # error.
     #
-    # @return [ Float ] The interval.
+    # @param [ Server::Description ] previous_desc Previous server description.
+    # @param [ Server::Description ] updated_desc The changed description.
+    # @param [ Hash ] options Options.
     #
-    # @since 2.1.1
-    def read_retry_interval
-      options[:read_retry_interval] || READ_RETRY_INTERVAL
+    # @option options [ true | false ] :keep_connection_pool Usually when the
+    #   new server description is unknown, the connection pool on the
+    #   respective server is cleared. Set this option to true to keep the
+    #   existing connection pool (required when handling not master errors
+    #   on 4.2+ servers).
+    # @option aptions [ true | false ] :awaited Whether the updated description
+    #   was a result of processing an awaited ismaster.
+    #
+    # @api private
+    def run_sdam_flow(previous_desc, updated_desc, options = {})
+      @sdam_flow_lock.synchronize do
+        flow = SdamFlow.new(self, previous_desc, updated_desc,
+          awaited: options[:awaited])
+        flow.server_description_changed
+
+        # SDAM flow may alter the updated description - grab the final
+        # version for the purposes of broadcasting if a server is available
+        updated_desc = flow.updated_desc
+
+        unless options[:keep_connection_pool]
+          if flow.became_unknown?
+            servers_list.each do |server|
+              if server.address == updated_desc.address
+                server.clear_connection_pool
+              end
+            end
+          end
+        end
+
+        start_stop_srv_monitor
+      end
+
+      # Some updated descriptions, e.g. a mismatched me one, result in the
+      # server whose description we are processing being removed from
+      # the topology. When this happens, the server's monitoring thread gets
+      # killed. As a result, any code after the flow invocation may not run
+      # a particular monitor instance, hence there should generally not be
+      # any code in this method past the flow invocation.
+      #
+      # However, this broadcast call can be here because if the monitoring
+      # thread got killed the server should have been closed and no client
+      # should be currently waiting for it, thus not signaling the semaphore
+      # shouldn't cause any problems.
+      unless updated_desc.unknown?
+        server_selection_semaphore.broadcast
+      end
     end
 
-    # Notify the cluster that a standalone server was discovered so that the
-    # topology can be updated accordingly.
+    # Sets the list of servers to the addresses in the provided list of address
+    # strings.
     #
-    # @example Notify the cluster that a standalone server was discovered.
-    #   cluster.standalone_discovered
+    # This method is called by the SRV monitor after receiving new DNS records
+    # for the monitored hostname.
     #
-    # @return [ Topology ] The cluster topology.
+    # Removes servers in the cluster whose addresses are not in the passed
+    # list of server addresses, and adds servers for any addresses in the
+    # argument which are not already in the cluster.
     #
-    # @since 2.0.6
-    def standalone_discovered
-      @topology = topology.standalone_discovered
+    # @param [ Array<String> ] server_address_strs List of server addresses
+    #    to sync the cluster servers to.
+    #
+    # @api private
+    def set_server_list(server_address_strs)
+      @sdam_flow_lock.synchronize do
+        server_address_strs.each do |address_str|
+          unless servers_list.any? { |server| server.address.seed == address_str }
+            add(address_str)
+          end
+        end
+
+        servers_list.each do |server|
+          unless server_address_strs.any? { |address_str| server.address.seed == address_str }
+            remove(server.address.seed)
+          end
+        end
+      end
     end
 
-    # Remove the server from the cluster for the provided address, if it
-    # exists.
+    # Determine if this cluster of servers is equal to another object. Checks the
+    # servers currently in the cluster, not what was configured.
     #
-    # @example Remove the server from the cluster.
-    #   server.remove('127.0.0.1:27017')
+    # @example Is the cluster equal to the object?
+    #   cluster == other
     #
-    # @param [ String ] host The host/port or socket address.
+    # @param [ Object ] other The object to compare to.
+    #
+    # @return [ true, false ] If the objects are equal.
     #
     # @since 2.0.0
-    def remove(host)
-      address = Address.new(host)
-      removed_servers = @servers.select { |s| s.address == address }
-      @update_lock.synchronize { @servers = @servers - removed_servers }
-      removed_servers.each{ |server| server.disconnect! } if removed_servers
-      publish_sdam_event(
-        Monitoring::SERVER_CLOSED,
-        Monitoring::Event::ServerClosed.new(address, topology)
-      )
-      @update_lock.synchronize { @addresses.reject! { |addr| addr == address } }
+    def ==(other)
+      return false unless other.is_a?(Cluster)
+      addresses == other.addresses && options == other.options
     end
 
-    # Force a scan of all known servers in the cluster.
+    # Determine if the cluster would select a readable server for the
+    # provided read preference.
     #
-    # @example Force a full cluster scan.
-    #   cluster.scan!
+    # @example Is a readable server present?
+    #   topology.has_readable_server?(server_selector)
     #
-    # @note This operation is done synchronously. If servers in the cluster are
-    #   down or slow to respond this can potentially be a slow operation.
+    # @param [ ServerSelector ] server_selector The server
+    #   selector.
     #
-    # @return [ true ] Always true.
+    # @return [ true, false ] If a readable server is present.
     #
-    # @since 2.0.0
-    def scan!
-      servers_list.each{ |server| server.scan! } and true
+    # @since 2.4.0
+    def has_readable_server?(server_selector = nil)
+      topology.has_readable_server?(self, server_selector)
     end
 
-    # Get a list of server candidates from the cluster that can have operations
-    # executed on them.
+    # Determine if the cluster would select a writable server.
     #
-    # @example Get the server candidates for an operation.
-    #   cluster.servers
+    # @example Is a writable server present?
+    #   topology.has_writable_server?
     #
-    # @return [ Array<Server> ] The candidate servers.
+    # @return [ true, false ] If a writable server is present.
     #
-    # @since 2.0.0
-    def servers
-      topology.servers(servers_list.compact).compact
+    # @since 2.4.0
+    def has_writable_server?
+      topology.has_writable_server?(self)
     end
 
-    # Disconnect all servers.
+    # Get the next primary server we can send an operation to.
     #
-    # @example Disconnect the cluster's servers.
-    #   cluster.disconnect!
+    # @example Get the next primary server.
+    #   cluster.next_primary
     #
-    # @return [ true ] Always true.
+    # @param [ true, false ] ping Whether to ping the server before selection.
+    #   Deprecated and ignored.
+    # @param [ Session | nil ] session Optional session to take into account
+    #   for mongos pinning.
     #
-    # @since 2.1.0
-    def disconnect!
-      begin; @cursor_reaper.kill_cursors; rescue; end
-      @cursor_reaper.stop!
-      @servers.each { |server| server.disconnect! } and true
+    # @return [ Mongo::Server ] A primary server.
+    #
+    # @since 2.0.0
+    def next_primary(ping = nil, session = nil)
+      ServerSelector.primary.select_server(self, nil, session)
     end
 
-    # Reconnect all servers.
+    # Get the connection pool for the server.
     #
-    # @example Reconnect the cluster's servers.
-    #   cluster.reconnect!
+    # @example Get the connection pool.
+    #   cluster.pool(server)
     #
-    # @return [ true ] Always true.
+    # @param [ Server ] server The server.
     #
-    # @since 2.1.0
-    def reconnect!
-      scan!
-      servers.each { |server| server.reconnect! }
-      @cursor_reaper.restart! and true
+    # @return [ Server::ConnectionPool ] The connection pool.
+    #
+    # @since 2.2.0
+    # @deprecated
+    def pool(server)
+      server.pool
     end
 
-    # Add hosts in a description to the cluster.
+    # Update the max cluster time seen in a response.
     #
-    # @example Add hosts in a description to the cluster.
-    #   cluster.add_hosts(description)
+    # @example Update the cluster time.
+    #   cluster.update_cluster_time(result)
     #
-    # @param [ Mongo::Server::Description ] description The description.
+    # @param [ Operation::Result ] result The operation result containing the cluster time.
     #
-    # @since 2.0.6
-    def add_hosts(description)
-      if topology.add_hosts?(description, servers_list)
-        description.servers.each { |s| add(s) }
+    # @return [ Object ] The cluster time.
+    #
+    # @since 2.5.0
+    def update_cluster_time(result)
+      if cluster_time_doc = result.cluster_time
+        @cluster_time_lock.synchronize do
+          advance_cluster_time(cluster_time_doc)
+        end
       end
     end
 
-    # Remove hosts in a description from the cluster.
+    # Add a server to the cluster with the provided address. Useful in
+    # auto-discovery of new servers when an existing server executes an ismaster
+    # and potentially non-configured servers were included.
     #
-    # @example Remove hosts in a description from the cluster.
-    #   cluster.remove_hosts(description)
+    # @example Add the server for the address to the cluster.
+    #   cluster.add('127.0.0.1:27018')
     #
-    # @param [ Mongo::Server::Description ] description The description.
+    # @param [ String ] host The address of the server to add.
     #
-    # @since 2.0.6
-    def remove_hosts(description)
-      if topology.remove_hosts?(description)
-        servers_list.each do |s|
-          remove(s.address.to_s) if topology.remove_server?(description, s)
+    # @option options [ Boolean ] :monitor For internal driver use only:
+    #   whether to monitor the newly added server.
+    #
+    # @return [ Server ] The newly added server, if not present already.
+    #
+    # @since 2.0.0
+    def add(host, add_options=nil)
+      address = Address.new(host, options)
+      if !addresses.include?(address)
+        server = Server.new(address, self, @monitoring, event_listeners, options.merge(
+          monitor: false))
+        @update_lock.synchronize do
+          # Need to recheck whether server is present in @servers, because
+          # the previous check was not under a lock.
+          # Since we are under the update lock here, we cannot call servers_list.
+          return if @servers.map(&:address).include?(address)
+
+          @servers.push(server)
         end
+        if add_options.nil? || add_options[:monitor] != false
+          server.start_monitoring
+        end
+        server
       end
     end
 
-    # Create a cluster for the provided client, for use when we don't want the
-    # client's original cluster instance to be the same.
+    # Remove the server from the cluster for the provided address, if it
+    # exists.
     #
-    # @api private
+    # @example Remove the server from the cluster.
+    #   server.remove('127.0.0.1:27017')
     #
-    # @example Create a cluster for the client.
-    #   Cluster.create(client)
+    # @param [ String ] host The host/port or socket address.
+    # @param [ true | false ] disconnect Whether to disconnect the servers
+    #   being removed. For internal driver use only.
     #
-    # @param [ Client ] client The client to create on.
+    # @return [ Array<Server> | true | false ] If disconnect is any value other
+    #   than false, including nil, returns whether any servers were removed.
+    #   If disconnect is false, returns an array of servers that were removed
+    #   (and should be disconnected by the caller).
     #
-    # @return [ Cluster ] The cluster.
+    # @note The return value of this method is not part of the driver's
+    #   public API.
     #
     # @since 2.0.0
-    def self.create(client)
-      cluster = Cluster.new(
-        client.cluster.addresses.map(&:to_s),
-        client.instance_variable_get(:@monitoring).dup,
-        client.options
-      )
-      client.instance_variable_set(:@cluster, cluster)
+    def remove(host, disconnect: true)
+      address = Address.new(host)
+      removed_servers = []
+      @update_lock.synchronize do
+        @servers.delete_if do |server|
+          (server.address == address).tap do |delete|
+            if delete
+              removed_servers << server
+            end
+          end
+        end
+      end
+      if disconnect != false
+        removed_servers.each do |server|
+          disconnect_server_if_connected(server)
+        end
+      end
+      if disconnect != false
+        removed_servers.any?
+      else
+        removed_servers
+      end
     end
 
-    # The addresses in the cluster.
-    #
-    # @example Get the addresses in the cluster.
-    #   cluster.addresses
-    #
-    # @return [ Array<Mongo::Address> ] The addresses.
-    #
-    # @since 2.0.6
-    def addresses
-      addresses_list
-    end
+    # @api private
+    def update_topology(new_topology)
+      old_topology = nil
+      @update_lock.synchronize do
+        old_topology = topology
+        @topology = new_topology
+      end
 
-    private
+      # If new topology has data bearing servers, we know for sure whether
+      # sessions are supported - update our cached value.
+      # If new topology has no data bearing servers, leave the old value
+      # as it is and sessions_supported? method will perform server selection
+      # to try to determine session support accurately, falling back to the
+      # last known value.
+      if topology.data_bearing_servers?
+        sessions_supported = !!topology.logical_session_timeout
+        @update_lock.synchronize do
+          @sessions_supported = sessions_supported
+        end
+      end
 
-    def direct_connection?(address)
-      address.seed == @topology.seed
+      publish_sdam_event(
+        Monitoring::TOPOLOGY_CHANGED,
+        Monitoring::Event::TopologyChanged.new(old_topology, topology)
+      )
     end
 
-    def addition_allowed?(address)
-      !@topology.single? || direct_connection?(address)
+    # @api private
+    def servers_list
+      @update_lock.synchronize do
+        @servers.dup
+      end
     end
 
-    def pools
-      @pools ||= {}
+    # @api private
+    def disconnect_server_if_connected(server)
+      if server.connected?
+        server.disconnect!
+        publish_sdam_event(
+          Monitoring::SERVER_CLOSED,
+          Monitoring::Event::ServerClosed.new(server.address, topology)
+        )
+      end
     end
 
-    def servers_list
-      @update_lock.synchronize do
-        @servers.reduce([]) do |servers, server|
-          servers << server
+    # Raises Error::SessionsNotAvailable if the deployment that the driver
+    # is connected to does not support sessions.
+    #
+    # Session support may change over time, for example due to servers in the
+    # deployment being upgraded or downgraded. If the client is currently not
+    # connected to any data bearing servers, this method considers the state
+    # of session support as of when the client was last connected to at
+    # least one server. If the client has never connected to any servers,
+    # the deployment is considered to not support sessions.
+    #
+    # @api private
+    def validate_session_support!
+      @state_change_lock.synchronize do
+        @sdam_flow_lock.synchronize do
+          if topology.data_bearing_servers?
+            unless topology.logical_session_timeout
+              raise_sessions_not_supported
+            end
+          end
+        end
+      end
+
+      # No data bearing servers known - perform server selection to try to
+      # get a response from at least one of them, to return an accurate
+      # assessment of whether sessions are currently supported.
+      begin
+        ServerSelector.get(mode: :primary_preferred).select_server(self)
+        @state_change_lock.synchronize do
+          @sdam_flow_lock.synchronize do
+            unless topology.logical_session_timeout
+              raise_sessions_not_supported
+            end
+          end
+        end
+      rescue Error::NoServerAvailable
+        # We haven't been able to contact any servers - use last known
+        # value for session support.
+        @state_change_lock.synchronize do
+          @sdam_flow_lock.synchronize do
+            @update_lock.synchronize do
+              unless @sessions_supported
+                raise_sessions_not_supported
+              end
+            end
+          end
         end
       end
     end
 
-    def addresses_list
-      @update_lock.synchronize do
-        @addresses.reduce([]) do |addresses, address|
-          addresses << address
+    private
+
+    # @api private
+    def start_stop_srv_monitor
+      # SRV URI is either always given or not for a given cluster, if one
+      # wasn't given we shouldn't ever have an SRV monitor to manage.
+      return unless options[:srv_uri]
+
+      if topology.is_a?(Topology::Sharded) || topology.is_a?(Topology::Unknown)
+        # Start SRV monitor
+        @srv_monitor_lock.synchronize do
+          unless @srv_monitor
+            monitor_options = Utils.shallow_symbolize_keys(options.merge(
+              timeout: options[:connect_timeout] || Server::CONNECT_TIMEOUT))
+            @srv_monitor = _srv_monitor = Srv::Monitor.new(self, **monitor_options)
+            finalizer = lambda do
+              _srv_monitor.stop!
+            end
+            ObjectSpace.define_finalizer(self, finalizer)
+          end
+          @srv_monitor.run!
         end
+      else
+        # Stop SRV monitor if running. This path is taken when the client
+        # is given an SRV URI to a standalone/replica set; when the topology
+        # is discovered, since it's not a sharded cluster, the SRV monitor
+        # needs to be stopped.
+        @srv_monitor_lock.synchronize do
+          if @srv_monitor
+            @srv_monitor.stop!
+          end
+        end
+      end
+    end
+
+    def raise_sessions_not_supported
+      # Intentionally using @servers instead of +servers+ here because we
+      # are supposed to be already holding the @update_lock and we cannot
+      # recursively acquire it again.
+      offending_servers = @servers.select do |server|
+        server.description.data_bearing? && server.logical_session_timeout.nil?
+      end
+      reason = if offending_servers.empty?
+        "There are no known data bearing servers (current seeds: #{@servers.map(&:address).map(&:seed).join(', ')})"
+      else
+        "The following servers have null logical session timeout: #{offending_servers.map(&:address).map(&:seed).join(', ')}"
       end
+      msg = "The deployment that the driver is connected to does not support sessions: #{reason}"
+      raise Error::SessionsNotSupported, msg
     end
   end
 end
+
+require 'mongo/cluster/sdam_flow'