couchrest 0.38 → 1.0.0.beta

data/lib/couchrest/validation/validators/numeric_validator.rb

@@ -1,109 +0,0 @@
-# Extracted from dm-validations 0.9.10
-#
-# Copyright (c) 2007 Guy van den Berg
-# 
-# Permission is hereby granted, free of charge, to any person obtaining
-# a copy of this software and associated documentation files (the
-# "Software"), to deal in the Software without restriction, including
-# without limitation the rights to use, copy, modify, merge, publish,
-# distribute, sublicense, and/or sell copies of the Software, and to
-# permit persons to whom the Software is furnished to do so, subject to
-# the following conditions:
-# 
-# The above copyright notice and this permission notice shall be
-# included in all copies or substantial portions of the Software.
-# 
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
-# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
-# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
-# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-
-module CouchRest
-  module Validation
-
-    ##
-    #
-    # @author Guy van den Berg
-    # @since  0.9
-    class NumericValidator < GenericValidator
-
-      def initialize(field_name, options={})
-        super
-        @field_name, @options = field_name, options
-        @options[:integer_only] = false unless @options.has_key?(:integer_only)
-      end
-
-      def call(target)
-        value = target.send(field_name)
-        return true if @options[:allow_nil] && value.nil?
-
-        value = (defined?(BigDecimal) && value.kind_of?(BigDecimal)) ? value.to_s('F') : value.to_s
-
-        error_message = @options[:message]
-        precision     = @options[:precision]
-        scale         = @options[:scale]
-
-        if @options[:integer_only]
-          return true if value =~ /\A[+-]?\d+\z/
-          error_message ||= ValidationErrors.default_error_message(:not_an_integer, field_name)
-        else
-          # FIXME: if precision and scale are not specified, can we assume that it is an integer?
-          #        probably not, as floating point numbers don't have hard
-          #        defined scale. the scale floats with the length of the
-          #        integral and precision. Ie. if precision = 10 and integral
-          #        portion of the number is 9834 (4 digits), the max scale will
-          #        be 6 (10 - 4). But if the integral length is 1, max scale
-          #        will be (10 - 1) = 9, so 1.234567890.
-          if precision && scale
-            #handles both Float when it has scale specified and BigDecimal
-            if precision > scale && scale > 0
-              return true if value =~ /\A[+-]?(?:\d{1,#{precision - scale}}|\d{0,#{precision - scale}}\.\d{1,#{scale}})\z/
-            elsif precision > scale && scale == 0
-              return true if value =~ /\A[+-]?(?:\d{1,#{precision}}(?:\.0)?)\z/
-            elsif precision == scale
-              return true if value =~ /\A[+-]?(?:0(?:\.\d{1,#{scale}})?)\z/
-            else
-              raise ArgumentError, "Invalid precision #{precision.inspect} and scale #{scale.inspect} for #{field_name} (value: #{value.inspect} #{value.class})"
-            end
-          elsif precision && scale.nil?
-            # for floats, if scale is not set
-
-            #total number of digits is less or equal precision
-            return true if value.gsub(/[^\d]/, '').length <= precision
-
-            #number of digits before decimal == precision, and the number is x.0. same as scale = 0
-            return true if value =~ /\A[+-]?(?:\d{1,#{precision}}(?:\.0)?)\z/
-          else
-            return true if value =~ /\A[+-]?(?:\d+|\d*\.\d+)\z/
-          end
-          error_message ||= ValidationErrors.default_error_message(:not_a_number, field_name)
-        end
-
-        add_error(target, error_message, field_name)
-
-        # TODO: check the gt, gte, lt, lte, and eq options
-
-        return false
-      end
-    end # class NumericValidator
-
-    module ValidatesIsNumber
-
-      # Validate whether a field is numeric
-      #
-      def validates_numericality_of(*fields)
-        opts = opts_from_validator_args(fields)
-        add_validator_to_context(opts, fields, CouchRest::Validation::NumericValidator)
-      end
-      
-      def validates_is_number(*fields)
-        warn "[DEPRECATION] `validates_is_number` is deprecated.  Please use `validates_numericality_of` instead."
-        validates_numericality_of(*fields)
-      end
-
-    end # module ValidatesIsNumber
-  end # module Validation
-end # module CouchRest

data/lib/couchrest/validation/validators/required_field_validator.rb

@@ -1,114 +0,0 @@
-# Extracted from dm-validations 0.9.10
-#
-# Copyright (c) 2007 Guy van den Berg
-# 
-# Permission is hereby granted, free of charge, to any person obtaining
-# a copy of this software and associated documentation files (the
-# "Software"), to deal in the Software without restriction, including
-# without limitation the rights to use, copy, modify, merge, publish,
-# distribute, sublicense, and/or sell copies of the Software, and to
-# permit persons to whom the Software is furnished to do so, subject to
-# the following conditions:
-# 
-# The above copyright notice and this permission notice shall be
-# included in all copies or substantial portions of the Software.
-# 
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
-# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
-# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
-# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-
-module CouchRest
-  module Validation
-
-    ##
-    #
-    # @author Guy van den Berg
-    # @since  0.9
-    class RequiredFieldValidator < GenericValidator
-
-      def initialize(field_name, options={})
-        super
-        @field_name, @options = field_name, options
-      end
-
-      def call(target)
-        value = target.validation_property_value(field_name)
-        property = target.validation_property(field_name.to_s)
-        return true if present?(value, property)
-
-        error_message = @options[:message] || default_error(property)
-        add_error(target, error_message, field_name)
-
-        false
-      end
-
-      protected
-
-      # Boolean property types are considered present if non-nil.
-      # Other property types are considered present if non-blank.
-      # Non-properties are considered present if non-blank.
-      def present?(value, property)
-        boolean_type?(property) ? !value.nil? : !value.blank?
-      end
-
-      def default_error(property)
-        actual = boolean_type?(property) ? :nil : :blank
-        ValidationErrors.default_error_message(actual, field_name)
-      end
-
-      # Is +property+ a boolean property?
-      #
-      # Returns true for Boolean, ParanoidBoolean, TrueClass, etc. properties.
-      # Returns false for other property types.
-      # Returns false for non-properties.
-      def boolean_type?(property)
-        property ? property.type == 'Boolean' : false
-      end
-
-    end # class RequiredFieldValidator
-
-    module ValidatesPresent
-
-      ##
-      # Validates that the specified attribute is present.
-      #
-      # For most property types "being present" is the same as being "not
-      # blank" as determined by the attribute's #blank? method. However, in
-      # the case of Boolean, "being present" means not nil; i.e. true or
-      # false.
-      #
-      # @note
-      #   dm-core's support lib adds the blank? method to many classes,
-      # @see lib/dm-core/support/blank.rb (dm-core) for more information.
-      #
-      # @example [Usage]
-      #
-      #   class Page
-      #
-      #     property :required_attribute, String
-      #     property :another_required, String
-      #     property :yet_again, String
-      #
-      #     validates_presence_of :required_attribute
-      #     validates_presence_of :another_required, :yet_again
-      #
-      #     # a call to valid? will return false unless
-      #     # all three attributes are !blank?
-      #   end
-      def validates_presence_of(*fields)
-        opts = opts_from_validator_args(fields)
-        add_validator_to_context(opts, fields, CouchRest::Validation::RequiredFieldValidator)
-      end
-      
-      def validates_present(*fields)
-        warn "[DEPRECATION] `validates_present` is deprecated.  Please use `validates_presence_of` instead."
-        validates_presence_of(*fields)
-      end
-
-    end # module ValidatesPresent
-  end # module Validation
-end # module CouchRest

data/spec/couchrest/more/attribute_protection_spec.rb

@@ -1,150 +0,0 @@
-require File.expand_path("../../../spec_helper", __FILE__)
-
-describe "ExtendedDocument", "no declarations" do
-  class NoProtection < CouchRest::ExtendedDocument
-    use_database TEST_SERVER.default_database
-    property :name
-    property :phone
-  end
-
-  it "should not protect anything through new" do
-    user = NoProtection.new(:name => "will", :phone => "555-5555")
-
-    user.name.should == "will"
-    user.phone.should == "555-5555"
-  end
-
-  it "should not protect anything through attributes=" do
-    user = NoProtection.new
-    user.attributes = {:name => "will", :phone => "555-5555"}
-
-    user.name.should == "will"
-    user.phone.should == "555-5555"
-  end
-  
-  it "should recreate from the database properly" do
-    user = NoProtection.new
-    user.name = "will"
-    user.phone = "555-5555"
-    user.save!
-    
-    user = NoProtection.get(user.id)
-    user.name.should == "will"
-    user.phone.should == "555-5555"
-  end
-end
-
-describe "ExtendedDocument", "accessible flag" do
-  class WithAccessible < CouchRest::ExtendedDocument
-    use_database TEST_SERVER.default_database
-    property :name, :accessible => true
-    property :admin, :default => false
-  end
-
-  it "should recognize accessible properties" do
-    props = WithAccessible.accessible_properties.map { |prop| prop.name}
-    props.should include("name")
-    props.should_not include("admin")
-  end
-
-  it "should protect non-accessible properties set through new" do
-    user = WithAccessible.new(:name => "will", :admin => true) 
-
-    user.name.should == "will"
-    user.admin.should == false
-  end
-
-  it "should protect non-accessible properties set through attributes=" do
-    user = WithAccessible.new
-    user.attributes = {:name => "will", :admin => true}
-
-    user.name.should == "will"
-    user.admin.should == false
-  end
-end
-
-describe "ExtendedDocument", "protected flag" do
-  class WithProtected < CouchRest::ExtendedDocument
-    use_database TEST_SERVER.default_database
-    property :name
-    property :admin, :default => false, :protected => true
-  end
-
-  it "should recognize protected properties" do
-    props = WithProtected.protected_properties.map { |prop| prop.name}
-    props.should_not include("name")
-    props.should include("admin")
-  end
-
-  it "should protect non-accessible properties set through new" do
-    user = WithProtected.new(:name => "will", :admin => true) 
-
-    user.name.should == "will"
-    user.admin.should == false
-  end
-
-  it "should protect non-accessible properties set through attributes=" do
-    user = WithProtected.new
-    user.attributes = {:name => "will", :admin => true}
-
-    user.name.should == "will"
-    user.admin.should == false
-  end
-end
-
-describe "ExtendedDocument", "protected flag" do
-  class WithBoth < CouchRest::ExtendedDocument
-    use_database TEST_SERVER.default_database
-    property :name, :accessible => true
-    property :admin, :default => false, :protected => true
-  end
-
-  it "should raise an error when both are set" do
-    lambda { WithBoth.new }.should raise_error 
-  end
-end
-
-describe "ExtendedDocument", "from database" do
-  class WithProtected < CouchRest::ExtendedDocument
-    use_database TEST_SERVER.default_database
-    property :name
-    property :admin, :default => false, :protected => true
-    view_by :name
-  end
-  
-  before(:each) do
-    @user = WithProtected.new
-    @user.name = "will"
-    @user.admin = true
-    @user.save!
-  end
-
-  def verify_attrs(user)
-    user.name.should  == "will"
-    user.admin.should == true
-  end
-
-  it "ExtendedDocument#get should not strip protected attributes" do
-    reloaded = WithProtected.get( @user.id )
-    verify_attrs reloaded 
-  end
-
-  it "ExtendedDocument#get! should not strip protected attributes" do
-    reloaded = WithProtected.get!( @user.id )
-    verify_attrs reloaded 
-  end
-
-  it "ExtendedDocument#all should not strip protected attributes" do
-    # all creates a CollectionProxy
-    docs = WithProtected.all(:key => @user.id)
-    docs.size.should == 1
-    reloaded = docs.first
-    verify_attrs reloaded 
-  end
-
-  it "views should not strip protected attributes" do
-    docs = WithProtected.by_name(:startkey => "will", :endkey => "will")
-    reloaded = docs.first
-    verify_attrs reloaded 
-  end
-end

data/spec/couchrest/more/casted_extended_doc_spec.rb

@@ -1,73 +0,0 @@
-require File.expand_path('../../../spec_helper', __FILE__)
-require File.join(FIXTURE_PATH, 'more', 'card')
-
-class Car < CouchRest::ExtendedDocument
-  use_database TEST_SERVER.default_database
-  
-  property :name
-  property :driver, :cast_as => 'Driver'
-end
-
-class Driver < CouchRest::ExtendedDocument
-  use_database TEST_SERVER.default_database
-  # You have to add a casted_by accessor if you want to reach a casted extended doc parent
-  attr_accessor :casted_by
-  
-  property :name
-end
-
-describe "casting an extended document" do
-  
-  before(:each) do
-    @driver = Driver.new(:name => 'Matt')
-    @car    = Car.new(:name => 'Renault 306', :driver => @driver)
-  end
-
-  it "should retain all properties of the casted attribute" do
-    @car.driver.should == @driver
-  end
-  
-  it "should let the casted document know who casted it" do
-    @car.driver.casted_by.should == @car
-  end
-end
-
-describe "assigning a value to casted attribute after initializing an object" do
-
-  before(:each) do
-    @car    = Car.new(:name => 'Renault 306')
-    @driver = Driver.new(:name => 'Matt')
-  end
-  
-  it "should not create an empty casted object" do
-    @car.driver.should be_nil
-  end
-  
-  it "should let you assign the value" do
-    @car.driver = @driver
-    @car.driver.name.should == 'Matt'
-  end
-  
-  it "should cast attribute" do
-    @car.driver = JSON.parse(@driver.to_json)
-    @car.driver.should be_instance_of(Driver)
-  end
-
-end
-
-describe "casting an extended document from parsed JSON" do
-
-  before(:each) do
-    @driver = Driver.new(:name => 'Matt')
-    @car    = Car.new(:name => 'Renault 306', :driver => @driver)
-    @new_car = Car.new(JSON.parse(@car.to_json))
-  end
-
-  it "should cast casted attribute" do
-    @new_car.driver.should be_instance_of(Driver)
-  end
-  
-  it "should retain all properties of the casted attribute" do
-    @new_car.driver.should == @driver
-  end
-end

data/spec/couchrest/more/casted_model_spec.rb

@@ -1,406 +0,0 @@
-# encoding: utf-8
-
-require File.expand_path('../../../spec_helper', __FILE__)
-require File.join(FIXTURE_PATH, 'more', 'card')
-require File.join(FIXTURE_PATH, 'more', 'cat')
-require File.join(FIXTURE_PATH, 'more', 'person')
-require File.join(FIXTURE_PATH, 'more', 'question')
-require File.join(FIXTURE_PATH, 'more', 'course')
-
-
-class WithCastedModelMixin < Hash
-  include CouchRest::CastedModel
-  property :name
-  property :no_value
-  property :details, :type => 'Object', :default => {}
-  property :casted_attribute, :cast_as => 'WithCastedModelMixin'
-end
-
-class DummyModel < CouchRest::ExtendedDocument
-  use_database TEST_SERVER.default_database
-  raise "Default DB not set" if TEST_SERVER.default_database.nil?
-  property :casted_attribute, :cast_as => 'WithCastedModelMixin'
-  property :keywords,         :cast_as => ["String"]
-end
-
-class CastedCallbackDoc < CouchRest::ExtendedDocument
-  use_database TEST_SERVER.default_database
-  raise "Default DB not set" if TEST_SERVER.default_database.nil?
-  property :callback_model, :cast_as => 'WithCastedCallBackModel'
-end
-class WithCastedCallBackModel < Hash
-  include CouchRest::CastedModel
-  include CouchRest::Validation
-  property :name
-  property :run_before_validate
-  property :run_after_validate
-  
-  before_validate do |object|
-    object.run_before_validate = true
-  end
-  after_validate do |object| 
-    object.run_after_validate = true
-  end
-end
-
-describe CouchRest::CastedModel do
-  
-  describe "A non hash class including CastedModel" do
-    it "should fail raising and include error" do
-      lambda do
-        class NotAHashButWithCastedModelMixin
-          include CouchRest::CastedModel
-          property :name
-        end
-        
-      end.should raise_error
-    end
-  end
-  
-  describe "isolated" do
-    before(:each) do
-      @obj = WithCastedModelMixin.new
-    end
-    it "should automatically include the property mixin and define getters and setters" do
-      @obj.name = 'Matt'
-      @obj.name.should == 'Matt' 
-    end
-    
-    it "should allow override of default" do
-      @obj = WithCastedModelMixin.new(:name => 'Eric', :details => {'color' => 'orange'})
-      @obj.name.should == 'Eric'
-      @obj.details['color'].should == 'orange'
-    end
-  end
-  
-  describe "casted as an attribute, but without a value" do
-    before(:each) do
-      @obj = DummyModel.new
-      @casted_obj = @obj.casted_attribute
-    end
-    it "should be nil" do
-      @casted_obj.should == nil
-    end
-  end
-  
-  describe "casted as attribute" do
-    before(:each) do
-      casted = {:name => 'not whatever'}
-      @obj = DummyModel.new(:casted_attribute => {:name => 'whatever', :casted_attribute => casted})
-      @casted_obj = @obj.casted_attribute
-    end
-    
-    it "should be available from its parent" do
-      @casted_obj.should be_an_instance_of(WithCastedModelMixin)
-    end
-    
-    it "should have the getters defined" do
-      @casted_obj.name.should == 'whatever'
-    end
-    
-    it "should know who casted it" do
-      @casted_obj.casted_by.should == @obj
-    end
-
-    it "should return nil for the 'no_value' attribute" do
-      @casted_obj.no_value.should be_nil
-    end
-
-    it "should return nil for the unknown attribute" do
-      @casted_obj["unknown"].should be_nil
-    end
-    
-    it "should return {} for the hash attribute" do
-      @casted_obj.details.should == {}
-    end
-    
-    it "should cast its own attributes" do
-      @casted_obj.casted_attribute.should be_instance_of(WithCastedModelMixin)
-    end
-  end
-  
-  describe "casted as an array of a different type" do
-    before(:each) do
-      @obj = DummyModel.new(:keywords => ['couch', 'sofa', 'relax', 'canapé'])
-    end
-    
-    it "should cast the array propery" do
-      @obj.keywords.should be_an_instance_of(Array)
-      @obj.keywords.first.should == 'couch'
-    end
-  end
-  
-  describe "update attributes without saving" do
-    before(:each) do
-      @question = Question.new(:q => "What is your quest?", :a => "To seek the Holy Grail")
-    end
-    it "should work for attribute= methods" do
-      @question.q.should == "What is your quest?"
-      @question['a'].should == "To seek the Holy Grail"
-      @question.update_attributes_without_saving(:q => "What is your favorite color?", 'a' => "Blue")
-      @question['q'].should == "What is your favorite color?"
-      @question.a.should == "Blue"
-    end
-    
-    it "should also work for attributes= alias" do
-      @question.respond_to?(:attributes=).should be_true
-      @question.attributes = {:q => "What is your favorite color?", 'a' => "Blue"}
-      @question['q'].should == "What is your favorite color?"
-      @question.a.should == "Blue"
-    end
-    
-    it "should flip out if an attribute= method is missing" do
-      lambda {
-        @q.update_attributes_without_saving('foo' => "something", :a => "No green")
-      }.should raise_error(NoMethodError)
-    end
-    
-    it "should not change any attributes if there is an error" do
-      lambda {
-        @q.update_attributes_without_saving('foo' => "something", :a => "No green")
-      }.should raise_error(NoMethodError)
-      @question.q.should == "What is your quest?"
-      @question.a.should == "To seek the Holy Grail"
-    end
-  end
-  
-  describe "saved document with casted models" do
-    before(:each) do
-      reset_test_db!
-      @obj = DummyModel.new(:casted_attribute => {:name => 'whatever'})
-      @obj.save.should be_true
-      @obj = DummyModel.get(@obj.id)
-    end
-    
-    it "should be able to load with the casted models" do
-      casted_obj = @obj.casted_attribute
-      casted_obj.should_not be_nil
-      casted_obj.should be_an_instance_of(WithCastedModelMixin)
-    end
-    
-    it "should have defined getters for the casted model" do
-      casted_obj = @obj.casted_attribute
-      casted_obj.name.should == "whatever"
-    end
-    
-    it "should have defined setters for the casted model" do
-      casted_obj = @obj.casted_attribute
-      casted_obj.name = "test"
-      casted_obj.name.should == "test"
-    end
-    
-    it "should retain an override of a casted model attribute's default" do
-      casted_obj = @obj.casted_attribute
-      casted_obj.details['color'] = 'orange'
-      @obj.save
-      casted_obj = DummyModel.get(@obj.id).casted_attribute
-      casted_obj.details['color'].should == 'orange'
-    end
-    
-  end
-
-  describe "saving document with array of casted models and validation" do
-    before :each do
-      @cat = Cat.new
-      @cat.save
-    end
-
-    it "should save" do
-      toy = CatToy.new :name => "Mouse"
-      @cat.toys.push(toy)
-      @cat.save.should be_true
-      @cat = Cat.get @cat.id
-      @cat.toys.class.should == CastedArray
-      @cat.toys.first.class.should == CatToy
-      @cat.toys.first.should === toy
-    end
-
-    it "should fail because name is not present" do
-      toy = CatToy.new
-      @cat.toys.push(toy)
-      @cat.should_not be_valid
-      @cat.save.should be_false
-    end
-    
-    it "should not fail if the casted model doesn't have validation" do
-      Cat.property :masters, :cast_as => ['Person'], :default => []
-      Cat.validates_presence_of :name
-      cat = Cat.new(:name => 'kitty')
-      cat.should be_valid
-      cat.masters.push Person.new
-      cat.should be_valid
-    end
-  end
-  
-  describe "calling valid?" do
-    before :each do
-      @cat = Cat.new
-      @toy1 = CatToy.new
-      @toy2 = CatToy.new
-      @toy3 = CatToy.new
-      @cat.favorite_toy = @toy1
-      @cat.toys << @toy2
-      @cat.toys << @toy3
-    end
-    
-    describe "on the top document" do
-      it "should put errors on all invalid casted models" do
-        @cat.should_not be_valid
-        @cat.errors.should_not be_empty
-        @toy1.errors.should_not be_empty
-        @toy2.errors.should_not be_empty
-        @toy3.errors.should_not be_empty
-      end
-      
-      it "should not put errors on valid casted models" do
-        @toy1.name = "Feather"
-        @toy2.name = "Twine" 
-        @cat.should_not be_valid
-        @cat.errors.should_not be_empty
-        @toy1.errors.should be_empty
-        @toy2.errors.should be_empty
-        @toy3.errors.should_not be_empty
-      end
-    end
-    
-    describe "on a casted model property" do
-      it "should only validate itself" do
-        @toy1.should_not be_valid
-        @toy1.errors.should_not be_empty
-        @cat.errors.should be_empty
-        @toy2.errors.should be_empty
-        @toy3.errors.should be_empty
-      end
-    end
-    
-    describe "on a casted model inside a casted collection" do
-      it "should only validate itself" do
-        @toy2.should_not be_valid
-        @toy2.errors.should_not be_empty
-        @cat.errors.should be_empty
-        @toy1.errors.should be_empty
-        @toy3.errors.should be_empty
-      end
-    end
-  end
-  
-  describe "calling new? on a casted model" do
-    before :each do
-      reset_test_db!
-      @cat = Cat.new(:name => 'Sockington')
-      @favorite_toy = CatToy.new(:name => 'Catnip Ball')
-      @cat.favorite_toy = @favorite_toy
-      @cat.toys << CatToy.new(:name => 'Fuzzy Stick')
-    end
-    
-    it "should be true on new" do
-      CatToy.new.should be_new
-      CatToy.new.new_record?.should be_true
-    end
-    
-    it "should be true after assignment" do
-      @cat.should be_new
-      @cat.favorite_toy.should be_new
-      @cat.toys.first.should be_new
-    end
-    
-    it "should not be true after create or save" do
-      @cat.create
-      @cat.save
-      @cat.favorite_toy.should_not be_new
-      @cat.toys.first.should_not be_new
-    end
-    
-    it "should not be true after get from the database" do
-      @cat.save
-      @cat = Cat.get(@cat.id)
-      @cat.favorite_toy.should_not be_new
-      @cat.toys.first.should_not be_new
-    end
-    
-    it "should still be true after a failed create or save" do
-      @cat.name = nil
-      @cat.create.should be_false
-      @cat.save.should be_false
-      @cat.favorite_toy.should be_new
-      @cat.toys.first.should be_new
-    end
-  end
-  
-  describe "calling base_doc from a nested casted model" do
-    before :each do
-      @course = Course.new(:title => 'Science 101')
-      @professor = Person.new(:name => 'Professor Plum')
-      @cat = Cat.new(:name => 'Scratchy')
-      @toy1 = CatToy.new
-      @toy2 = CatToy.new
-      @course.professor = @professor
-      @professor.pet = @cat
-      @cat.favorite_toy = @toy1
-      @cat.toys << @toy2
-    end
-    
-    it "should reference the top document for" do
-      @course.base_doc.should === @course
-      @professor.casted_by.should === @course
-      @professor.base_doc.should === @course
-      @cat.base_doc.should === @course
-      @toy1.base_doc.should === @course
-      @toy2.base_doc.should === @course
-    end
-    
-    it "should call setter on top document" do
-      @toy1.base_doc.should_not be_nil
-      @toy1.base_doc.title = 'Tom Foolery'
-      @course.title.should == 'Tom Foolery'
-    end
-    
-    it "should return nil if not yet casted" do
-      person = Person.new
-      person.base_doc.should == nil
-    end
-  end
-  
-  describe "calling base_doc.save from a nested casted model" do
-    before :each do
-      reset_test_db!
-      @cat = Cat.new(:name => 'Snowball')
-      @toy = CatToy.new
-      @cat.favorite_toy = @toy
-    end
-    
-    it "should not save parent document when casted model is invalid" do
-      @toy.should_not be_valid
-      @toy.base_doc.save.should be_false
-      lambda{@toy.base_doc.save!}.should raise_error
-    end
-    
-    it "should save parent document when nested casted model is valid" do
-      @toy.name = "Mr Squeaks"
-      @toy.should be_valid
-      @toy.base_doc.save.should be_true
-      lambda{@toy.base_doc.save!}.should_not raise_error
-    end
-  end
-  
-  describe "callbacks" do
-    before(:each) do
-      @doc = CastedCallbackDoc.new
-      @model = WithCastedCallBackModel.new
-      @doc.callback_model = @model
-    end
-    
-    describe "validate" do
-      it "should run before_validate before validating" do
-        @model.run_before_validate.should be_nil
-        @model.should be_valid
-        @model.run_before_validate.should be_true
-      end
-      it "should run after_validate after validating" do
-        @model.run_after_validate.should be_nil
-        @model.should be_valid
-        @model.run_after_validate.should be_true
-      end      
-    end
-  end
-end