openlogic-couchrest_model 1.0.0

data/spec/fixtures/models/client.rb

@@ -0,0 +1,6 @@
+class Client < CouchRest::Model::Base
+  use_database DB
+
+  property :name
+  property :tax_code
+end

data/spec/fixtures/models/course.rb

@@ -0,0 +1,27 @@
+require 'question'
+require 'person'
+
+class Course < CouchRest::Model::Base
+  use_database TEST_SERVER.default_database
+  
+  property :title, String
+  property :questions, [Question]
+  property :professor, Person
+  property :participants, [Object]
+  property :ends_at, Time
+  property :estimate, Float
+  property :hours, Integer
+  property :profit, BigDecimal
+  property :started_on, :type => Date
+  property :updated_at, DateTime
+  property :active, :type => TrueClass
+  property :very_active, :type => TrueClass
+  property :klass, :type => Class
+
+  view_by :title
+  view_by :title, :active
+  view_by :dept, :ducktype => true
+
+  view_by :active, :map => "function(d) { if (d['#{model_type_key}'] == 'Course' && d['active']) { emit(d['updated_at'], 1); }}", :reduce => "function(k,v,r) { return sum(v); }"
+
+end

data/spec/fixtures/models/event.rb

@@ -0,0 +1,8 @@
+class Event < CouchRest::Model::Base
+  use_database DB
+  
+  property :subject
+  property :occurs_at, Time, :init_method => 'parse'
+  property :end_date, Date, :init_method => 'parse'
+  
+end

data/spec/fixtures/models/invoice.rb

@@ -0,0 +1,14 @@
+class Invoice < CouchRest::Model::Base
+  # Set the default database to use
+  use_database DB
+
+  # Official Schema
+  property :client_name
+  property :employee_name
+  property :location
+
+  # Validation
+  validates_presence_of :client_name, :employee_name
+  validates_presence_of :location, :message => "Hey stupid!, you forgot the location"
+
+end

data/spec/fixtures/models/key_chain.rb

@@ -0,0 +1,5 @@
+class KeyChain < CouchRest::Model::Base
+  use_database(DB)
+
+  property(:keys, Hash)
+end

data/spec/fixtures/models/membership.rb

@@ -0,0 +1,4 @@
+class Membership
+  include CouchRest::Model::Embeddable
+
+end

data/spec/fixtures/models/person.rb

@@ -0,0 +1,11 @@
+require 'cat'
+
+class Person
+  include ::CouchRest::Model::Embeddable
+  property :pet, Cat
+  property :name, [String]
+  
+  def last_name
+    name.last
+  end
+end

data/spec/fixtures/models/project.rb

@@ -0,0 +1,6 @@
+class Project < CouchRest::Model::Base
+  use_database DB
+  property :name,   String
+  timestamps!
+  view_by :name
+end

data/spec/fixtures/models/question.rb

@@ -0,0 +1,7 @@
+class Question
+  include ::CouchRest::Model::Embeddable
+
+  property :q
+  property :a
+
+end

data/spec/fixtures/models/sale_entry.rb

@@ -0,0 +1,9 @@
+class SaleEntry < CouchRest::Model::Base
+  use_database DB
+
+  property :description
+  property :price
+  
+  view_by :description
+  
+end

data/spec/fixtures/models/sale_invoice.rb

@@ -0,0 +1,14 @@
+require 'client'
+require 'sale_entry'
+
+class SaleInvoice < CouchRest::Model::Base
+  use_database DB
+
+  belongs_to :client
+  belongs_to :alternate_client, :class_name => 'Client', :foreign_key => 'alt_client_id'
+
+  collection_of :entries, :class_name => 'SaleEntry'
+
+  property :date, Date
+  property :price, Integer 
+end

data/spec/fixtures/models/service.rb

@@ -0,0 +1,10 @@
+class Service < CouchRest::Model::Base
+  # Set the default database to use
+  use_database DB
+  
+  # Official Schema
+  property :name
+  property :price, Integer
+  
+  validates_length_of :name, :minimum => 4, :maximum => 20
+end

data/spec/fixtures/models/user.rb

@@ -0,0 +1,22 @@
+class User < CouchRest::Model::Base
+  # Set the default database to use
+  use_database DB
+  property :name, :accessible => true
+  property :admin                     # this will be automatically protected
+end
+
+class SpecialUser < CouchRest::Model::Base
+  # Set the default database to use
+  use_database DB
+  property :name                      # this will not be protected
+  property :admin, :protected => true
+end
+
+# There are two modes of protection
+#  1) Declare accessible poperties, assume all the rest are protected 
+#    property :name, :accessible => true
+#    property :admin                     # this will be automatically protected
+#
+#  2) Declare protected properties, assume all the rest are accessible
+#    property :name                      # this will not be protected
+#    property :admin, :protected => true

data/spec/fixtures/views/lib.js

@@ -0,0 +1,3 @@
+function globalLib() {
+  return "fixture";
+};

data/spec/fixtures/views/test_view/lib.js

@@ -0,0 +1,3 @@
+function justThisView() {
+  return "fixture";
+};

data/spec/fixtures/views/test_view/only-map.js

@@ -0,0 +1,4 @@
+function(doc) {
+  //include-lib
+  emit(null, null);
+};

data/spec/fixtures/views/test_view/test-map.js

@@ -0,0 +1,3 @@
+function(doc) {
+  emit(null, null);
+};

data/spec/fixtures/views/test_view/test-reduce.js

@@ -0,0 +1,3 @@
+function(ks,vs,co) {
+  return vs.length;
+};

data/spec/functional/validations_spec.rb

@@ -0,0 +1,8 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe CouchRest::Model::Validations do
+
+  let(:invoice) do
+    Invoice.new()
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,60 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), "..", "lib"))
+
+require "bundler/setup"
+require "rubygems"
+require "rspec"
+
+require 'couchrest_model'
+
+unless defined?(FIXTURE_PATH)
+  MODEL_PATH = File.join(File.dirname(__FILE__), "fixtures", "models")
+  $LOAD_PATH.unshift(MODEL_PATH)
+
+  FIXTURE_PATH = File.join(File.dirname(__FILE__), '/fixtures')
+  SCRATCH_PATH = File.join(File.dirname(__FILE__), '/tmp')
+
+  COUCHHOST = "http://127.0.0.1:5984"
+  TESTDB    = 'couchrest-model-test'
+  TEST_SERVER    = CouchRest.new COUCHHOST
+  TEST_SERVER.default_database = TESTDB
+  DB = TEST_SERVER.database(TESTDB)
+end
+
+RSpec.configure do |config|
+  config.before(:all) { reset_test_db! }
+
+  config.after(:all) do
+    cr = TEST_SERVER
+    test_dbs = cr.databases.select { |db| db =~ /^#{TESTDB}/ }
+    test_dbs.each do |db|
+      cr.database(db).delete! rescue nil
+    end
+  end
+end
+
+# Require each of the fixture models
+Dir[ File.join(MODEL_PATH, "*.rb") ].sort.each { |file| require File.basename(file) }
+
+class Basic < CouchRest::Model::Base
+  use_database TEST_SERVER.default_database
+end
+
+def reset_test_db!
+  DB.recreate! rescue nil 
+  # Reset the Design Cache
+  Thread.current[:couchrest_design_cache] = {}
+  DB
+end
+
+
+def couchdb_lucene_available?
+  lucene_path = "http://localhost:5985/"
+  url = URI.parse(lucene_path)
+  req = Net::HTTP::Get.new(url.path)
+  res = Net::HTTP.new(url.host, url.port).start { |http| http.request(req) }
+  true
+ rescue Exception => e
+  false
+end
+

data/spec/unit/active_model_lint_spec.rb

@@ -0,0 +1,30 @@
+# encoding: utf-8
+require 'spec_helper'
+require 'test/unit/assertions'
+require 'active_model/lint'
+
+class CompliantModel < CouchRest::Model::Base
+end
+
+
+describe CouchRest::Model::Base do
+  include Test::Unit::Assertions
+  include ActiveModel::Lint::Tests
+
+  before :each do
+    @model = CompliantModel.new
+  end
+
+  describe "active model lint tests" do
+    ActiveModel::Lint::Tests.public_instance_methods.map{|m| m.to_s}.grep(/^test/).each do |m|
+      example m.gsub('_',' ') do
+        send m
+      end
+    end
+  end
+
+  def model
+    @model
+  end
+
+end

data/spec/unit/assocations_spec.rb

@@ -0,0 +1,242 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe "Assocations" do
+
+  describe ".merge_belongs_to_association_options" do
+    before :all do
+      def SaleInvoice.merge_assoc_opts(*args)
+        merge_belongs_to_association_options(*args)
+      end
+    end
+
+    it "should return a default set of options" do
+      o = SaleInvoice.merge_assoc_opts(:cat)
+      o[:foreign_key].should eql('cat_id')
+      o[:class_name].should eql('Cat')
+      o[:proxy_name].should eql('cats')
+      o[:proxy].should eql('Cat') # same as class name
+    end
+
+    it "should merge with provided options" do
+      o = SaleInvoice.merge_assoc_opts(:cat, :foreign_key => 'somecat_id', :proxy => 'some_cats')
+      o[:foreign_key].should eql('somecat_id')
+      o[:proxy].should eql('some_cats')
+    end
+
+    it "should generate a proxy string if proxied" do
+      SaleInvoice.stub!(:proxy_owner_method).twice.and_return('company')
+      o = SaleInvoice.merge_assoc_opts(:cat)
+      o[:proxy].should eql('self.company.cats')
+    end
+    
+  end
+
+  describe "of type belongs to" do
+
+    before :each do
+      @invoice = SaleInvoice.create(:price => 2000)
+      @client = Client.create(:name => "Sam Lown")
+    end
+
+    it "should create a foreign key property with setter and getter" do
+      @invoice.properties.find{|p| p.name == 'client_id'}.should_not be_nil
+      @invoice.respond_to?(:client_id).should be_true
+      @invoice.respond_to?("client_id=").should be_true
+    end
+
+    it "should set the property and provide object when set" do
+      @invoice.client = @client
+      @invoice.client_id.should eql(@client.id)
+      @invoice.client.should eql(@client)
+    end
+
+    it "should set the attribute, save and return" do
+      @invoice.client = @client
+      @invoice.save
+      @invoice = SaleInvoice.get(@invoice.id)
+      @invoice.client.id.should eql(@client.id)
+    end
+
+    it "should remove the association if nil is provided" do
+      @invoice.client = @client
+      @invoice.client = nil
+      @invoice.client_id.should be_nil
+    end
+
+    it "should not try to search for association if foreign_key is nil" do
+      @invoice.client_id = nil
+      Client.should_not_receive(:get)
+      @invoice.client
+    end
+
+    it "should allow override of foreign key" do
+      @invoice.respond_to?(:alternate_client).should be_true
+      @invoice.respond_to?("alternate_client=").should be_true
+      @invoice.properties.find{|p| p.name == 'alt_client_id'}.should_not be_nil
+    end
+
+    it "should allow override of foreign key and save" do
+      @invoice.alternate_client = @client
+      @invoice.save
+      @invoice = SaleInvoice.get(@invoice.id)
+      @invoice.alternate_client.id.should eql(@client.id)
+    end
+
+  end
+
+  describe "of type collection_of" do
+
+    before(:each) do
+      @invoice = SaleInvoice.create(:price => 2000)
+      @entries = [
+        SaleEntry.create(:description => 'test line 1', :price => 500),
+        SaleEntry.create(:description => 'test line 2', :price => 500),
+        SaleEntry.create(:description => 'test line 3', :price => 1000)
+      ]
+    end
+
+    it "should create an associated property and collection proxy" do
+      @invoice.respond_to?('entry_ids').should be_true
+      @invoice.respond_to?('entry_ids=').should be_true
+      @invoice.entries.class.should eql(::CouchRest::Model::CollectionOfProxy)
+    end
+
+    it "should allow replacement of objects" do
+      @invoice.entries = @entries
+      @invoice.entries.length.should eql(3)
+      @invoice.entry_ids.length.should eql(3)
+      @invoice.entries.first.should eql(@entries.first)
+      @invoice.entry_ids.first.should eql(@entries.first.id)
+    end
+
+    it "should allow ids to be set directly and load entries" do
+      @invoice.entry_ids = @entries.collect{|i| i.id}
+      @invoice.entries.length.should eql(3)
+      @invoice.entries.first.should eql(@entries.first)
+    end
+
+    it "should replace collection if ids replaced" do
+      @invoice.entry_ids = @entries.collect{|i| i.id}
+      @invoice.entries.length.should eql(3) # load once
+      @invoice.entry_ids = @entries[0..1].collect{|i| i.id}
+      @invoice.entries.length.should eql(2)
+    end
+
+    it "should allow forced collection update if ids changed" do
+      @invoice.entry_ids = @entries[0..1].collect{|i| i.id}
+      @invoice.entries.length.should eql(2) # load once
+      @invoice.entry_ids << @entries[2].id
+      @invoice.entry_ids.length.should eql(3)
+      @invoice.entries.length.should eql(2) # cached!
+      @invoice.entries(true).length.should eql(3)
+    end
+
+    it "should empty arrays when nil collection provided" do
+      @invoice.entries = @entries
+      @invoice.entries = nil
+      @invoice.entry_ids.should be_empty
+      @invoice.entries.should be_empty
+    end
+
+    it "should empty arrays when nil ids array provided" do
+      @invoice.entries = @entries
+      @invoice.entry_ids = nil
+      @invoice.entry_ids.should be_empty
+      @invoice.entries.should be_empty
+    end
+
+    it "should ignore nil entries" do
+      @invoice.entries = [ nil ]
+      @invoice.entry_ids.should be_empty
+      @invoice.entries.should be_empty
+    end
+
+    # Account for dirty tracking
+    describe "dirty tracking" do
+      it "should register changes on push" do
+        @invoice.changed?.should be_false
+        @invoice.entries << @entries[0]
+        @invoice.changed?.should be_true
+      end
+      it "should register changes on pop" do
+        @invoice.entries << @entries[0]
+        @invoice.save
+        @invoice.changed?.should be_false
+        @invoice.entries.pop
+        @invoice.changed?.should be_true
+      end
+      it "should register id changes on push" do
+        @invoice.entry_ids << @entries[0].id
+        @invoice.changed?.should be_true
+      end
+      it "should register id changes on pop" do
+        @invoice.entry_ids << @entries[0].id
+        @invoice.save
+        @invoice.changed?.should be_false
+        @invoice.entry_ids.pop
+        @invoice.changed?.should be_true
+      end
+    end
+
+    describe "proxy" do
+
+      it "should ensure new entries to proxy are matched" do
+        @invoice.entries << @entries.first
+        @invoice.entry_ids.first.should eql(@entries.first.id)
+        @invoice.entries.first.should eql(@entries.first)
+        @invoice.entries << @entries[1]
+        @invoice.entries.count.should eql(2)
+        @invoice.entry_ids.count.should eql(2)
+        @invoice.entry_ids.last.should eql(@entries[1].id)
+        @invoice.entries.last.should eql(@entries[1])
+      end
+
+      it "should support push method" do
+        @invoice.entries.push(@entries.first)
+        @invoice.entry_ids.first.should eql(@entries.first.id)
+      end
+
+      it "should support []= method" do
+        @invoice.entries[0] = @entries.first
+        @invoice.entry_ids.first.should eql(@entries.first.id)
+      end
+
+      it "should support unshift method" do
+        @invoice.entries.unshift(@entries.first)
+        @invoice.entry_ids.first.should eql(@entries.first.id)
+        @invoice.entries.unshift(@entries[1])
+        @invoice.entry_ids.first.should eql(@entries[1].id)
+      end
+
+      it "should support pop method" do
+        @invoice.entries.push(@entries.first)
+        @invoice.entries.pop.should eql(@entries.first)
+        @invoice.entries.empty?.should be_true
+        @invoice.entry_ids.empty?.should be_true
+      end
+
+      it "should support shift method" do
+        @invoice.entries.push(@entries[0])
+        @invoice.entries.push(@entries[1])
+        @invoice.entries.shift.should eql(@entries[0])
+        @invoice.entries.first.should eql(@entries[1])
+        @invoice.entry_ids.first.should eql(@entries[1].id)
+      end
+
+      it "should raise error when adding un-persisted entries" do
+        SaleEntry.find_by_description('test entry').should be_nil
+        entry = SaleEntry.new(:description => 'test entry', :price => 500)
+        lambda {
+          @invoice.entries << entry
+        }.should raise_error
+        # In the future maybe?
+        # @invoice.save.should be_true
+        # SaleEntry.find_by_description('test entry').should_not be_nil
+      end
+
+    end
+
+  end
+
+end