samflores-couchrest 0.2.1 → 0.12.3

data/spec/couchrest/more/extended_doc_view_spec.rb

@@ -1,207 +0,0 @@
-require File.dirname(__FILE__) + '/../../spec_helper'
-require File.join(FIXTURE_PATH, 'more', 'article')
-require File.join(FIXTURE_PATH, 'more', 'course')
-
-describe "ExtendedDocument views" do
-  
-  describe "a model with simple views and a default param" do
-    before(:all) do
-      Article.all.map{|a| a.destroy(true)}
-      Article.database.bulk_delete
-      written_at = Time.now - 24 * 3600 * 7
-      @titles = ["this and that", "also interesting", "more fun", "some junk"]
-      @titles.each do |title|
-        a = Article.new(:title => title)
-        a.date = written_at
-        a.save
-        written_at += 24 * 3600
-      end
-    end
-
-    it "should have a design doc" do
-      Article.design_doc["views"]["by_date"].should_not be_nil
-    end
-  
-    it "should save the design doc" do
-      Article.by_date #rescue nil
-      doc = Article.database.get Article.design_doc.id
-      doc['views']['by_date'].should_not be_nil
-    end
-  
-    it "should return the matching raw view result" do
-      view = Article.by_date :raw => true
-      view['rows'].length.should == 4
-    end
-  
-    it "should not include non-Articles" do
-      Article.database.save_doc({"date" => 1})
-      view = Article.by_date :raw => true
-      view['rows'].length.should == 4
-    end
-  
-    it "should return the matching objects (with default argument :descending => true)" do
-      articles = Article.by_date
-      articles.collect{|a|a.title}.should == @titles.reverse
-    end
-  
-    it "should allow you to override default args" do
-      articles = Article.by_date :descending => false
-      articles.collect{|a|a.title}.should == @titles
-    end
-  end
-
-  describe "another model with a simple view" do
-    before(:all) do
-      reset_test_db!
-      %w{aaa bbb ddd eee}.each do |title|
-        Course.new(:title => title).save
-      end
-    end
-    it "should make the design doc upon first query" do
-      Course.by_title 
-      doc = Course.design_doc
-      doc['views']['all']['map'].should include('Course')
-    end
-    it "should can query via view" do
-      # register methods with method-missing, for local dispatch. method
-      # missing lookup table, no heuristics.
-      view = Course.view :by_title
-      designed = Course.by_title
-      view.should == designed
-    end
-    it "should get them" do
-      rs = Course.by_title 
-      rs.length.should == 4
-    end
-    it "should yield" do
-      courses = []
-      rs = Course.by_title # remove me
-      Course.view(:by_title) do |course|
-        courses << course
-      end
-      courses[0]["doc"]["title"].should =='aaa'
-    end
-  end
-
-
-  describe "a ducktype view" do
-    before(:all) do
-      @id = TEST_SERVER.default_database.save_doc({:dept => true})['id']
-    end
-    it "should setup" do
-      duck = Course.get(@id) # from a different db
-      duck["dept"].should == true
-    end
-    it "should make the design doc" do
-      @as = Course.by_dept
-      @doc = Course.design_doc
-      @doc["views"]["by_dept"]["map"].should_not include("couchrest")
-    end
-    it "should not look for class" do |variable|
-      @as = Course.by_dept
-      @as[0]['_id'].should == @id
-    end
-  end
-
-  describe "a model with a compound key view" do
-    before(:all) do
-      Article.design_doc_fresh = false
-      Article.by_user_id_and_date.each{|a| a.destroy(true)}
-      Article.database.bulk_delete
-      written_at = Time.now - 24 * 3600 * 7
-      @titles = ["uniq one", "even more interesting", "less fun", "not junk"]
-      @user_ids = ["quentin", "aaron"]
-      @titles.each_with_index do |title,i|
-        u = i % 2
-        a = Article.new(:title => title, :user_id => @user_ids[u])
-        a.date = written_at
-        a.save
-        written_at += 24 * 3600
-      end
-    end
-    it "should create the design doc" do
-      Article.by_user_id_and_date rescue nil
-      doc = Article.design_doc
-      doc['views']['by_date'].should_not be_nil
-    end
-    it "should sort correctly" do
-      articles = Article.by_user_id_and_date
-      articles.collect{|a|a['user_id']}.should == ['aaron', 'aaron', 'quentin', 
-        'quentin']
-      articles[1].title.should == 'not junk'
-    end
-    it "should be queryable with couchrest options" do
-      articles = Article.by_user_id_and_date :limit => 1, :startkey => 'quentin'
-      articles.length.should == 1
-      articles[0].title.should == "even more interesting"
-    end
-  end
-
-  describe "with a custom view" do
-    before(:all) do
-      @titles = ["very uniq one", "even less interesting", "some fun", 
-        "really junk", "crazy bob"]
-      @tags = ["cool", "lame"]
-      @titles.each_with_index do |title,i|
-        u = i % 2
-        a = Article.new(:title => title, :tags => [@tags[u]])
-        a.save
-      end
-    end
-    it "should be available raw" do
-      view = Article.by_tags :raw => true
-      view['rows'].length.should == 5
-    end
-
-    it "should be default to :reduce => false" do
-      ars = Article.by_tags
-      ars.first.tags.first.should == 'cool'
-    end
-  
-    it "should be raw when reduce is true" do
-      view = Article.by_tags :reduce => true, :group => true
-      view['rows'].find{|r|r['key'] == 'cool'}['value'].should == 3
-    end
-  end
-
-  # TODO: moved to Design, delete
-  describe "adding a view" do
-    before(:each) do
-      reset_test_db!
-      Article.by_date
-      @design_docs = Article.database.documents :startkey => "_design/", :endkey => "_design/\u9999"
-    end
-    it "should not create a design doc on view definition" do
-      Article.view_by :created_at
-      newdocs = Article.database.documents :startkey => "_design/", :endkey => "_design/\u9999"
-      newdocs["rows"].length.should == @design_docs["rows"].length
-    end
-    it "should create a new version of the design document on view access" do
-      old_design_doc = Article.database.documents(:key => @design_docs["rows"].first["key"], :include_docs => true)["rows"][0]["doc"]
-      Article.view_by :updated_at
-      Article.by_updated_at
-      newdocs = Article.database.documents({:startkey => "_design/", :endkey => "_design/\u9999"})
-
-      doc = Article.database.documents(:key => @design_docs["rows"].first["key"], :include_docs => true)["rows"][0]["doc"]
-      doc["_rev"].should_not        == old_design_doc["_rev"]
-      doc["views"].keys.should include("by_updated_at")
-    end
-  end
-
-  describe "with a lot of designs left around" do
-    before(:each) do
-      reset_test_db!
-      Article.by_date
-      Article.view_by :field
-      Article.by_field
-    end
-    it "should clean them up" do
-      ddocs = Article.all_design_doc_versions
-      Article.view_by :stream
-      Article.by_stream
-      Article.cleanup_design_docs!
-      ddocs = Article.all_design_doc_versions
-      ddocs["rows"].length.should == 1
-    end
-  end
-end

data/spec/couchrest/more/property_spec.rb

@@ -1,130 +0,0 @@
-require File.join(File.dirname(__FILE__), '..', '..', 'spec_helper')
-require File.join(FIXTURE_PATH, 'more', 'card')
-require File.join(FIXTURE_PATH, 'more', 'invoice')
-require File.join(FIXTURE_PATH, 'more', 'service')
-require File.join(FIXTURE_PATH, 'more', 'event')
-
-
-describe "ExtendedDocument properties" do
-  
-  before(:each) do
-    reset_test_db!
-    @card = Card.new(:first_name => "matt")
-  end
-  
-  it "should be accessible from the object" do
-    @card.properties.should be_an_instance_of(Array)
-    @card.properties.map{|p| p.name}.should include("first_name")
-  end
-  
-  it "should let you access a property value (getter)" do
-    @card.first_name.should == "matt"
-  end
-  
-  it "should let you set a property value (setter)" do
-    @card.last_name = "Aimonetti"
-    @card.last_name.should == "Aimonetti"
-  end
-  
-  it "should not let you set a property value if it's read only" do
-    lambda{@card.read_only_value = "test"}.should raise_error
-  end
-  
-  it "should let you use an alias for an attribute" do
-    @card.last_name = "Aimonetti"
-    @card.family_name.should == "Aimonetti"
-    @card.family_name.should == @card.last_name
-  end
-  
-  it "should be auto timestamped" do
-    @card.created_at.should be_nil
-    @card.updated_at.should be_nil
-    @card.save.should be_true
-    @card.created_at.should_not be_nil
-    @card.updated_at.should_not be_nil
-  end
-  
-  describe "validation" do
-    before(:each) do
-      @invoice = Invoice.new(:client_name => "matt", :employee_name => "Chris", :location => "San Diego, CA")
-    end
-    
-    it "should be able to be validated" do
-      @card.valid?.should == true
-    end
-
-    it "should let you validate the presence of an attribute" do
-      @card.first_name = nil
-      @card.should_not be_valid
-      @card.errors.should_not be_empty
-      @card.errors.on(:first_name).should == ["First name must not be blank"]
-    end
-
-    it "should validate the presence of 2 attributes" do
-      @invoice.clear
-      @invoice.should_not be_valid
-      @invoice.errors.should_not be_empty
-      @invoice.errors.on(:client_name).first.should == "Client name must not be blank"
-      @invoice.errors.on(:employee_name).should_not be_empty
-    end
-    
-    it "should let you set an error message" do
-      @invoice.location = nil
-      @invoice.valid?
-      @invoice.errors.on(:location).should == ["Hey stupid!, you forgot the location"]
-    end
-    
-    it "should validate before saving" do
-      @invoice.location = nil
-      @invoice.should_not be_valid
-      @invoice.save.should be_false
-      @invoice.should be_new_document
-    end
-  end
-  
-  describe "autovalidation" do
-    before(:each) do
-      @service = Service.new(:name => "Coumpound analysis", :price => 3_000)
-    end
-    
-    it "should be valid" do
-      @service.should be_valid
-    end
-    
-    it "should not respond to properties not setup" do
-      @service.respond_to?(:client_name).should be_false
-    end
-    
-    describe "property :name, :length => 4...20" do
-      
-      it "should autovalidate the presence when length is set" do
-        @service.name = nil
-        @service.should_not be_valid
-        @service.errors.should_not be_nil
-        @service.errors.on(:name).first.should == "Name must be between 4 and 19 characters long"
-      end
-    
-      it "should autovalidate the correct length" do
-        @service.name = "a"
-        @service.should_not be_valid
-        @service.errors.should_not be_nil
-        @service.errors.on(:name).first.should == "Name must be between 4 and 19 characters long"
-      end
-    end
-  end
-  
-  describe "casting" do
-    describe "cast keys to any type" do
-      before(:all) do
-        event_doc = { :subject => "Some event", :occurs_at => Time.now }
-        e = Event.database.save_doc event_doc
-
-        @event = Event.get e['id']
-      end
-      it "should cast created_at to Time" do
-        @event['occurs_at'].should be_an_instance_of(Time)
-      end
-    end
-  end
-  
-end

data/spec/couchrest/support/class_spec.rb

@@ -1,59 +0,0 @@
-require File.join(File.dirname(__FILE__), '..', '..', 'spec_helper')
-require File.join(File.dirname(__FILE__), '..', '..', '..', 'lib', 'couchrest', 'support', 'class')
-
-describe CouchRest::ClassExtension do
-  
-  before :all do
-    class FullyDefinedClassExtensions
-      def self.respond_to?(method)
-        if CouchRest::ClassExtension::InstanceMethods.instance_methods.include?(method)
-          true
-        else
-          super
-        end
-      end
-    end
-    
-    class PartDefinedClassExtensions
-      def self.respond_to?(method)
-        methods = CouchRest::ClassExtension::InstanceMethods.instance_methods
-        methods.delete('cattr_reader')
-        
-        if methods.include?(method)
-          false
-        else
-          super
-        end
-      end
-    end
-    
-    class NoClassExtensions
-      def self.respond_to?(method)
-        if CouchRest::ClassExtension::InstanceMethods.instance_methods.include?(method)
-          false
-        else
-          super
-        end
-      end
-    end
-
-
-  end
-  
-  it "should not include InstanceMethods if the class extensions are already defined" do
-    FullyDefinedClassExtensions.send(:include, CouchRest::ClassExtension)
-    FullyDefinedClassExtensions.ancestors.should_not include(CouchRest::ClassExtension::InstanceMethods)
-  end
-  
-  it "should raise RuntimeError if the class extensions are only partially defined" do
-    lambda {
-      PartDefinedClassExtensions.send(:include, CouchRest::ClassExtension)
-    }.should raise_error(RuntimeError)
-  end
-  
-  it "should include class extensions if they are not already defined" do
-    NoClassExtensions.send(:include, CouchRest::ClassExtension)
-    NoClassExtensions.ancestors.should include(CouchRest::ClassExtension::InstanceMethods)
-  end
-  
-end

data/spec/fixtures/more/article.rb

@@ -1,34 +0,0 @@
-class Article < CouchRest::ExtendedDocument
-  use_database TEST_SERVER.default_database
-  unique_id :slug
-  
-  view_by :date, :descending => true
-  view_by :user_id, :date
-    
-  view_by :tags,
-    :map => 
-      "function(doc) {
-        if (doc['couchrest-type'] == 'Article' && doc.tags) {
-          doc.tags.forEach(function(tag){
-            emit(tag, 1);
-          });
-        }
-      }",
-    :reduce => 
-      "function(keys, values, rereduce) {
-        return sum(values);
-      }"  
-
-  property :date
-  property :slug, :read_only => true
-  property :title
-  property :tags
-
-  timestamps!
-  
-  save_callback :before, :generate_slug_from_title
-  
-  def generate_slug_from_title
-    self['slug'] = title.downcase.gsub(/[^a-z0-9]/,'-').squeeze('-').gsub(/^\-|\-$/,'') if new_document?
-  end
-end

data/spec/fixtures/more/card.rb

@@ -1,20 +0,0 @@
-class Card < CouchRest::ExtendedDocument  
-  # Include the validation module to get access to the validation methods
-  include CouchRest::Validation
-  # set the auto_validation before defining the properties
-  auto_validate!
-  
-  # Set the default database to use
-  use_database TEST_SERVER.default_database
-  
-  # Official Schema
-  property :first_name
-  property :last_name,        :alias     => :family_name
-  property :read_only_value,  :read_only => true
-  
-  timestamps!
-  
-  # Validation
-  validates_present :first_name
-  
-end

data/spec/fixtures/more/course.rb

@@ -1,14 +0,0 @@
-require File.join(FIXTURE_PATH, 'more', 'question')
-require File.join(FIXTURE_PATH, 'more', 'person')
-
-class Course < CouchRest::ExtendedDocument
-  use_database TEST_SERVER.default_database
-  
-  property :title
-  property :questions,      :cast_as => ['Question']
-  property :professor,      :cast_as => 'Person'
-  property :final_test_at,  :cast_as => 'Time'
-  
-  view_by :title
-  view_by :dept, :ducktype => true
-end

data/spec/fixtures/more/event.rb

@@ -1,6 +0,0 @@
-class Event < CouchRest::ExtendedDocument
-  use_database TEST_SERVER.default_database
-  
-  property :subject
-  property :occurs_at, :cast_as => 'Time', :send => 'parse'
-end

data/spec/fixtures/more/invoice.rb

@@ -1,17 +0,0 @@
-class Invoice < CouchRest::ExtendedDocument  
-  # Include the validation module to get access to the validation methods
-  include CouchRest::Validation
-  
-  # Set the default database to use
-  use_database TEST_SERVER.default_database
-  
-  # Official Schema
-  property :client_name
-  property :employee_name
-  property :location
-  
-  # Validation
-  validates_present :client_name, :employee_name
-  validates_present :location, :message => "Hey stupid!, you forgot the location"
-  
-end

data/spec/fixtures/more/person.rb

@@ -1,8 +0,0 @@
-class Person < Hash
-  include ::CouchRest::CastedModel
-  property :name
-  
-  def last_name
-    name.last
-  end
-end

data/spec/fixtures/more/question.rb

@@ -1,6 +0,0 @@
-class Question < Hash
-  include ::CouchRest::CastedModel
-  
-  property :q
-  property :a
-end

data/spec/fixtures/more/service.rb

@@ -1,12 +0,0 @@
-class Service < CouchRest::ExtendedDocument  
-  # Include the validation module to get access to the validation methods
-  include CouchRest::Validation
-  auto_validate!
-  # Set the default database to use
-  use_database TEST_SERVER.default_database
-  
-  # Official Schema
-  property :name, :length => 4...20
-  property :price, :type => Integer
-  
-end