ixtlan-remote 0.1.0

data/lib/ixtlan/remote/server.rb

@@ -0,0 +1,119 @@
+#
+# ixtlan-remote - helper sync data between miniapps or communicate wth realtime
+# rest-services
+# Copyright (C) 2012 Christian Meier
+#
+# This file is part of ixtlan-remote.
+#
+# ixtlan-remote is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as
+# published by the Free Software Foundation, either version 3 of the
+# License, or (at your option) any later version.
+#
+# ixtlan-remote is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with ixtlan-remote.  If not, see <http://www.gnu.org/licenses/>.
+#
+require 'rest-client'
+require 'ixtlan/remote/resource'
+module RestClient
+  class Resource
+    # allow payload on delete - breaks code using original method !!!!
+    def delete(payload = nil, additional_headers={}, &block)
+      headers = (options[:headers] || {}).merge(additional_headers)
+      opts = options.merge( :method => :delete,
+                            :url => url,
+                            :headers => headers )
+      if payload
+        opts[:payload] = payload
+      end
+      Request.execute( opts, &(block || @block))
+    end
+  end
+end
+
+module Ixtlan
+  module Remote
+    class Server
+
+      attr_accessor :url
+
+      def initialize( factory )
+        @factory = factory
+      end
+
+      def options
+        @options ||= {}
+      end
+
+      def map
+        @map ||= {}
+      end
+      
+      def models
+        map.keys
+      end
+
+      class Meta
+
+        attr_reader :path, :new_method
+
+        def initialize( new_method, path = nil )
+          @new_method = new_method
+          @path = path.to_s if path
+        end
+      end
+
+      NEW_METHOD = Proc.new do | model, attributes |
+        cond = {}
+        model.key.each { |k| cond[ k.name ] = attributes[ k.name.to_s ] }
+        m = model.first_or_new( cond )
+        m.attributes = attributes
+        m
+      end
+      
+      def new_method_dm( clazz )
+        if clazz.respond_to?( :key ) && clazz.key.kind_of?( DataMapper::PropertySet )
+          Proc.new { |a| NEW_METHOD.call( clazz, a ) }
+        else
+          clazz.method( :new )
+        end
+      end
+
+      def new_method(clazz)
+        if defined? DataMapper
+          new_method_dm(clazz)
+        else
+          warn "TODO need better implementation for ActiveRecord in #{__FILE__} #{__LINE__}"
+        
+          clazz.method( :new )
+        end
+      end
+
+      def add_model( clazz, path = nil )
+        @factory[ clazz ] = self
+        m = map[ clazz ] = Meta.new( new_method( clazz ),
+                                     (path || clazz.to_s.underscore.pluralize ) )
+      end
+
+      def keys( clazz )
+        # TODO
+        if clazz.respond_to?( :key )
+          clazz.key.first
+        else
+          clazz.id
+        end
+      end
+
+      def new_rest_resource( clazz )
+        client = RestClient::Resource.new( @url, options )
+        meta = map[ clazz ]
+        Resource.new( client[ meta.path ], clazz, meta.new_method )
+      end
+    end
+  end
+end

data/lib/ixtlan/remote/server.rb~

@@ -0,0 +1,82 @@
+require 'rest-client'
+module Ixtlan
+  module Remote
+    class Server
+
+      attr_accessor :url
+
+      def initialize( factory )
+        @factory = factory
+      end
+
+      def options
+        @options ||= {}
+      end
+
+      def map
+        @map ||= {}
+      end
+      
+      class Meta
+
+        attr_reader :path
+
+        def initialize( path, new_method )
+          @new = new_method
+          @path = path.to_s if path
+        end
+
+        def singular
+          @path.singularize if @path
+        end
+
+        def new( attributes )
+          @new.call( attributes )
+        end
+      end
+
+      if defined? DataMapper
+        
+        NEW_METHOD = Proc.new do | model, attributes |
+          cond = {}
+          model.key.each { |k| cond[ k.name ] = attributes[ k.name.to_s ] }
+          m = model.first_or_new( cond )
+          m.attributes = attributes
+          m
+        end
+        
+        def new_method( clazz )
+          #if clazz.include? ::DataMapper::Resource
+          if clazz.respond_to?( :key ) && clazz.key.kind_of?( DataMapper::PropertySet )
+            Proc.new { |a| NEW_METHOD.call( clazz, a ) }
+          else
+            clazz.method( :new )
+          end
+        end
+      else
+        raise "need implementation"
+      end
+
+
+      def add_model( clazz, &block )
+        @factory[ clazz ] = self
+        m = map[ clazz ] = Meta.new( path = clazz.to_s.underscore.pluralize,
+                                     new_method( clazz ) )
+        block.call m if block
+      end
+
+      def keys( clazz )
+        if clazz.respond_to?( :key )
+          clazz.key
+        else
+          # TODO
+          clazz.id
+        end
+      end
+
+      def new_rest_resource
+        Resource.new( RestClient::Resource.new( @url, options ), map )
+      end
+    end
+  end
+end

data/lib/ixtlan/remote/summary.rb

@@ -0,0 +1,46 @@
+#
+# ixtlan-remote - helper sync data between miniapps or communicate wth realtime
+# rest-services
+# Copyright (C) 2012 Christian Meier
+#
+# This file is part of ixtlan-remote.
+#
+# ixtlan-remote is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as
+# published by the Free Software Foundation, either version 3 of the
+# License, or (at your option) any later version.
+#
+# ixtlan-remote is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with ixtlan-remote.  If not, see <http://www.gnu.org/licenses/>.
+#
+module Ixtlan
+  module Remote
+    class Summary
+
+      attr_reader :failures, :count
+
+      def initialize(clazz)
+        @count = 0
+        @failures = []
+        @clazz = clazz
+      end
+      
+      def inc_count
+        @count += 1
+      end
+      
+      def inc_failures(errors)
+        @failures << errors.inspect
+      end
+      
+      def to_log
+        "update #{@clazz} - total: #{@count + @failures.size}  success: #{@count}  failures: #{@failures.size == 0 ? 0 : @failures.join("\n\t\t")}"
+      end
+    end
+  end
+end

data/lib/ixtlan/remote/summary.rb~

@@ -0,0 +1,23 @@
+class Ixtlan::Remote::Sync
+
+  class Summary
+
+    def initialize(clazz)
+      @count = 0
+      @failures = 0
+      @clazz = clazz
+    end
+
+    def inc_count
+      @count += 1
+    end
+
+    def inc_failures
+      @falures += 1
+    end
+
+    def to_log
+      "update #{@clazz} - total: #{@count + @failures}  success: #{@count}  failures: #{@failures}"
+    end
+  end
+end

data/lib/ixtlan/remote/sync.rb

@@ -0,0 +1,104 @@
+#
+# ixtlan-remote - helper sync data between miniapps or communicate wth realtime
+# rest-services
+# Copyright (C) 2012 Christian Meier
+#
+# This file is part of ixtlan-remote.
+#
+# ixtlan-remote is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as
+# published by the Free Software Foundation, either version 3 of the
+# License, or (at your option) any later version.
+#
+# ixtlan-remote is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with ixtlan-remote.  If not, see <http://www.gnu.org/licenses/>.
+#
+require 'ixtlan/remote/summary'
+require 'active_support/all'
+
+module Ixtlan
+  module Remote
+    class Sync
+
+      SECONDS_IN_DAY = 60 * 60 * 24
+      NANOSECONDS_IN_DAY = SECONDS_IN_DAY * 1000 * 1000 * 1000
+      def initialize(restserver)
+        @restserver = restserver
+      end
+
+      def clazzes
+        @clazzes ||= {}
+      end
+      private :clazzes
+
+      def register(clazz, &block)
+        clazzes[clazz] = block unless clazzes.key?(clazz)
+      end
+
+      # max method ORM dependent
+      if defined? ActiveRecord
+        def max(clazz)
+          (clazz.maximum(:updated_at) || DateTime.new(0)).to_datetime
+        end
+      else
+        def max(clazz)
+          clazz.max(:updated_at)
+        end
+      end
+      private :max
+
+      # UTC timestamp of last updated record
+      def last_update( clazz )
+        last_date = ( max( clazz ) || DateTime.new( 0 ) )
+        last_date.strftime( '%Y-%m-%d %H:%M:%S.' ) + ( "%06d" % ( last_date.sec_fraction / NANOSECONDS_IN_DAY / 1000 ) ) + "+0:00"
+      end
+      private :last_update
+
+      def self.do_it( clazz = nil )
+        if clazz
+          new.do_it( clazz )
+        else
+          new.do_it
+        end
+      end
+
+      # load the last changed records
+      def do_it(set = clazzes.keys)
+        @last_result = []
+        set = [set] unless set.is_a? Array
+        # use only regstered classes !!
+        set = set - (set - clazzes.keys)
+        set.to_a.each do |clazz|
+          summary = Summary.new(clazz)
+          @last_result << summary
+          @restserver.retrieve(clazz, 
+                               :last_changes, 
+                               :updated_at => last_update(clazz)).each do |item|
+            if item.save
+              summary.inc_count
+            else
+              summary.inc_failures(item.errors)
+            end
+          end
+          b = clazzes[clazz]
+          b.call summary if b
+        end
+        to_log
+      end
+
+      def to_log
+        if @last_result
+          @last_result.collect { |r| r.to_log }.join("\n\t")
+        else
+          "no results yet"
+        end
+      end
+      alias :to_s :to_log
+    end
+  end
+end

data/lib/ixtlan/remote/sync.rb~

@@ -0,0 +1,78 @@
+require 'ixtlan/remote/summary'
+require 'active_support/all'
+
+class Ixtlan::Remote::Sync
+
+  SECONDS_IN_DAY = 60 * 60 * 24
+  NANOSECONDS_IN_DAY = SECONDS_IN_DAY * 1000 * 1000 * 1000
+  def initialize(restserver)
+    @restserver = restserver
+  end
+
+  def clazzes
+    @clazzes ||= {}
+  end
+  private :clazzes
+
+  def register(clazz, &block)
+    clazzes[clazz] = block unless clazzes.key?(clazz)
+  end
+
+  # max method ORM dependent
+  if defined? ActiveRecord
+    def max(clazz)
+      clazz.maximum(:updated_at)
+    end
+  else
+    def max(clazz)
+      clazz.max(:updated_at)
+    end
+  end
+  private :max
+
+  # UTC timestamp of last updated record
+  def last_update(clazz)
+    last_date = ( max(clazz) || DateTime.new( 0 ) ) + 1# + SECONDS_IN_DAY
+    last_date.strftime('%Y-%m-%d %H:%M:%S.') + ("%06d" % (last_date.sec_fraction / NANOSECONDS_IN_DAY / 1000)) + "+0:00"
+  end
+  private :last_update
+
+  def self.do_it(clazz = nil)
+    if clazz
+      new.do_it(clazz)
+    else
+      new.do_it
+    end
+  end
+
+  # load the last changed records
+  def do_it(set = clazzes.keys)
+    @last_result = []
+    set = [set] unless set.is_a? Array
+    set.to_a.each do |clazz|
+      summary = Summary.new(clazz)
+      @last_result << summary
+      @restserver.retrieve(clazz, 
+                           :last_changes, 
+                           :updated_at => last_update(clazz)).each do |item|
+        if item.save
+          summary.inc_count
+        else
+          summary.inc_failures
+        end
+      end
+      b = clazzes[clazz]
+      b.call summary if b
+    end
+    to_log
+  end
+
+  def to_log
+    if @last_result
+      @last_result.collect { |r| r.to_log }.join("\n\t")
+    else
+      "no results yet"
+    end
+  end
+  alias :to_s :to_log
+end