class Mongoid::Contextual::GeoNear

def apply_criteria_options
  command[:query] = criteria.selector
  if limit = criteria.options[:limit]
    command[:num] = limit
  end
end

def average_distance
  average = stats["avgDistance"]
  (average.nil? || average.nan?) ? nil : average
end

def distance_multiplier(value)
  command[:distanceMultiplier] = value
  self
end

def documents
  results["results"].map do |attributes|
    doc = Factory.from_db(criteria.klass, attributes["obj"], criteria.options[:fields])
    doc.attributes["geo_near_distance"] = attributes["dis"]
    doc
  end
end

def each
  if block_given?
    documents.each do |doc|
      yield doc
    end
  else
    to_enum
  end
end

def empty_and_chainable?
  true
end

def execute
  results
end

def initialize(collection, criteria, near)
  @collection, @criteria = collection, criteria
  command[:geoNear] = collection.name.to_s
  command[:near] = near
  apply_criteria_options
end

def inspect
ongoid::Contextual::GeoNear
ctor:   #{criteria.selector.inspect}
s:      #{criteria.klass}
:       #{command[:near]}
iplier: #{command[:distanceMultiplier] || "N/A"}
        #{command[:maxDistance] || "N/A"}
        #{command[:minDistance] || "N/A"}
ue:     #{command[:unique].nil? ? true : command[:unique]}
rical:  #{command[:spherical] || false}>
end

def max_distance(value = nil)
  if value
    command[:maxDistance] = value
    self
  else
    stats["maxDistance"]
  end
end

def min_distance(value)
  command[:minDistance] = value
  self
end

def results
  @results ||= client.command(command).first
end

def spherical
  command[:spherical] = true
  self
end

def stats
  results["stats"]
end

def time
  stats["time"]
end

def unique(value = true)
  command[:unique] = value
  self
end