rod 0.7.1 → 0.7.2

data/spec/collection_proxy.rb

@@ -0,0 +1,38 @@
+require 'bundler/setup'
+require 'minitest/autorun'
+require 'rod'
+require 'mocha'
+
+# TODO translate collection proxy feature into spec.
+describe Rod::CollectionProxy do
+  describe "a persisted collection proxy" do
+    before do
+      @size = 10
+      @offset = 0
+      @db = Object.new
+      @size.times do |index|
+        @db.expects(:join_index).with(@offset,index).returns(index+1).at_least(0)
+      end
+      @proxy = Rod::CollectionProxy.new(@size,@db,@offset,Rod::Model)
+    end
+
+    describe "with another collection proxy" do
+      before do
+        size = 10
+        size.times do |index|
+          # these collections have 5 rod_ids in common (6 = 1 + 5, 0 for nil objects)
+          @db.expects(:join_index).with(@size,index).returns(index+6).at_least(0)
+        end
+        @other_proxy = Rod::CollectionProxy.new(size,@db,@size,Rod::Model)
+      end
+
+      it "should be possible to compute their intersection" do
+        (@proxy & @other_proxy).size.must_equal 5
+      end
+
+      it "should be possible to compute their sum" do
+        (@proxy | @other_proxy).size.must_equal 15
+      end
+    end
+  end
+end

data/spec/database.rb

@@ -0,0 +1,36 @@
+require 'bundler/setup'
+require 'minitest/autorun'
+require 'rod'
+
+describe Rod::Database do
+  describe "a database" do
+    it "should allow to create itself without a block given" do
+      database = Rod::Database.instance
+      database.opened?.must_equal false
+      database.create_database("tmp/without_block")
+      database.opened?.must_equal true
+      database.close_database
+      database.opened?.must_equal false
+    end
+
+    it "should allow to create itself with a block given" do
+      database = Rod::Database.instance
+      database.opened?.must_equal false
+      database.create_database("tmp/without_block") do
+        database.opened?.must_equal true
+      end
+      database.opened?.must_equal false
+    end
+
+    it "should close itself on create even if an exception is raised" do
+      database = Rod::Database.instance
+      (proc do
+        database.create_database("tmp/block_exception") do
+          database.opened?.must_equal true
+          raise "Runtime exception"
+        end
+      end).must_raise RuntimeError
+      database.opened?.must_equal false
+    end
+  end
+end

data/spec/model.rb

@@ -0,0 +1,26 @@
+require 'bundler/setup'
+require 'minitest/autorun'
+require 'rod'
+
+class User < Rod::Model
+  database_class Rod::Database
+end
+
+describe Rod::Model do
+  describe "a model" do
+    before do
+      @database = Rod::Database.instance
+      @database.create_database("tmp/model")
+    end
+
+    after do
+      @database.close_database
+    end
+
+    it "should return nil if index in #[] is out of scope" do
+      User[0].must_equal nil
+      User[1].must_equal nil
+      User[-1].must_equal nil
+    end
+  end
+end

data/spec/property/base.rb

@@ -0,0 +1,73 @@
+require 'bundler/setup'
+require 'minitest/autorun'
+require 'rod'
+
+describe Rod::Property::Base do
+  describe "a property" do
+    before do
+      @klass = MiniTest::Mock.new
+      @klass.expect :nil?,false
+      @field = Rod::Property::Field.new(@klass,:user_name,:string)
+    end
+
+    after do
+      @klass.verify
+    end
+
+    it "must have proper name" do
+      @field.name.must_equal :user_name
+    end
+
+    it "must have proper type" do
+      @field.type.must_equal :string
+    end
+
+    it "must produce its metadata" do
+      @field.metadata.wont_be_nil
+    end
+
+    it "must covert to C struct" do
+      @field.to_c_struct.wont_be_nil
+    end
+
+    it "must produce its layout" do
+      @field.layout.wont_be_nil
+    end
+
+    it "must not have an index" do
+      @field.has_index?.wont_equal true
+    end
+  end
+
+  describe "an indexed property" do
+    before do
+      @klass = MiniTest::Mock.new
+      @klass.expect :nil?,false
+      @field = Rod::Property::Field.new(@klass,:user_name,:string,:index => :flat)
+    end
+
+    it "must have an index" do
+      @field.has_index?.must_equal true
+    end
+
+    it "must return an index" do
+      database = MiniTest::Mock.new
+      database.expect :path,"path"
+      @klass.expect :database,database
+      @klass.expect :model_path,"model_path"
+      @field.index.wont_be_nil
+      database.verify
+    end
+
+    it "must define finders" do
+      database = MiniTest::Mock.new
+      database.expect :nil?,false
+      database.expect :path,"path"
+      @klass.expect :database,database
+      @klass.expect :model_path,"model_path"
+      @field.define_finders
+      proc {@klass.find_by_user_name("Name")}.must_be_silent
+      database.verify
+    end
+  end
+end

data/spec/property/field.rb

@@ -0,0 +1,244 @@
+require 'bundler/setup'
+require 'minitest/autorun'
+require 'rod'
+
+describe Rod::Property::Field do
+  before do
+    @klass = MiniTest::Mock.new
+    @klass.expect :nil?,false
+  end
+
+  after do
+    @klass.verify
+  end
+
+  describe "a generic field" do
+    before do
+      @builder = MiniTest::Mock.new
+      @field = Rod::Property::Field.new(@klass,:user_name,:string)
+    end
+
+    after do
+      @builder.verify
+    end
+
+    it "must be a field" do
+      @field.field?.must_equal true
+    end
+
+    it "must not be an association" do
+      @field.association?.wont_equal true
+    end
+
+    it "must define C accessors" do
+      @klass.expect :struct_name, "struct_name"
+      @builder.expect :c,nil,[String]
+      @field.define_c_accessors(@builder)
+    end
+
+    it "must seal C accessors" do
+      @klass.expect :send,nil,[:private,String]
+      @field.seal_c_accessors
+    end
+
+    it "must define getter" do
+      @klass.expect :send,nil,[:define_method,"user_name"]
+      @klass.expect :database,nil
+      @field.define_getter
+    end
+
+    it "must define setter" do
+      @klass.expect :send,nil,[:define_method,"user_name="]
+      @field.define_setter
+    end
+  end
+
+  describe "a string field" do
+    before do
+      @field = Rod::Property::Field.new(@klass,:user_name,:string)
+    end
+
+    it "must have string type" do
+      @field.type.must_equal :string
+    end
+
+    it "must have empty string as default value" do
+      @field.default_value.must_equal ''
+    end
+
+    it "must be a variable size field" do
+      @field.variable_size?.must_equal true
+    end
+
+    it "must set utf-8 encoding for dumped value" do
+      @field.dump("string").encoding.must_equal Encoding.find("utf-8")
+    end
+
+    it "must set utf-8 encoding for loaded value" do
+      @field.load("string").encoding.must_equal Encoding.find("utf-8")
+    end
+
+    it "must not be an identifier" do
+      @field.identifier?.wont_equal true
+    end
+
+    it "must produce proper metadata" do
+      @field.metadata.must_equal({:type => :string})
+    end
+  end
+
+  describe "an object field" do
+    before do
+      @field = Rod::Property::Field.new(@klass,:tag,:object)
+    end
+
+    it "must have object type" do
+      @field.type.must_equal :object
+    end
+
+    it "must have nil as default value" do
+      @field.default_value.must_equal nil
+    end
+
+    it "must be a variable size field" do
+      @field.variable_size?.must_equal true
+    end
+
+    it "must marshal dumped value" do
+      @field.dump(:value).must_equal Marshal::dump(:value)
+    end
+
+    it "must unmarshal loaded value" do
+      @field.load(Marshal::dump(:value)).must_equal :value
+    end
+
+    it "must produce proper metadata" do
+      @field.metadata.must_equal({:type => :object})
+    end
+  end
+
+  describe "a json field" do
+    before do
+      @field = Rod::Property::Field.new(@klass,:tag,:json)
+    end
+
+    it "must have json type" do
+      @field.type.must_equal :json
+    end
+
+    it "must have nil as default value" do
+      @field.default_value.must_equal nil
+    end
+
+    it "must be a variable size field" do
+      @field.variable_size?.must_equal true
+    end
+
+    it "must convert to json dumped value" do
+      @field.dump("value").must_equal JSON::dump(["value"])
+    end
+
+    it "must convert from json loaded value" do
+      @field.load(JSON::dump(["value"])).must_equal "value"
+    end
+
+    it "must produce proper metadata" do
+      @field.metadata.must_equal({:type => :json})
+    end
+  end
+
+  describe "an integer field" do
+    before do
+      @field = Rod::Property::Field.new(@klass,:tag,:integer)
+    end
+
+    it "must have integer type" do
+      @field.type.must_equal :integer
+    end
+
+    it "must have 0 as default value" do
+      @field.default_value.must_equal 0
+    end
+
+    it "must not be a variable size field" do
+      @field.variable_size?.wont_equal true
+    end
+
+    it "must pass dumped value" do
+      @field.dump(-10).must_equal -10
+    end
+
+    it "must pass loaded value" do
+      @field.load(-10).must_equal -10
+    end
+
+    it "must produce proper metadata" do
+      @field.metadata.must_equal({:type => :integer})
+    end
+  end
+
+  describe "a float field" do
+    before do
+      @field = Rod::Property::Field.new(@klass,:tag,:float)
+    end
+
+    it "must have float type" do
+      @field.type.must_equal :float
+    end
+
+    it "must have 0.0 as default value" do
+      @field.default_value.must_equal 0.0
+    end
+
+    it "must not be a variable size field" do
+      @field.variable_size?.wont_equal true
+    end
+
+    it "must pass dumped value" do
+      @field.dump(-10.0).must_equal -10.0
+    end
+
+    it "must pass loaded value" do
+      @field.load(-10.0).must_equal -10.0
+    end
+
+    it "must produce proper metadata" do
+      @field.metadata.must_equal({:type => :float})
+    end
+  end
+
+  describe "an ulong field" do
+    before do
+      @field = Rod::Property::Field.new(@klass,:tag,:ulong)
+    end
+
+    it "must have ulong type" do
+      @field.type.must_equal :ulong
+    end
+
+    it "must have 0 as default value" do
+      @field.default_value.must_equal 0
+    end
+
+    it "must not be a variable size field" do
+      @field.variable_size?.wont_equal true
+    end
+
+    it "must pass dumped value if it is greater or equals 0" do
+      @field.dump(10.0).must_equal 10.0
+      @field.dump(0).must_equal 0
+    end
+
+    it "must raise exception when dumping value lower than 0" do
+      proc {@field.dump(-10)}.must_raise Rod::InvalidArgument
+    end
+
+    it "must pass loaded value" do
+      @field.load(10).must_equal 10
+    end
+
+    it "must produce proper metadata" do
+      @field.metadata.must_equal({:type => :ulong})
+    end
+  end
+end

data/spec/property/plural_association.rb

@@ -0,0 +1,67 @@
+require 'bundler/setup'
+require 'minitest/autorun'
+require 'rod'
+
+describe Rod::Property::PluralAssociation do
+  before do
+    @klass = MiniTest::Mock.new
+    @builder = MiniTest::Mock.new
+    @klass.expect :nil?,false
+  end
+
+  after do
+    @klass.verify
+    @builder.verify
+  end
+
+  describe "a plural association" do
+    before do
+      @association = Rod::Property::PluralAssociation.new(@klass,:users,
+                                                         :polymorphic => true)
+    end
+
+    it "must not be a field" do
+      @association.field?.wont_equal true
+    end
+
+    it "must be an association" do
+      @association.association?.must_equal true
+    end
+
+    it "must not be a singular association" do
+      @association.singular?.wont_equal true
+    end
+
+    it "must be a plural association" do
+      @association.plural?.must_equal true
+    end
+
+    it "must produce proper metadata" do
+      @association.metadata.must_equal({:polymorphic => true})
+    end
+
+    it "must define C accessors" do
+      @klass.expect :struct_name, "struct_name"
+      @builder.expect :c,nil,[String]
+      @association.define_c_accessors(@builder)
+    end
+
+    it "must seal C accessors" do
+      @klass.expect :send,nil,[:private,String]
+      @association.seal_c_accessors
+    end
+
+    it "must define getter" do
+      @klass.expect :send,nil,[:define_method,"users"]
+      @klass.expect :scope_name,"Rod"
+      @klass.expect :database, nil
+      @association.define_getter
+    end
+
+    it "must define setter" do
+      @klass.expect :send,nil,[:define_method,"users="]
+      @association.define_setter
+    end
+  end
+end
+