ruote-dm 2.1.6

data/CHANGELOG.txt

@@ -0,0 +1,6 @@
+
+= ruote-dm - CHANGELOG.txt
+
+
+== ruote-dm 2.1.6    not yet released
+

data/CREDITS.txt

@@ -0,0 +1,19 @@
+
+= ruote-dm CREDITS.txt
+
+== authors
+
+- John Mettraux  http://jmettraux.wordpress.com
+- Jordan Ritter (http://github.com/jpr5)
+
+
+== contributors
+
+- asm (many bug reports)
+- Kenneth Kalmer (http://www.opensourcery.co.za/)
+
+
+== many thanks to
+
+- the DataMapper team
+

data/LICENSE.txt

@@ -0,0 +1,21 @@
+
+Copyright (c) 2001-2009, John Mettraux, jmettraux@gmail.com
+
+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.
+

data/README.rdoc

@@ -0,0 +1,49 @@
+
+= ruote-dm
+
+ruote 2.1 extension for DataMapper (dm) persistence
+
+
+== usage
+
+well...
+
+
+== running tests
+
+assuming you have
+
+  ruote/
+  ruote-dm/
+
+* unit tests :
+
+get into ruote/ and do
+
+  ruby test/unit/storage.rb --dm
+
+* functional tests :
+
+get into ruote/ and do
+
+  ruby test/functional/test.rb --dm
+
+
+== license
+
+MIT
+
+
+== links
+
+http://datamapper.org/
+
+http://ruote.rubyforge.org/
+http://github.com/jmettraux/ruote-dm
+
+
+== feedback
+
+mailing list : http://groups.google.com/group/openwferu-users
+irc : irc.freenode.net #ruote
+

data/Rakefile

@@ -0,0 +1,78 @@
+
+require 'rubygems'
+require 'rake'
+
+require 'lib/ruote/dm/version.rb'
+
+#
+# CLEAN
+
+require 'rake/clean'
+CLEAN.include('pkg', 'tmp', 'html')
+task :default => [ :clean ]
+
+
+#
+# GEM
+
+require 'jeweler'
+
+Jeweler::Tasks.new do |gem|
+
+  gem.version = Ruote::Dm::VERSION
+  gem.name = 'ruote-dm'
+  gem.summary = 'datamapper storage for ruote 2.1'
+  gem.description = %{
+datamapper storage for ruote 2.1
+  }.strip
+  gem.email = 'jmettraux@gmail.com'
+  gem.homepage = 'http://github.com/jmettraux/ruote-dm'
+  gem.authors = [ 'John Mettraux' ]
+  gem.rubyforge_project = 'ruote'
+
+  gem.test_file = 'test/test.rb'
+
+  gem.add_dependency 'ruote', ">= #{Ruote::Dm::VERSION}"
+  gem.add_dependency 'dm-core'
+  #gem.add_dependency 'dm-aggregates'
+  #gem.add_dependency 'dm-types'
+  gem.add_development_dependency 'yard', '>= 0'
+
+  # gemspec spec : http://www.rubygems.org/read/chapter/20
+end
+Jeweler::GemcutterTasks.new
+
+
+#
+# DOC
+
+begin
+
+  require 'yard'
+
+  YARD::Rake::YardocTask.new do |doc|
+    doc.options = [
+      '-o', 'html/ruote-dm', '--title',
+      "ruote-dm #{Ruote::Dm::VERSION}"
+    ]
+  end
+
+rescue LoadError
+
+  task :yard do
+    abort "YARD is not available : sudo gem install yard"
+  end
+end
+
+
+#
+# TO THE WEB
+
+task :upload_website => [ :clean, :yard ] do
+
+  account = 'jmettraux@rubyforge.org'
+  webdir = '/var/www/gforge-projects/ruote'
+
+  sh "rsync -azv -e ssh html/ruote-dm #{account}:#{webdir}/"
+end
+

data/TODO.txt

@@ -0,0 +1,6 @@
+
+[ ] storage : control #save result
+[ ] examine indices (participant_name ?)
+
+[ ] investigate ct_0_ weakness
+

data/lib/ruote/dm/storage.rb

@@ -0,0 +1,228 @@
+#--
+# Copyright (c) 2005-2010, John Mettraux, jmettraux@gmail.com
+#
+# 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.
+#
+# Made in Japan.
+#++
+
+require 'dm-core'
+require 'ruote/storage/base'
+require 'ruote/dm/version'
+
+
+module Ruote
+module Dm
+
+  class Document
+    include DataMapper::Resource
+
+    property :ide, String, :key => true, :length => 2048, :required => true
+    property :rev, Integer, :key => true, :required => true
+    property :typ, String, :key => true, :required => true
+    property :doc, Text, :length => 2**32 - 1, :required => true, :lazy => false
+
+    property :participant_name, String, :length => 512
+  end
+
+  class DmStorage
+
+    include Ruote::StorageBase
+
+    attr_reader :repository
+
+    def initialize (repository=nil, options={})
+
+      @options = options
+      @repository = repository
+
+      put_configuration
+    end
+
+    def put (doc, opts={})
+
+      DataMapper.repository(@repository) do
+
+        d = Document.first(:ide => doc['_id'], :typ => doc['type'])
+
+        return Rufus::Json.decode(d.doc) if d && d.rev != doc['_rev']
+
+        if doc['_rev'].nil?
+
+          d = Document.new(
+            :ide => doc['_id'],
+            :rev => 0,
+            :typ => doc['type'],
+            :doc => Rufus::Json.encode(doc.merge(
+              '_rev' => 0, 'put_at' => Ruote.now_to_utc_s)),
+            :participant_name => doc['participant_name']
+          ).save
+
+          doc['_rev'] = 0 if opts[:update_rev]
+
+        else
+
+          return true unless d
+
+          d.rev = d.rev + 1
+          d.doc = Rufus::Json.encode(doc.merge(
+            '_rev' => d.rev, 'put_at' => Ruote.now_to_utc_s))
+          d.save
+
+          doc['_rev'] = d.rev if opts[:update_rev]
+        end
+
+        nil
+      end
+    end
+
+    def get (type, key)
+
+      DataMapper.repository(@repository) do
+        d = Document.first(:typ => type, :ide => key)
+        d ? Rufus::Json.decode(d.doc) : nil
+      end
+    end
+
+    def delete (doc)
+
+      raise ArgumentError.new('no _rev for doc') unless doc['_rev']
+
+      DataMapper.repository(@repository) do
+
+        d = Document.first(
+          :typ => doc['type'], :ide => doc['_id'], :rev => doc['_rev'])
+
+        return true unless d
+
+        d.destroy!
+
+        nil
+      end
+    end
+
+    def get_many (type, key=nil, opts={})
+
+      q = { :typ => type }
+
+      if l = opts[:limit]
+        q[:limit] = l
+      end
+
+      if key
+        key = if m = key.source.match(/(.+)\$$/)
+          "%#{m[1]}"
+        elsif m = key.source.match(/^\^(.+)/)
+          "#{m[1]}%"
+        else
+          key
+        end
+        q[:ide.like] = key
+      end
+
+      DataMapper.repository(@repository) do
+        Document.all(q).collect { |d| Rufus::Json.decode(d.doc) }
+      end
+    end
+
+    def ids (type)
+
+      DataMapper.repository(@repository) do
+        Document.all(:typ => type).collect { |d| d.ide }
+      end
+    end
+
+    def purge!
+
+      DataMapper.repository(@repository) do
+        Document.all.destroy!
+      end
+    end
+
+    #def dump (type)
+    #  @dbs[type].dump
+    #end
+
+    def shutdown
+
+      #@dbs.values.each { |db| db.shutdown }
+    end
+
+    # Mainly used by ruote's test/unit/ut_17_storage.rb
+    #
+    def add_type (type)
+
+      # does nothing, types are differentiated by the 'typ' column
+    end
+
+    # Nukes a db type and reputs it (losing all the documents that were in it).
+    #
+    def purge_type! (type)
+
+      DataMapper.repository(@repository) do
+        Document.all(:typ => type).destroy!
+      end
+    end
+
+    # A provision made for workitems, allow to query them directly by
+    # participant name.
+    #
+    def by_participant (type, participant_name)
+
+      raise NotImplementedError if type != 'workitems'
+
+      Document.all(
+        :typ => type, :participant_name => participant_name
+      ).collect { |d|
+        Rufus::Json.decode(d.doc)
+      }
+    end
+
+    # Querying workitems by field (warning, goes deep into the JSON structure)
+    #
+    def by_field (type, field, value=nil)
+
+      raise NotImplementedError if type != 'workitems'
+
+      like = [ '%"', field, '":' ]
+      like.push(Rufus::Json.encode(value)) if value
+      like.push('%')
+
+      Document.all(:typ => type, :doc.like => like.join).collect { |d|
+        Rufus::Json.decode(d.doc)
+      }
+    end
+
+    protected
+
+    # Don't put configuration if it's already in
+    #
+    # (avoid storages from trashing configuration...)
+    #
+    def put_configuration
+
+      return if get('configurations', 'engine')
+
+      conf = { '_id' => 'engine', 'type' => 'configurations' }.merge(@options)
+      put(conf)
+    end
+  end
+end
+end
+

data/lib/ruote/dm/version.rb

@@ -0,0 +1,7 @@
+
+module Ruote
+module Dm
+  VERSION = '2.1.6'
+end
+end
+

data/lib/ruote-dm.rb

@@ -0,0 +1,3 @@
+
+require 'ruote/dm/storage'
+

data/ruote-dm.gemspec

@@ -0,0 +1,62 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{ruote-dm}
+  s.version = "2.1.6"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["John Mettraux"]
+  s.date = %q{2010-02-08}
+  s.description = %q{datamapper storage for ruote 2.1}
+  s.email = %q{jmettraux@gmail.com}
+  s.extra_rdoc_files = [
+    "LICENSE.txt",
+     "README.rdoc"
+  ]
+  s.files = [
+    "CHANGELOG.txt",
+     "CREDITS.txt",
+     "LICENSE.txt",
+     "README.rdoc",
+     "Rakefile",
+     "TODO.txt",
+     "lib/ruote-dm.rb",
+     "lib/ruote/dm/storage.rb",
+     "lib/ruote/dm/version.rb",
+     "ruote-dm.gemspec",
+     "test/integration_connection.rb",
+     "test/test.rb"
+  ]
+  s.homepage = %q{http://github.com/jmettraux/ruote-dm}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{ruote}
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{datamapper storage for ruote 2.1}
+  s.test_files = [
+    "test/test.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<ruote>, [">= 2.1.6"])
+      s.add_runtime_dependency(%q<dm-core>, [">= 0"])
+      s.add_development_dependency(%q<yard>, [">= 0"])
+    else
+      s.add_dependency(%q<ruote>, [">= 2.1.6"])
+      s.add_dependency(%q<dm-core>, [">= 0"])
+      s.add_dependency(%q<yard>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<ruote>, [">= 2.1.6"])
+    s.add_dependency(%q<dm-core>, [">= 0"])
+    s.add_dependency(%q<yard>, [">= 0"])
+  end
+end
+

data/test/integration_connection.rb

@@ -0,0 +1,34 @@
+
+#
+# testing ruote-dm
+#
+# Thu Feb  4 13:44:13 JST 2010
+#
+
+require 'yajl' rescue require 'json'
+require 'rufus-json'
+Rufus::Json.detect_backend
+
+require 'ruote-dm'
+
+if ARGV.include?('-l')
+  FileUtils.rm('debug.log') rescue nil
+  DataMapper::Logger.new('debug.log', :debug)
+elsif ARGV.include?('-ls')
+  DataMapper::Logger.new(STDOUT, :debug)
+end
+
+DataMapper.setup(:default, 'postgres://localhost/ruote_test')
+#DataMapper.setup(:default, 'sqlite3::memory:')
+#DataMapper.setup(:default, 'sqlite3:ruote_test.db')
+
+#DataMapper.repository(:default) do
+#  Ruote::Dm::Document.all.destroy!
+#  Ruote::Dm::Document.auto_upgrade!
+#end
+
+def new_storage (opts)
+
+  Ruote::Dm::DmStorage.new(:default, opts)
+end
+

data/test/test.rb

@@ -0,0 +1,7 @@
+
+puts %{
+  ~~~
+  please read the README about how to run ruote-dm tests
+  ~~~
+}
+

metadata

@@ -0,0 +1,96 @@
+--- !ruby/object:Gem::Specification 
+name: ruote-dm
+version: !ruby/object:Gem::Version 
+  version: 2.1.6
+platform: ruby
+authors: 
+- John Mettraux
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-02-08 00:00:00 +09:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: ruote
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.1.6
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: dm-core
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: yard
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: datamapper storage for ruote 2.1
+email: jmettraux@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE.txt
+- README.rdoc
+files: 
+- CHANGELOG.txt
+- CREDITS.txt
+- LICENSE.txt
+- README.rdoc
+- Rakefile
+- TODO.txt
+- lib/ruote-dm.rb
+- lib/ruote/dm/storage.rb
+- lib/ruote/dm/version.rb
+- ruote-dm.gemspec
+- test/integration_connection.rb
+- test/test.rb
+has_rdoc: true
+homepage: http://github.com/jmettraux/ruote-dm
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: ruote
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: datamapper storage for ruote 2.1
+test_files: 
+- test/test.rb