iab-ActiveRecordBDBXml 0.1.3 → 0.1.5

data/lib/models/modbdbxml.rb

@@ -0,0 +1,116 @@
+require 'bdbxml'
+module BDBXML
+  #setup DB_ROOT to point to IABDB location
+  unless defined?(DB_ROOT)
+    db_path = APP_CONFIG['dbpath']
+    require 'pathname'
+    db_path = Pathname.new(db_path).cleanpath(true).to_s
+    DB_ROOT = db_path
+    DB_NAME = APP_CONFIG['dbcontainer']
+  end
+  
+  def setup_env
+    puts "VERSION of BDB is #{BDB::VERSION}\n"
+    puts "VERSION of BDB::XML is #{BDB::XML::VERSION}\n"
+    puts "Database path is #{File.expand_path(DB_ROOT)}\n"
+    
+    #setup UUID state file
+    UUID.config(:state_file => "#{DB_ROOT}/uuid.state",
+                  :sequence => rand(0x100000000),
+                  :mac_addr => '00:19:e3:36:60:f5')
+                
+    @flag = BDB::INIT_TRANSACTION
+    @flag ||= BDB::INIT_LOMP
+    $env = BDB::Env.new(DB_ROOT, BDB::CREATE | @flag)
+    $man = $env.manager
+    if (!File.exist?("#{DB_ROOT}/#{DB_NAME}"))
+      if (@flag & BDB::INIT_TXN) != 0
+         $con = $man.create_container(DB_NAME, BDB::XML::TRANSACTIONAL)
+      else
+         $con = $man.create_container(DB_NAME)
+      end
+    else
+      if (@flag & BDB::INIT_TXN) != 0
+         $con = $man.open_container(DB_NAME, BDB::XML::TRANSACTIONAL)
+      else
+         $con = $man.open_container(DB_NAME)
+      end
+    end
+    $base = "."
+  end
+  
+  def clean_env
+    puts "\nVERSION of BDB is #{BDB::VERSION}\n"
+    puts "\nVERSION of BDB::XML is #{BDB::XML::VERSION}\n"
+    puts "Cleaning #{DB_ROOT}/#{DB_NAME}\n"
+    
+    Dir.foreach(DB_ROOT) do |x|
+      if FileTest.file?(DB_ROOT+"/#{x}")
+         File.unlink(DB_ROOT+"/#{x}")
+      end
+    end
+  end
+  
+  def close_env
+    $man.close
+    $env.close
+  end
+  
+  def create_key_and_doc(msg)
+    key = UUID.new
+    create_doc(msg,key)
+    key
+  end
+  
+  def read_doc(key)
+    $con.get(key).content
+  end
+  
+  def create_doc(msg,key)
+    $man.begin($con) do |txn, con|
+      a = $man.create_document
+      a.content = msg
+      con[key] = a
+      txn.commit
+    end
+  end
+  
+  def replace_doc(msg,key)
+    $man.begin($con) do |txn, con|
+      a = $con.get(key)
+      a.content = msg
+      $con.update(a)
+      txn.commit
+    end
+  end
+  
+  def find(query)
+    cxt = $man.create_query_context()
+    results = $man.query(query, cxt)
+    if (results.size == 0) then
+      return nil
+    end
+    #results is essentially an array of result lines
+    #a single result will span a number of output lines, e.g. outer joined
+    #MTA info will appear with a CRLF separator
+    #the following code makes up single logical result rows based on the lines between
+    #successive pairs of {} braces
+    #
+    #it should be noted that the result set from the xqueries is intended to be
+    #a valid ruby block
+    #this allows the result to be used to instantiate an active record object
+    #with no further manipulation required
+    rows = []
+    i = 0
+    results.each do |r|
+      if rows[i] == nil
+        rows[i] = ""
+      end
+      rows[i] << r.chomp
+      if (r.match(']}'))
+        i = i + 1
+      end
+    end
+    rows
+  end
+end

data/lib/models/modbdbxmlje.rb

@@ -0,0 +1,135 @@
+module BDBXMLJE
+  include Java 
+  require 'date'
+  require 'pathname'
+  require 'lib/db.jar'
+  require 'lib/dbxml.jar'
+
+  # Include all the Java and JE classes that we need. 
+
+  include_class 'java.io.File' do |p, c|
+    "J#{c}"
+  end
+
+  include_class ['com.sleepycat.db.Environment','com.sleepycat.db.EnvironmentConfig'] do |p, c|
+    "J#{c}"
+  end
+  include_class 'com.sleepycat.db.Cursor'
+  include_class 'com.sleepycat.db.Database'
+  include_class 'com.sleepycat.db.DatabaseConfig'
+  include_class 'com.sleepycat.db.DatabaseType'
+  include_class 'com.sleepycat.db.DatabaseEntry'
+  include_class 'com.sleepycat.db.OperationStatus'
+  include_class 'com.sleepycat.db.Transaction'
+  
+  include_class 'com.sleepycat.bind.tuple.IntegerBinding'
+  include_class 'com.sleepycat.bind.tuple.StringBinding'
+  
+  include_class 'com.sleepycat.dbxml.XmlManager'
+  include_class 'com.sleepycat.dbxml.XmlManagerConfig'
+  include_class 'com.sleepycat.dbxml.XmlDocument'
+  include_class 'com.sleepycat.dbxml.XmlTransaction'
+  
+  #setup DB_ROOT to point to IABDB location
+  unless defined?(DB_ROOT)
+    db_path = APP_CONFIG['dbpath']
+    db_path = Pathname.new(db_path).cleanpath(true).to_s
+    DB_ROOT = db_path
+    DB_NAME = APP_CONFIG['dbcontainer']
+  end
+  
+  def setup_env
+    #setup UUID state file
+    UUID.config(:state_file => "#{DB_ROOT}/uuid.state",
+                  :sequence => rand(0x100000000),
+                  :mac_addr => '00:19:e3:36:60:f5')
+
+    begin
+      envConf = JEnvironmentConfig.new()
+      envConf.setAllowCreate(true)
+      envConf.setTransactional(true)
+      envConf.setInitializeCache(true);      
+
+      f = JFile.new(DB_ROOT)
+      $env = JEnvironment.new(f, envConf);
+      
+      manConf = XmlManagerConfig.new()
+      manConf.setAllowExternalAccess(true)
+      $man = XmlManager.new($env,manConf)
+      
+      if (!File.exist?("#{DB_ROOT}/#{DB_NAME}"))
+        $con = $man.createContainer(DB_NAME)
+      else
+        $con = $man.openContainer(DB_NAME)
+      end
+      
+      $base = "."
+    rescue NativeException => e
+      puts "Native exception's cause: #{e.cause}"
+      raise
+    end
+  end
+
+  def create_key_and_doc(msg)
+    key = UUID.new
+    create_doc(msg,key)
+    key
+  end
+  
+  def read_doc(key)
+    $con.getDocument(key).getContentAsString() 
+  end
+  
+  def create_doc(msg,key)
+    #removed the transaction bit since causes error when running inside Tomcat under JRuby
+    #txn = $man.createTransaction()
+    a = $man.createDocument()
+    a.setContent(msg)
+    a.setName(key)
+    $con.putDocument(key,msg)
+    #$con.putDocument(txn,key,msg)
+    #txn.commit()
+  end
+  
+  def replace_doc(msg,key)
+    #removed the transaction bit since causes error when running inside Tomcat under JRuby
+    #txn = $man.createTransaction()
+    #a = $con.getDocument(txn,key)
+    a = $con.getDocument(key)
+    a.setContent(msg)
+    #$con.updateDocument(txn,a)
+    $con.updateDocument(a)
+    #txn.commit
+  end
+  
+  def find(query)
+    cxt = $man.createQueryContext()
+    results = $man.query(query, cxt)
+    if (results.size() == 0) then
+      return nil
+    end
+    #results is essentially an array of result lines
+    #a single result will span a number of output lines, e.g. outer joined
+    #MTA info will appear with a CRLF separator
+    #the following code makes up single logical result rows based on the lines between
+    #successive pairs of {} braces
+    #
+    #it should be noted that the result set from the xqueries is intended to be
+    #a valid ruby block
+    #this allows the result to be used to instantiate an active record object
+    #with no further manipulation required    
+    rows = []
+    i = 0
+    while results.hasNext()
+      if rows[i] == nil
+        rows[i] = ""
+      end
+      r = results.next().asString()
+      rows[i] << r.chomp
+      if (r.match(']}'))
+        i = i + 1
+      end 
+    end   
+    rows
+  end
+end

data/lib/models/persist.rb

@@ -0,0 +1,50 @@
+# Copyright (c) 2007-2008 Orangery Technology Limited 
+# You can redistribute it and/or modify it under the same terms as Ruby.
+#
+$:.unshift(File.dirname(__FILE__))
+require 'rubygems'
+require 'uuid'
+require 'rexml/document'
+require 'singleton'
+require 'modbdbxml' unless defined?(JRUBY_VERSION)
+require 'modbdbxmlje' if defined?(JRUBY_VERSION)
+
+class Persist
+  include BDBXML unless defined?(JRUBY_VERSION)
+  include BDBXMLJE if defined?(JRUBY_VERSION)
+
+  include Singleton
+  
+  def initialize
+    setup_env
+  end
+  
+  def put(key,request)
+    begin
+      if (key == 'UUID') then
+        key = UUID.new
+        create_doc(request,key)
+      else
+        replace_doc(request,key)
+      end
+      key
+    end
+  end
+  
+  def get(key)
+    read_doc(key)
+  end
+  
+  #get with the insistence the document will be there
+  #if not then create it
+  def get!(key,request)
+    result=""
+    begin
+      result = read_doc(key)
+    rescue Exception => e #document not found
+      create_doc(request,key)
+      result = read_doc(key)
+    end
+    return result
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: iab-ActiveRecordBDBXml
 version: !ruby/object:Gem::Version 
-  version: 0.1.3
+  version: 0.1.5
 platform: ruby
 authors: 
 - Gary Mawdsley
@@ -42,6 +42,10 @@ extra_rdoc_files: []
 
 files: 
 - lib/Marshaller.rb
+- lib/models
+- lib/models/modbdbxmlje.rb
+- lib/models/modbdbxml.rb
+- lib/models/persist.rb
 has_rdoc: true
 homepage: http://github.com/iab/ActiveRecordBDBXml
 post_install_message: