active-orient 0.4 → 0.5

data/examples/time_graph/lib/createTime.rb

@@ -0,0 +1,82 @@
+#require 'time'
+
+
+
+class CreateTime
+  class << self   # singleton class
+    ## simple version: connecting vertices as they are created
+    def pop_month year = Date.today.year, month = Date.today.month
+      timestamp = DateTime.new year, month,1
+      if Monat.where( :value => month ).blank?
+	der_monat= Monat.create value_string: timestamp.strftime("%B"), value: timestamp.month.to_i
+	last_month_day =  (DateTime.new( year, month+1, 1)-1).day rescue 31  # rescue covers month > 12
+	(0 .. last_month_day ).each do | tag |
+	  der_tag = Tag.create value_string: "March #{timestamp.day}", value: tag 
+	  print der_tag.value.to_s + " > "
+	  ( 0 .. 23 ).each do | stunde |
+	    die_stunde = Stunde.create value_string: "March #{timestamp.day} #{timestamp.hour}:00", value: stunde
+	    print die_stunde.value.to_s + " .. "
+	    TIME_OF.create_edge from: der_tag, to: die_stunde
+	    timestamp += Rational(1,24)  # + 1 hour
+	  end
+	  print "\n"
+	  DAY_OF.create_edge from: der_monat, to: der_tag
+	end
+      else
+	"Month #{timestamp.strftime("%B %Y ") } exists "
+      end
+    end
+    ## we populate the graph with a 1:n-Layer
+    # month --> n[day --> n[hour] ]
+    # thus creating edges is providing a static :from-vertex to numerous :to-vertices
+    # the to:vertices are first created and fenced in an array. Then all edges are created at once. 
+    # In Rest-Mode this is much quicker.
+    def populate_month year = Date.today.year, month = Date.today.month
+      timestamp = DateTime.new year, month,1
+      days = []
+      if Monat.where( :value => month ).blank?
+	der_monat= Monat.create value_string: timestamp.strftime("%B"), value: timestamp.month.to_i
+	last_month_day =  (DateTime.new( year, month+1, 1)-1).day rescue 31  # rescue covers month > 12
+	(0 .. last_month_day ).each do | tag |
+	  der_tag = Tag.create value_string: "March #{timestamp.day}", value: tag 
+	  edges =  [] 
+	  ( 0 .. 23 ).each do | stunde |
+	    edges << Stunde.create( value_string: "March #{timestamp.day} #{timestamp.hour}:00", value: stunde)
+	    timestamp += Rational(1,24)  # + 1 hour
+	  end
+	  ## insert all edges of the day as batch (in rest-mode)
+	    TIME_OF.create from: der_tag, to: edges
+	  days << der_tag
+	end
+	  DAY_OF.create from: der_monat, to: days 
+      else
+	"Month #{timestamp.strftime("%B %Y ") } exists "
+      end
+    end
+  end
+end # class
+
+  ## here we start if the file is called from the command-lind
+if $0 == __FILE__
+  require './config/boot'
+  ActiveOrient::OrientSetup.init_database   # --> config/init_db
+  CreateTime.populate_month
+
+  
+  print "\n" * 4
+  puts '-' * 40
+  puts "Features of the DateTime Graph"
+  puts '-' * 40
+  puts
+  puts "Allocated Month   => Monat.first.value:\t\t" + Monat.first.value.to_s
+  puts
+  puts "Adressing Days    => Monat.first.tag[2].value:\t" + Monat.first.tag[2].value.to_s
+  puts
+  puts "Display Date      => Monat.first.tag[13].datum:\t"+ Monat.first.tag[13].datum.to_s
+
+  puts "Display next Date => Monat.first.tag[13].next.datum:\t"+ Monat.first.tag[13].next.datum.to_s
+
+
+
+
+end

data/examples/time_graph/model/day_of.rb

@@ -0,0 +1,3 @@
+class  DAY_OF  < E
+
+end

data/examples/time_graph/model/e.rb

@@ -0,0 +1,6 @@
+class E  < ActiveOrient::Model
+  ## Edges are referenced with UPCASE-NAMES ---> went to config/boot.rb
+#  def self.naming_convention name=nil
+#      name.present? ? name.upcase : ref_name.upcase
+#  end
+end

data/examples/time_graph/model/edge.rb

@@ -0,0 +1,53 @@
+# to do 
+# instead of creating a class, use a module which is included on startup
+# then, after specifying the namespace and before autoaccolating the database-classes create the proper E-Base-class and include this stuff
+class E  < ActiveOrient::Model
+  ## link to the library-class
+  class << self
+=begin
+establish contrains on Edges
+
+Edges are uniq!
+
+Creates individual indices for child-classes if applied to the class itself.
+=end
+  def  uniq_index
+    create_property  :in,  type: :link, linked_class: :V
+    create_property  :out, type: :link, linked_class: :V
+    create_index "#{self.name}_idx", on: [ :in, :out ]
+  end
+=begin
+  Instantiate a new Edge between two Vertices 
+
+  The parameters »from« **or** »to« can take a list of model-records. Then subsequent edges are created.
+
+  :call-seq:
+  Model.create from:, to:,  attributes:{}
+=end
+
+
+  def create  **keyword_arguments
+    new_edge = db.create_edge self, **keyword_arguments
+    new_edge =  new_edge.pop if new_edge.is_a?( Array) && new_edge.size == 1
+    # vertices must be reloaded
+
+    new_edge # returns the created edge (or an array of created edges
+  end
+
+  # to do
+  # def delete
+  # delete an edge (as class method) 
+  # and 
+  # def remove
+  # delete an edge (as instance method)
+  #
+  def delete where: attributes
+    puts "work in progress"
+  end
+  
+  # remove works on record-level
+  end 
+  def remove
+    db.delete_edge self
+  end
+end

data/examples/time_graph/model/monat.rb

@@ -0,0 +1,19 @@
+#ActiveOrient::Model.orientdb_class name: 'time_base', superclass: 'V'
+class Monat  < TimeBase
+  def der_tag d
+#    d=d-1
+    d >0 && d<31 ? out_day_of[d].in : nil
+  end
+ 
+  # returns an array of days
+  # thus enables the use as  
+  #   Monat[9].tag[9]
+  def tag
+    out_day_of.in
+  end
+
+  # returns the specified edge 
+  #  i.e.  Monat[9]
+  #
+
+end

data/examples/time_graph/model/stunde.rb

@@ -0,0 +1,16 @@
+class Stunde < TimeBase
+
+  def tag
+    in_time_of.out
+  end
+
+  def datum
+    month = in_time_of.out.in_day_of.out.value
+    day =  in_time_of.out.value
+    "#{day.first}.#{month.flatten.first}.#{Date.today.year} #{value}:00"
+  end
+  def next
+    puts value.inspect
+    in_day_of.out.first.tag( value + 1 )
+  end
+end

data/examples/time_graph/model/tag.rb

@@ -0,0 +1,29 @@
+#ActiveOrient::Model.orientdb_class name: 'time_base', superclass: 'V'
+class  Tag  < TimeBase
+def monat
+  in_day_of.out.value_string.first
+end
+
+def die_stunde h
+    h.to_i >0 && h.to_i<31 ? out_time_of[h].in : nil
+  end
+  
+
+  def stunde
+    out_time_of.in
+  end
+
+  def monat
+    in_day_of.out.first
+  end
+  def next
+    monat.tag[ value + 1 ]
+  end
+  def prev
+    monat.tag[ value - 1 ]
+  end
+
+  def datum
+    "#{ value}.#{monat.value}.#{Date.today.year}"
+  end
+end

data/examples/time_graph/model/time_base.rb

@@ -0,0 +1,6 @@
+class  TimeBase < V
+
+  def self.[] key
+    where( value: key).first
+  end
+end

data/examples/time_graph/model/time_of.rb

@@ -0,0 +1,4 @@
+#ActiveOrient::Model.orientdb_class name: 'time_base', superclass: 'V'
+class  TIME_OF  < E
+
+end

data/examples/time_graph/model/v.rb

@@ -0,0 +1,3 @@
+class V  < ActiveOrient::Model
+   # placeholder for project-specific methods on vertices
+end

data/examples/time_graph/model/vertex.rb

@@ -0,0 +1,32 @@
+class V   < ActiveOrient::Model
+  ## link to the library-class
+  # create 
+  # seems not to be nessesary as its identically to the universal create
+
+ 
+  # to do
+
+  # def delete
+  # delete an edge (as class method) 
+  # and 
+  # def remove
+  # delete an edge (as instance method)
+  
+  def edges kind=:all  # :all, :in, :out 
+    expression = case kind
+		 when :all
+		   /^in|^out/ 
+		 when :in
+		   /^in/ 
+		 when :out
+		   /^out/ 
+    end
+    edges = attributes.keys.find_all{ |x| x =~  expression }
+    edges.map{|x| attributes[x]}.flatten
+  end
+
+  def remove
+    db.delete_vertex self
+  end
+
+end

data/examples/time_graph/spec/lib/create_time_spec.rb

@@ -0,0 +1,50 @@
+require 'spec_helper'
+require 'rest_helper'
+
+describe CreateTime do
+  before( :all ) do
+    reset_database 
+    ActiveOrient::OrientSetup.init_database 
+  end
+  context "check environment" do
+    it "nessesary classes are allocated" do
+      [ Monat, Tag, Stunde ].each do | klass |
+	expect( klass.superclass).to eq TimeBase
+      end
+    end
+  end
+
+  context "populate" do
+    before( :all ) do
+       CreateTime.populate_month
+    end
+    let( :month){  Date.today.month }
+
+    it "The actual Month is used" do
+      expect( Monat.count ).to eq 1
+      expect( Monat.first.value ).to eq  Date.today.month
+    end
+
+    it "The actual Month has several days" do
+      expect( Monat.first.tag.count ).to be >= 28
+    end
+
+    it	"Address a specific day", focus: true do
+
+      expect( Monat[month].tag[5].value ).to eq 5
+    end
+
+    it "Address a specific hour" do
+      expect( Monat[month].tag[5].value ).to eq 5
+      expect( Monat[month].tag[7].stunde[5].value ).to eq 5
+    end
+    it "Switch to the next hour" do
+
+      expect( Monat[month].tag[7].stunde[5].next.value ).to eq 6
+    end
+  end
+
+
+
+
+end

data/examples/time_graph/spec/rest_helper.rb

@@ -0,0 +1,37 @@
+# deletes the working database and recreates it 
+# reassignes ORD and DB
+def reset_database
+  db =  ActiveOrient.database
+
+#  ORD.database_classes.reverse.each do | klass_name |
+#    klass =  ActiveOrient::Model.orientdb_class name: klass_name
+#    klass.delete_class  rescue nil
+#  end
+  ORD.delete_database database: db
+  Object.send :remove_const, :ORD 
+  Object.send :remove_const, :DB
+  ActiveOrient.database =  db
+  Object.send :const_set, :ORD, ActiveOrient::OrientDB.new( preallocate: true )
+  if OrientDB::UsingJava
+    Object.send :const_set, :DB,  ActiveOrient::API.new( preallocate: false)
+  else
+    Object.send :const_set,  :DB, ActiveOrient::OrientDB.new( preallocate: true )
+  end
+end
+
+
+ shared_examples_for 'correct allocated classes' do |input|
+   it "has allocated all classes" do
+    case input
+    when Array
+      input.each{|y| expect( ORD.database_classes ).to include ORD.classname(y) }
+      expect( classes ).to have( input.size ).items
+    when Hash
+    else  
+      expect( classes ).to be_kind_of ActiveOrient::Model
+
+    end
+   end
+
+ end
+

data/examples/time_graph/spec/spec_helper.rb

@@ -0,0 +1,46 @@
+ARGV << 'test'
+@do_not_preallocate =  true
+require './config/boot'
+#bundler/setup'
+require 'rspec'
+require 'rspec/its'
+require 'rspec/collection_matchers'
+require 'yaml'
+require 'active_support'
+project_root = File.expand_path('../..', __FILE__)
+#require 'my_spec_helper'
+
+unless defined?(SPEC_HELPER_LOADED)
+SPEC_HELPER_LOADED =  true
+RSpec.configure do |config|
+	config.mock_with :rspec
+	config.color = true
+	# ermöglicht die Einschränkung der zu testenden Specs
+	# durch  >>it "irgendwas", :focus => true do <<
+	config.filter_run :focus => true
+	config.run_all_when_everything_filtered = true
+	config.order = 'defined'  # "random"
+end
+
+RSpec.shared_context 'private', private: true do
+
+    before :all do
+          described_class.class_eval do
+	          @original_private_instance_methods = private_instance_methods
+		        public *@original_private_instance_methods
+			    end
+	    end
+
+      after :all do
+	    described_class.class_eval do
+	            private *@original_private_instance_methods
+		        end
+	      end
+
+end
+else
+  puts "***  ---- *** \n"*3
+  puts "Reusing rspec configuration "
+  puts "***  ---- *** \n"*3
+end
+#require 'model_helper'

data/lib/active-orient.rb

@@ -1,7 +1,57 @@
-require "support.rb"
-require "base.rb"
-require "base_properties.rb"
 
-require "model.rb"
-require "orient.rb"
-require "rest.rb"
+module OrientDB
+  UsingJava = RUBY_PLATFORM == 'java' ?  true : false
+  unless RUBY_PLATFORM == 'java'
+   DocumentDatabase       = nil
+   DocumentDatabasePool   = nil
+   DocumentDatabasePooled = nil
+   GraphDatabase          = nil
+    OTraverse             = nil
+    Document              = nil
+    IndexType             = nil
+    OClassImpl            = nil
+    PropertyImpl          = nil
+    Schema                = nil
+    SchemaProxy           = nil
+    SchemaType            = nil
+    SQLCommand            = nil
+    SQLSynchQuery         = nil
+    User                  = nil
+    RemoteStorage         = nil
+    ServerAdmin           = nil
+    # defined in other.rb
+    #JavaDate		  
+    #RecordList            = nil
+   # RidBag		  = nil
+   # RecordSet             = nil
+  end
+end  # module OrientDB
+require_relative "support.rb"
+require_relative "base.rb"
+require_relative "base_properties.rb"
+require_relative "orient.rb"
+#require_relative "query.rb"
+if RUBY_PLATFORM == 'java'
+  require_relative 'java-api.rb'
+  end
+require_relative "orientdb_private.rb" # manage private functions
+require_relative "database_utils.rb" #common methods without rest.specific content
+require_relative "class_utils.rb" #common methods without rest.specific content
+require_relative "other.rb"
+require_relative "rest/rest.rb"
+require_relative "model/model.rb"
+require 'active_support/core_ext/string' # provides blank?, present?, presence etc
+require_relative 'init.rb'
+# create Base Classes
+require_relative "model/edge.rb"
+require_relative "model/vertex.rb"
+
+module  ActiveOrient
+mattr_accessor :database
+mattr_accessor :database_classes
+mattr_accessor :default_server
+
+
+
+end
+