cb_mongoid_spacial 0.2.16

data/spec/models/pet.rb

@@ -0,0 +1,7 @@
+class Pet
+  include Mongoid::Document
+  field :name
+  field :weight, :type => Float, :default => 0.0
+  embeds_many :vet_visits
+  embedded_in :pet_owner
+end

data/spec/models/pet_owner.rb

@@ -0,0 +1,6 @@
+class PetOwner
+  include Mongoid::Document
+  field :title
+  embeds_one :pet
+  embeds_one :address, :as => :addressable
+end

data/spec/models/phone.rb

@@ -0,0 +1,7 @@
+class Phone
+  include Mongoid::Document
+  field :number
+  key :number
+  embeds_one :country_code
+  embedded_in :person
+end

data/spec/models/player.rb

@@ -0,0 +1,23 @@
+class Player
+  include Mongoid::Document
+  field :active, :type => Boolean
+  field :frags, :type => Integer
+  field :deaths, :type => Integer
+  field :status
+
+  named_scope :active, criteria.where(:active => true) do
+    def extension
+      "extension"
+    end
+  end
+  named_scope :inactive, :where => { :active => false }
+  named_scope :frags_over, lambda { |count| { :where => { :frags.gt => count } } }
+  named_scope :deaths_under, lambda { |count| criteria.where(:deaths.lt => count) }
+  scope :deaths_over, lambda { |count| criteria.where(:deaths.gt => count) }
+
+  class << self
+    def alive
+      criteria.where(:status => "Alive")
+    end
+  end
+end

data/spec/models/post.rb

@@ -0,0 +1,26 @@
+class Post
+  include Mongoid::Document
+  include Mongoid::MultiParameterAttributes
+  include Mongoid::Versioning
+  include Mongoid::Timestamps
+
+  field :title, :type => String
+  field :content, :type => String
+  field :rating, :type => Integer
+
+  belongs_to :person
+  belongs_to :author, :foreign_key => :author_id, :class_name => "User"
+  has_and_belongs_to_many :tags
+  has_many :videos, :validate => false
+
+  scope :recent, where(:created_at => { "$lt" => Time.now, "$gt" => 30.days.ago })
+  scope :posting, where(:content.in => [ "Posting" ])
+
+  validates_format_of :title, :without => /\$\$\$/
+
+  class << self
+    def old
+      where(:created_at => { "$lt" => 30.days.ago })
+    end
+  end
+end

data/spec/models/preference.rb

@@ -0,0 +1,9 @@
+class Preference
+  include Mongoid::Document
+  field :name, :type => String
+  field :value, :type => String
+  field :ranking, :type => Integer
+  has_and_belongs_to_many :people
+  validates_length_of :name, :minimum => 2, :allow_nil => true
+  scope :posting, where(:value.in => [ "Posting" ])
+end

data/spec/models/question.rb

@@ -0,0 +1,8 @@
+class Question
+  include Mongoid::Document
+  field :content
+  embedded_in :survey
+  embeds_many :answers
+
+  accepts_nested_attributes_for :answers, :reject_if => lambda { |a| a[:content].blank? }, :allow_destroy => true
+end

data/spec/models/quiz.rb

@@ -0,0 +1,6 @@
+class Quiz
+  include Mongoid::Document
+  include Mongoid::Timestamps::Created
+  field :topic
+  embeds_many :pages
+end

data/spec/models/rating.rb

@@ -0,0 +1,8 @@
+class Rating
+  include Mongoid::Document
+  field :value, :type => Integer
+  referenced_in :ratable, :polymorphic => true
+  references_many :comments
+  validates_numericality_of :value, :less_than => 100, :allow_nil => true
+  validates :ratable, :associated => true
+end

data/spec/models/river.rb

@@ -0,0 +1,20 @@
+class River
+  include Mongoid::Document
+  include Mongoid::Spacial::Document
+
+  field :name,              type: String
+  field :length,            type: Integer
+  field :average_discharge, type: Integer
+  field :source,            type: Array,    spacial: true
+  # set return_array to true if you do not want a hash returned all the time
+  field :mouth,             type: Array,    spacial: {lat: 'latitude', lng: 'longitude'}
+  field :mouth_array,       type: Array,    spacial: {return_array: true}
+
+  # simplified spacial indexing
+  # you can only index one field in mongodb < 1.9
+  spacial_index :source
+  # alternatives
+  # index [[ :spacial, Mongo::GEO2D ]], {min:-400, max:400}
+  # index [[ :spacial, Mongo::GEO2D ]], {bit:32}
+  # index [[ :spacial, Mongo::GEO2D ],:name]
+end

data/spec/models/role.rb

@@ -0,0 +1,5 @@
+class Role
+  include Mongoid::Document
+  field :name, :type => String
+  recursively_embeds_many
+end

data/spec/models/service.rb

@@ -0,0 +1,6 @@
+class Service
+  include Mongoid::Document
+  field :sid
+  embedded_in :person
+  validates_numericality_of :sid
+end

data/spec/models/shelf.rb

@@ -0,0 +1,5 @@
+class Shelf
+  include Mongoid::Document
+  field :level, :type => Integer
+  recursively_embeds_one
+end

data/spec/models/slave_address_numbers.rb

@@ -0,0 +1,14 @@
+# These models used for Github 263
+class Slave
+  include Mongoid::Document
+  field :first_name
+  field :last_name
+  embeds_many :address_numbers
+end
+
+class AddressNumber
+  include Mongoid::Document
+  field :country_code, :type => Integer, :default => 1
+  field :number
+  embedded_in :slave
+end

data/spec/models/survey.rb

@@ -0,0 +1,5 @@
+class Survey
+  include Mongoid::Document
+  embeds_many :questions
+  accepts_nested_attributes_for :questions, :reject_if => lambda{ |a| a[:content].blank? }, :allow_destroy => true
+end

data/spec/models/tag.rb

@@ -0,0 +1,6 @@
+class Tag
+  include Mongoid::Document
+  field :text, :type => String
+  references_and_referenced_in_many :posts
+  references_and_referenced_in_many :related, :class_name => "Tag"
+end

data/spec/models/tracking_id_validation_history.rb

@@ -0,0 +1,25 @@
+# These models are spcific to test for Github #313.
+module MyCompany
+  module Model
+    class TrackingId
+      include Mongoid::Document
+      include Mongoid::Timestamps
+      store_in :tracking_ids
+      embeds_many :validation_history, :class_name => "MyCompany::Model::TrackingIdValidationHistory"
+    end
+  end
+end
+
+module MyCompany
+  module Model
+    # A TrackingId validation state change
+    class TrackingIdValidationHistory
+      include Mongoid::Document
+      field :old_state, :type => String
+      field :new_state, :type => String
+      field :when_changed, :type => DateTime
+      attr_protected :_id
+      embedded_in :tracking_id, :class_name => "MyCompany::Model::TrackingId"
+    end
+  end
+end

data/spec/models/translation.rb

@@ -0,0 +1,5 @@
+class Translation
+  include Mongoid::Document
+  field :language
+  embedded_in :name
+end

data/spec/models/tree.rb

@@ -0,0 +1,9 @@
+class Tree
+  include Mongoid::Document
+
+  field :name
+  field :evergreen, :type => Boolean
+
+  scope :verdant, where(:evergreen => true)
+  default_scope asc(:name)
+end

data/spec/models/user.rb

@@ -0,0 +1,9 @@
+class User
+  include Mongoid::Document
+
+  field :name
+
+  references_one :account, :foreign_key => :creator_id
+  references_many :posts, :foreign_key => :author_id
+  references_many :descriptions
+end

data/spec/models/user_account.rb

@@ -0,0 +1,10 @@
+class UserAccount
+  include Mongoid::Document
+  field :username
+  field :name
+  field :email
+  validates_uniqueness_of :username, :message => "is not unique"
+  validates_uniqueness_of :email, :message => "is not unique", :case_sensitive => false
+  validates_length_of :name, :minimum => 2, :allow_nil => true
+  references_and_referenced_in_many :people
+end

data/spec/models/vet_visit.rb

@@ -0,0 +1,5 @@
+class VetVisit
+  include Mongoid::Document
+  field :date, :type => Date
+  embedded_in :pet
+end

data/spec/models/video.rb

@@ -0,0 +1,9 @@
+class Video
+  include Mongoid::Document
+  field :title
+  embedded_in :person
+  referenced_in :post
+  referenced_in :game
+
+  default_scope asc(:title)
+end

data/spec/models/wiki_page.rb

@@ -0,0 +1,6 @@
+class WikiPage
+  include Mongoid::Document
+  include Mongoid::Versioning
+  field :title, :type => String
+  max_versions 5
+end

data/spec/spec_helper.rb

@@ -0,0 +1,43 @@
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+
+MODELS = File.join(File.dirname(__FILE__), "models")
+SUPPORT = File.join(File.dirname(__FILE__), "support")
+$LOAD_PATH.unshift(MODELS)
+$LOAD_PATH.unshift(SUPPORT)
+
+require "mongoid"
+require "mocha"
+require "rspec"
+require "mongoid_spacial"
+
+LOGGER = Logger.new($stdout)
+
+if RUBY_VERSION >= '1.9.2'
+  YAML::ENGINE.yamler = 'syck'
+end
+
+Mongoid.configure do |config|
+  name = "mongoid_spacial_test"
+  config.master = Mongo::Connection.new.db(name)
+  config.logger = nil
+  config.allow_dynamic_fields = true
+end
+
+Dir[ File.join(MODELS, "*.rb") ].sort.each { |file| require File.basename(file) }
+Dir[ File.join(SUPPORT, "*.rb") ].each { |file| require File.basename(file) }
+
+RSpec.configure do |config|
+  config.mock_with(:mocha)
+
+  config.after(:suite) { Mongoid.purge! }
+
+  # We filter out the specs that require authentication if the database has not
+  # had the mongoid user set up properly.
+  user_configured = Support::Authentication.configured?
+  warn(Support::Authentication.message) unless user_configured
+
+  config.filter_run_excluding(:config => lambda { |value|
+    return true if value == :user && !user_configured
+  })
+end

data/spec/support/authentication.rb

@@ -0,0 +1,29 @@
+# encoding: utf-8
+module Support #:nodoc:
+  module Authentication
+    extend self
+
+    def configured?
+      begin
+        master_uri = "mongodb://mongoid:test@localhost:27017/mongoid_spacial_test"
+        Mongo::Connection.from_uri(master_uri)
+        true
+      rescue Mongo::AuthenticationError => e
+        false
+      end
+    end
+
+    def message
+      %Q{
+      ---------------------------------------------------------------------
+      A user needs to be configured for authentication, otherwise some
+      configuration specs will not get run. You may set it up from the
+      mongo console:
+
+        $ use mongoid_spacial_test;
+        $ db.addUser("mongoid", "test");
+      ---------------------------------------------------------------------
+      }
+    end
+  end
+end

data/spec/unit/mongoid/criterion/complex_spec.rb

@@ -0,0 +1,15 @@
+require "spec_helper"
+
+describe Mongoid::Criterion::Complex do
+
+  let(:complex) { Mongoid::Criterion::Complex.new(:key => :field, :operator => "gt") }
+
+  let(:value) { 40 }
+
+  context "#to_mongo_query" do
+    it "should turn value into appropriate query" do
+      complex.to_mongo_query(value).should == {"$gt" => value}
+    end
+  end
+
+end

data/spec/unit/mongoid/criterion/near_spacial_spec.rb

@@ -0,0 +1,39 @@
+require "spec_helper"
+
+describe Mongoid::Criterion::NearSpacial do
+
+  let(:within) do
+    {
+      :flat => Mongoid::Criterion::WithinSpacial.new(:key => :field, :operator => "near"),
+      :sphere => Mongoid::Criterion::WithinSpacial.new(:key => :field, :operator => "nearSphere"),
+    }
+  end
+  NEAR = {
+      :flat =>
+    {
+      'Point'           => [[1,2],5],
+      'Hash Point'      => {:point => [-73.98, 40.77], :max => 5},
+      'Hash Point Unit' => {:point => [-73.98, 40.77], :max => 5, :unit => :km}
+    },
+      :sphere =>
+    {
+      'Point'           => [[1,2],5],
+      'Hash Point'      => {:point => [-73.98, 40.77], :max => 5},
+      'Hash Point Unit' => {:point => [-73.98, 40.77], :max => 5, :unit => :km}
+    }
+  }
+
+  context "#to_mongo_query" do
+
+    NEAR.each do |shape, points|
+      points.each do |input_name,input|
+        it "#{shape} should generate a query with #{input_name}" do
+          within[shape].to_mongo_query(input).should be_a_kind_of(Hash)
+        end
+      end
+    end
+  end
+
+end
+
+

data/spec/unit/mongoid/criterion/within_spacial_spec.rb

@@ -0,0 +1,52 @@
+require "spec_helper"
+
+describe Mongoid::Criterion::WithinSpacial do
+
+  let(:within) do
+    {
+      :box => Mongoid::Criterion::WithinSpacial.new(:key => :field, :operator => "box"),
+      :polygon => Mongoid::Criterion::WithinSpacial.new(:key => :field, :operator => "polygon"),
+      :center => Mongoid::Criterion::WithinSpacial.new(:key => :field, :operator => "center"),
+      :center_sphere => Mongoid::Criterion::WithinSpacial.new(:key => :field, :operator => "box"),
+    }
+  end
+  WITHIN = {
+    :box =>
+    {
+      'Array of Arrays' => [[10,20], [15,25]],
+      'Array of Hashes' => [{ x: 10, y: 20 }, { x: 15, y: 25 }],
+      'Hash of Hashes'  => { a: { x: 10, y: 20 }, b: { x: 15, y: 25 }}
+    },
+      :polygon =>
+    {
+      'Array of Arrays' => [[10,20], [15,25]],
+      'Array of Hashes' => [{ x: 10, y: 20 }, { x: 15, y: 25 }],
+      'Hash of Hashes'  => { a: { x: 10, y: 20 }, b: { x: 15, y: 25 }}
+    },
+      :center =>
+    {
+      'Point'           => [[1,2],5],
+      'Hash Point'      => {:point => [-73.98, 40.77], :max => 5},
+      'Hash Point Unit' => {:point => [-73.98, 40.77], :max => 5, :unit => :km}
+    },
+      :center_sphere =>
+    {
+      'Point'           => [[1,2],5],
+      'Hash Point'      => {:point => [-73.98, 40.77], :max => 5},
+      'Hash Point Unit' => {:point => [-73.98, 40.77], :max => 5, :unit => :km}
+    }
+  }
+
+  context "#to_mongo_query" do
+
+    WITHIN.each do |shape, points|
+      points.each do |input_name,input|
+        it "#{shape} should generate a query with #{input_name}" do
+          within[shape].to_mongo_query(input).should be_a_kind_of(Hash)
+        end
+      end
+    end
+  end
+
+end
+