vagas-orientdb4r 0.5.2

data/test/test_ddo.rb

@@ -0,0 +1,237 @@
+require 'test_helper'
+
+###
+# This class tests Data Definition Operarions.
+class TestDdo < Test::Unit::TestCase
+
+  CLASS = 'testing'
+  DB = 'temp'
+
+  def initialize(params)
+    super params
+    @client = Orientdb4r.client
+  end
+
+  def setup
+    @client.connect :database => DB, :user => 'admin', :password => 'admin'
+  end
+
+  def teardown
+    # remove the testing class after each test
+    @client.drop_class(CLASS, :mode => :strict)
+    @client.disconnect
+  end
+
+
+  ###
+  # GET - Class
+  def test_get_class
+    assert_nothing_thrown do ouser = @client.get_class 'OUser'; end
+    # class does not exist
+    assert_raise Orientdb4r::NotFoundError do @client.get_class 'OUserXXX'; end
+
+    clazz = @client.get_class 'OUser'
+    # test OClass
+    assert_equal 'OUser', clazz.name
+    assert_nothing_thrown do clazz.properties; end
+    assert_instance_of Array, clazz.properties
+    assert !clazz.properties.empty?
+    assert_nothing_thrown do clazz.property(:password); end
+    assert_raise ArgumentError do clazz.property(:unknown_prop); end
+    assert_equal 'OIdentity', clazz.super_class
+    assert_instance_of Array, clazz.clusters
+    assert !clazz.clusters.empty?
+    assert_not_nil clazz.default_cluster
+    assert clazz.kind_of? Orientdb4r::OClass
+    assert !clazz.abstract?
+    # test Property
+    prop = clazz.property :password
+    assert_equal 'password', prop.name
+    assert_equal 'STRING', prop.type
+    assert prop.mandatory
+    assert prop.not_null
+    assert_nil prop.min
+    assert_nil prop.min
+    assert prop.kind_of? Orientdb4r::Property
+
+    assert @client.class_exists?('OUser')
+    assert !@client.class_exists?('UnknownClass')
+  end
+
+
+  ###
+  # CREATE CLASS
+  def test_create_class
+    assert !@client.class_exists?(CLASS)
+    assert_nothing_thrown do @client.create_class(CLASS); end
+    assert @client.class_exists?(CLASS)
+    assert_nothing_thrown do @client.get_class(CLASS); end # raises an Error if no class found
+    # already exist
+    assert_raise Orientdb4r::ServerError do @client.create_class(CLASS); end
+
+    # create with :force=>true
+    assert_nothing_thrown do @client.create_class(CLASS, :force => true); end
+    assert_nothing_thrown do @client.get_class(CLASS); end
+
+    # create ABSTRACT
+    ab_class = 'testingAbstr'
+    assert_nothing_thrown do @client.create_class(ab_class, :abstract => true); end
+    clazz = @client.get_class ab_class
+    assert clazz.abstract?
+    assert_raise Orientdb4r::ServerError do @client.create_document({ '@class' => ab_class, 'prop1' => 1 }); end
+    # clean up
+    @client.drop_class(ab_class, :mode => :strict)
+  end
+
+
+  ###
+  # CREATE CLASS ... EXTENDS
+  def test_create_class_extends
+    assert_nothing_thrown do @client.create_class(CLASS, :extends => 'OUser'); end
+    assert_nothing_thrown do @client.get_class(CLASS); end
+    clazz = @client.get_class(CLASS)
+    assert_equal 'OUser', clazz.super_class
+
+    # bad super class
+    assert_raise Orientdb4r::InvalidRequestError do @client.create_class(CLASS, :extends => 'nonExistingSuperClass'); end
+  end
+
+
+  ###
+  # DROP TABLE
+  def test_drop_class
+    super_clazz = "#{CLASS}Sup"
+    @client.drop_class(super_clazz); # just to be sure if previous test failed
+    @client.create_class(super_clazz);
+    @client.create_class(CLASS);
+    assert_nothing_thrown do @client.drop_class(CLASS); end
+    assert_raise Orientdb4r::NotFoundError do @client.get_class(CLASS); end # no info more
+    # the class is not visible in class list delivered by connect
+    db_info = @client.get_database
+    assert db_info['classes'].select { |i| i.name == CLASS }.empty?
+
+    # CLASS extends super_class
+    @client.create_class(CLASS, :extends => super_clazz);
+    assert_raise Orientdb4r::OrientdbError do @client.drop_class(super_clazz, :mode => :strict); end
+    assert_nothing_thrown do @client.get_class(super_clazz); end # still there
+    @client.drop_class(CLASS);
+    assert_nothing_thrown do @client.drop_class(super_clazz, :mode => :strict); end
+  end
+
+
+  ###
+  # CREATE PROPERTY
+  def test_create_property
+    @client.create_class(CLASS)
+    assert_nothing_thrown do @client.create_property(CLASS, 'prop1', :integer); end
+    clazz = @client.get_class(CLASS)
+    assert_equal 'INTEGER', clazz.property(:prop1).type
+    assert_nil clazz.property(:prop1).linked_class
+
+    # already exist
+    assert_raise Orientdb4r::ServerError do @client.create_property(CLASS, 'prop1', :integer); end
+  end
+
+
+  ###
+  # CREATE PROPERTY (linked-type)
+  def test_create_linkedtype
+    @client.create_class(CLASS)
+    assert_nothing_thrown do @client.create_property(CLASS, 'friends', :linkset, :linked_class => 'OUser'); end
+    clazz = @client.get_class(CLASS)
+    assert_equal 'LINKSET', clazz.property(:friends).type
+    assert_equal 'OUser', clazz.property(:friends).linked_class
+
+    # unknow linked-class
+    assert_raise Orientdb4r::ServerError do
+      @client.create_property(CLASS, 'friends2', :linkset, :linked_class => 'UnknownClass')
+    end
+
+    # already exist
+    assert_raise Orientdb4r::ServerError do
+      @client.create_property(CLASS, 'friends', :linkset, :linked_class => 'OUser');
+    end
+  end
+
+
+  ###
+  # CREATE CLASS + PROPERTY
+  def test_create_class_with_properties
+    assert_nothing_thrown do
+      @client.create_class(CLASS) do |c|
+        c.property 'prop1', :integer
+        c.property 'prop2', :string, :mandatory => true, :notnull => true, :readonly => true, :min => 1, :max => 99
+        c.link     'user',  :linkset, 'OUser', :mandatory => true
+      end
+    end
+
+    clazz = @client.get_class(CLASS)
+    assert_equal 3, clazz.properties.size
+
+    prop1 = clazz.property(:prop1)
+    assert_equal 'INTEGER', prop1.type
+    assert !prop1.mandatory
+    assert !prop1.not_null
+    assert !prop1.read_only
+    assert_nil prop1.min
+    assert_nil prop1.max
+    assert_nil prop1.linked_class
+
+    prop2 = clazz.property(:prop2)
+    assert_equal 'STRING', prop2.type
+    assert prop2.mandatory
+    assert prop2.not_null
+    assert prop2.read_only
+    assert_equal '1', prop2.min
+    assert_equal '99',  prop2.max
+    assert_nil prop2.linked_class
+
+    user = clazz.property(:user)
+    assert_equal 'LINKSET', user.type
+    assert user.mandatory
+    assert !user.not_null
+    assert !user.read_only
+    assert_nil user.min
+    assert_nil user.max
+    assert_equal 'OUser', user.linked_class
+
+
+    # properties direct as parametr
+    @client.drop_class CLASS
+    assert_nothing_thrown do
+      @client.create_class(CLASS, :properties => [
+          { :property => 'prop1_q', :type => :integer },
+          { :property => 'prop2_q', :type => :string, :mandatory => true, :notnull => true, :min => 1, :max => 99 },
+          { :property => 'user_q',  :type => :linkset, :linked_class => 'OUser', :mandatory => true }
+      ])
+    end
+
+    clazz = @client.get_class(CLASS)
+    assert_equal 3, clazz.properties.size
+
+    prop1 = clazz.property(:prop1_q)
+    assert_equal 'INTEGER', prop1.type
+    assert !prop1.mandatory
+    assert !prop1.not_null
+    assert_nil prop1.min
+    assert_nil prop1.max
+    assert_nil prop1.linked_class
+
+    prop2 = clazz.property(:prop2_q)
+    assert_equal 'STRING', prop2.type
+    assert prop2.mandatory
+    assert prop2.not_null
+    assert_equal '1', prop2.min
+    assert_equal '99',  prop2.max
+    assert_nil prop2.linked_class
+
+    user = clazz.property(:user_q)
+    assert_equal 'LINKSET', user.type
+    assert user.mandatory
+    assert !user.not_null
+    assert_nil user.min
+    assert_nil user.max
+    assert_equal 'OUser', user.linked_class
+  end
+
+end

data/test/test_dmo.rb

@@ -0,0 +1,115 @@
+require 'test_helper'
+
+###
+# This class tests Data Manipulation Operarions.
+class TestDmo < Test::Unit::TestCase
+  include Orientdb4r::Utils
+
+  CLASS = 'testing'
+  DB = 'temp'
+
+  def setup
+    @client = Orientdb4r.client
+    @client.connect :database => DB, :user => 'admin', :password => 'admin'
+    @client.drop_class(CLASS) # just to be sure if the previous test failed
+    @client.create_class(CLASS) do |c|
+      c.property 'prop1', :integer
+      c.property 'prop2', :string, :mandatory => true, :notnull => :true, :min => 1, :max => 99
+      c.link     'friends',  :linkset, 'OUser', :mandatory => true
+    end
+    @admin = @client.query("SELECT FROM OUser WHERE name = 'admin'")[0]
+  end
+
+  def teardown
+    # remove the testing class after each test
+    @client.drop_class(CLASS)
+    @client.disconnect
+  end
+
+
+  ###
+  # INSERT INTO
+  def test_insert
+    assert_nothing_thrown do
+      1.upto(10) do |i|
+        @client.command "INSERT INTO #{CLASS} (prop1, prop2, friends) VALUES (#{i}, '#{random_string}', [#{@admin['@rid']}])"
+      end
+    end
+
+    entries = @client.query("SELECT FROM #{CLASS}")
+    assert_equal 10, entries.size
+    assert_equal 10, entries.select { |e| e if e['prop1'] <= 10 }.size
+    assert_equal 10, entries.select { |e| e if e['friends'].size == 1 }.size
+
+    # insert more users into LINKSET
+    urids = @client.query('SELECT FROM OUser').collect { |u| u['@rid'] }
+    assert_nothing_thrown do
+      @client.command "INSERT INTO #{CLASS} (prop1, prop2, friends) VALUES (1, 'linkset', [#{urids.join(',')}])"
+    end
+    assert_equal urids.size, @client.query("SELECT FROM #{CLASS} WHERE prop2 = 'linkset'")[0]['friends'].size
+
+    # table doesn't exist
+    assert_raise Orientdb4r::InvalidRequestError do
+      @client.command "INSERT INTO #{CLASS}x (prop1, prop2, friends) VALUES (1, 'linkset', [#{urids.join(',')}])"
+    end
+    # bad syntax
+    assert_raise Orientdb4r::ServerError do
+      @client.command 'xxx'
+    end
+
+    # used for SELECT
+    assert_equal @client.query('SELECT FROM OUser'), @client.command('SELECT FROM OUser')['result']
+  end
+
+
+  ###
+  # SELECT
+  def test_query
+    1.upto(25) do |i|
+      @client.command "INSERT INTO #{CLASS} (prop1, prop2, friends) VALUES (#{i}, 'string#{i}', [#{@admin['@rid']}])"
+    end
+
+    entries = @client.query("SELECT FROM #{CLASS}")
+    assert_not_nil entries
+    assert_instance_of Array, entries
+    assert_equal 20, entries.size # 20 is default limit
+    entries.each { |doc| assert doc.kind_of? Orientdb4r::DocumentMetadata }
+    entries.each { |doc| assert_instance_of Orientdb4r::Rid, doc.doc_rid }
+    # limit
+    assert_equal 5, @client.query("SELECT FROM #{CLASS} LIMIT 5").size
+    entries = @client.query "SELECT FROM #{CLASS}", :limit => 100
+    assert_equal 25, entries.size
+    assert_raise ArgumentError do @client.query "SELECT FROM #{CLASS}", :unknown => 100; end
+
+    assert_equal 1, @client.query("SELECT FROM #{CLASS} WHERE prop1 = 1").size
+    assert_equal 0, @client.query("SELECT FROM #{CLASS} WHERE prop1 = -1").size
+    # graph
+    rid = @client.query("SELECT FROM #{CLASS} WHERE prop1 = 1")[0]['@rid']
+    gr = @client.query("SELECT FROM (TRAVERSE * FROM #{rid})")
+    assert_equal 3, gr.size # entries: testing, OUser, ORole
+    assert_equal 1, gr.select { |e| e if e['@class'] == CLASS }.size
+    assert_equal 1, gr.select { |e| e if e['@class'] == 'OUser' }.size
+    assert_equal 1, gr.select { |e| e if e['@class'] == 'ORole' }.size
+
+    # table doesn't exist
+    assert_raise Orientdb4r::InvalidRequestError do
+      @client.query 'SELECT FROM OUserX'
+    end
+    # bad syntax
+    assert_raise Orientdb4r::ServerError do
+      @client.query 'xxx'
+    end
+    # record not found in existing cluster
+    entries = @client.query 'SELECT FROM #0:1111'
+    assert_not_nil entries
+    assert_instance_of Array, entries
+    assert entries.empty?
+    # try to find entry in a non-existing cluster
+    assert_raise Orientdb4r::NotFoundError do @client.query 'SELECT FROM #111:1111'; end
+    # used for INSERT
+    assert_raise Orientdb4r::ServerError do
+      @client.query "INSERT INTO #{CLASS} (prop1, prop2, friends) VALUES (0, 'string0', [])"
+    end
+  end
+
+end

data/test/test_document_crud.rb

@@ -0,0 +1,184 @@
+require 'test_helper'
+
+###
+# This class tests CRUD operarions on document.
+class TestDocumentCrud < Test::Unit::TestCase
+  include Orientdb4r::Utils
+
+  CLASS = 'testing'
+  DB = 'temp'
+
+  def setup
+    @client = Orientdb4r.client
+    @client.connect :database => DB, :user => 'admin', :password => 'admin'
+    @client.create_class(CLASS) do |c|
+      c.property 'prop1', :integer, :notnull => :true, :min => 1, :max => 99
+      c.property 'prop2', :string, :mandatory => true
+    end
+  end
+
+  def teardown
+    # remove the testing class after each test
+    @client.drop_class(CLASS)
+    @client.disconnect
+  end
+
+
+  ###
+  # CREATE
+  def test_create_document
+    assert_nothing_thrown do @client.create_document( { '@class' => CLASS, 'prop1' => 99, 'prop2' => 'ipsum lorem' }); end
+    doc = @client.create_document({ '@class' => CLASS, 'prop1' => 1, 'prop2' => 'text' })
+    assert_instance_of Hash, doc
+    assert_not_nil doc.doc_rid
+    assert_instance_of Orientdb4r::Rid, doc.doc_rid
+    assert_equal CLASS, doc.doc_class
+    assert doc.doc_version >= 1 # https://github.com/orientechnologies/orientdb/issues/3656
+
+    # no effect if a define the version
+    # doc = @client.create_document({ '@class' => CLASS, '@version' => 2, 'prop1' => 1, 'prop2' => 'text' })
+    # OrientDB bug https://github.com/orientechnologies/orientdb/issues/3657
+    # assert_equal 0, doc.doc_version
+
+    # no effect if an unknown class
+    doc = @client.create_document({ '@class' => 'unknown_class', 'a' => 11, 'b' => 'text1' })
+    assert_equal 'unknown_class', doc.doc_class
+    assert_equal 11, doc['a']
+    assert_equal 'text1', doc['b']
+    # or missing class
+    assert_nothing_thrown do @client.create_document({ 'a' => 1, 'b' => 'text' }); end
+
+    # no mandatory property
+    assert_raise Orientdb4r::DataError do @client.create_document({ '@class' => CLASS, 'prop1' => 1 }); end
+    # notNull is null, or lesser/bigger
+    assert_raise Orientdb4r::DataError do
+      @client.create_document({ '@class' => CLASS, 'prop1' => nil, 'prop2' => 'text' })
+    end
+    assert_raise Orientdb4r::DataError do
+      @client.create_document({ '@class' => CLASS, 'prop1' => 0, 'prop2' => 'text' })
+    end
+    assert_raise Orientdb4r::DataError do
+      @client.create_document({ '@class' => CLASS, 'prop1' => 100, 'prop2' => 'text' })
+    end
+  end
+
+  ###
+  # GET
+  def test_get_document
+    created = @client.create_document( { '@class' => CLASS, 'prop1' => 1, 'prop2' => 'text' })
+
+    doc = @client.get_document created.doc_rid
+    assert_equal CLASS, doc.doc_class
+    assert_equal created.doc_rid, doc.doc_rid
+    assert doc.doc_version >= 1 # https://github.com/orientechnologies/orientdb/issues/3657
+    assert_equal 'd', doc.doc_type
+    assert_equal 1, doc['prop1']
+    assert_equal 'text', doc['prop2']
+    assert_nil doc['unknown_property']
+    assert doc.kind_of? Orientdb4r::DocumentMetadata
+
+    # not existing RID
+    rid1 = Orientdb4r::Rid.new("#{created.doc_rid.cluster_id}:#{created.doc_rid.document_id + 1}") # '#6:0' > '#6:1' or '#6:11' > '#6:12'
+    assert_raise Orientdb4r::NotFoundError do @client.get_document rid1; end
+    # bad RID format
+    assert_raise ArgumentError do @client.get_document('xx'); end
+  end
+
+  ###
+  # UPDATE
+  def test_update_document
+    created = @client.create_document( { '@class' => CLASS, 'prop1' => 1, 'prop2' => 'text' })
+    doc = @client.get_document created.doc_rid
+
+    doc['prop1'] = 2
+    doc['prop2'] = 'unit'
+    assert_nothing_thrown do @client.update_document doc; end
+    doc = @client.get_document created.doc_rid
+    assert_equal 2, doc['prop1']
+    assert_equal 'unit', doc['prop2']
+
+    # bad version
+    doc = @client.get_document created.doc_rid
+    doc['prop1'] = 222 # a property has to be changed to server engine sees a difference
+    doc['@version'] = 2
+    assert_raise Orientdb4r::DataError do @client.update_document doc; end
+
+    # class cannot be changed
+    doc = @client.get_document created.doc_rid
+    doc['@class'] = 'OUser'
+    assert_nothing_thrown do @client.update_document doc; end
+    assert_equal CLASS, @client.get_document(created.doc_rid).doc_class
+
+    # no mandatory property
+    doc = @client.get_document created.doc_rid
+    doc.delete 'prop2'
+    assert_raise Orientdb4r::DataError do @client.update_document doc; end
+    # notNull is null, or lesser/bigger
+    doc = @client.get_document created.doc_rid
+    doc['prop1'] = nil
+    assert_raise Orientdb4r::DataError do @client.update_document doc; end
+  end
+
+
+  ###
+  # DELETE
+  def test_delete_document
+    doc = @client.create_document( { '@class' => CLASS, 'prop1' => 1, 'prop2' => 'text' })
+    assert_not_nil doc
+
+    assert_nothing_thrown do @client.delete_document doc.doc_rid; end
+    assert_raise Orientdb4r::NotFoundError do @client.get_document doc.doc_rid; end
+
+    # already deleted
+    assert_raise Orientdb4r::NotFoundError do @client.delete_document doc.doc_rid; end
+
+    # not existing RID
+    assert_raise Orientdb4r::NotFoundError do @client.delete_document '#4:1111'; end
+    # bad RID format
+    assert_raise ArgumentError do @client.delete_document 'xx'; end
+  end
+
+
+  #######################
+  # BATCH
+  #######################
+
+  def test_batch_ok
+    doc = @client.create_document( { '@class' => CLASS, 'prop1' => 1, 'prop2' => 'text' })
+    rslt = @client.batch({:transaction => true, :operations => [
+      {:type => :c, :record => {'@class' => CLASS, :prop2 => 'foo'}},
+      {:type => :d, :record => {'@rid' => doc.doc_rid}}
+    ]})
+    assert_instance_of Hash, rslt
+    assert_equal 1, @client.query("SELECT count(*) FROM #{CLASS}")[0]['count']
+  end
+
+  def test_batch_bad_params
+    doc = @client.create_document( { '@class' => CLASS, 'prop1' => 1, 'prop2' => 'text' })
+    assert_raise Orientdb4r::ServerError do @client.batch(nil); end
+    assert_raise Orientdb4r::ServerError do @client.batch({:foo => :baz, :bar => :alfa}); end # bad structure
+    assert_raise Orientdb4r::NotFoundError do @client.batch({:operations => [{:type => :d, :record => {'@rid' => '#123:456'}}]}); end # bad cluster
+    assert_nothing_thrown do @client.batch({:operations => [{:type => :d, :record => {'@rid' => "##{doc.doc_rid.cluster_id}:678"}}]}); end # bad RID is not problem
+  end
+
+  def test_batch_transaction
+    doc = @client.create_document( { '@class' => CLASS, 'prop1' => 1, 'prop2' => 'text' })
+
+    assert_raise Orientdb4r::ServerError do # will fail on update => tx on => create must be rollbacked
+      rslt = @client.batch({:transaction => true, :operations => [
+        {:type => :c, :record => {'@class' => CLASS, :prop2 => 'foo'}},
+        {:type => :u, :record => {'@rid' => doc.doc_rid}},
+      ]})
+    end
+    assert_equal 1, @client.query("SELECT count(*) FROM #{CLASS}")[0]['count']
+
+    assert_raise Orientdb4r::ServerError do # will fail on update => tx off => create must be done
+      rslt = @client.batch({:transaction => false, :operations => [
+        {:type => :c, :record => {'@class' => CLASS, :prop2 => 'foo'}},
+        {:type => :u, :record => {'@rid' => doc.doc_rid}},
+      ]})
+    end
+    assert_equal 2, @client.query("SELECT count(*) FROM #{CLASS}")[0]['count']
+  end
+
+end