glasner-couchrest 0.2.2

data/spec/couchrest/more/extended_doc_view_spec.rb

@@ -0,0 +1,207 @@
+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

@@ -0,0 +1,130 @@
+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

@@ -0,0 +1,59 @@
+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/attachments/README

@@ -0,0 +1,3 @@
+This is an example README file.
+
+More of the README, whee.

data/spec/fixtures/attachments/test.html

@@ -0,0 +1,11 @@
+<!DOCTYPE html>
+<html>
+  <head>
+    <title>Test</title>
+  </head>
+  <body>
+    <p>
+      Test
+    </p>
+  </body>
+</html>

data/spec/fixtures/more/article.rb

@@ -0,0 +1,34 @@
+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