ixtlan-remote 0.1.0

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

@@ -0,0 +1,23 @@
+class Ixtlan::Remote::Updater
+
+  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/tranlation_key.rb~

@@ -0,0 +1,7 @@
+module Ixtlan
+  module GetText
+    class TranslationKey
+      include DataMapper::Resource
+    end
+  end
+end

data/lib/ixtlan/remote/translation.rake~

@@ -0,0 +1,194 @@
+namespace :ixtlan do
+
+  namespace :translation do
+    desc 'crawls the local filesystem for _(...) method calls and sends the collected translation keys to the remote service'
+    task :update => :environment do
+      keys = rest.update({:translation_keys => ['ke', 'a']})
+      keys.each do |k|
+        if tk = TranslationKey.get(k[:id])
+          tk.update(k)
+        else
+          TranslationKey.create(k)
+        end
+      end
+    end
+
+    task :commit => :environment do
+      keys = rest.put('translation_keys/commit')
+      keys.each do |k|
+        if tk = TranslationKey.get(k[:id])
+          if tk.state == :deleted
+            tk.destroy!
+          else
+            tk.update(k)
+          end
+        else
+          TranslationKey.create(k) unless k[:state].to_sym == :deleted
+        end
+      end
+    end
+
+    task :rollback => :environment do
+
+    end
+  end
+
+end
+class RestClient
+
+  def initialize(url)
+    @r = RestClient::Resource.new(url)
+#    @root = root.to_s
+  end
+
+  def resource_name(obj, name = nil)
+    n =
+      case obj
+      when Hash
+        args[0].keys.first
+      when Array
+        if obj.empty?
+          name
+        else
+          resource_name(obj[0])
+        end
+      else
+        obj.class
+      end  
+    n.to_s.underscore.to_sym
+  end
+
+  def resource(obj)
+    r = @r[resource_name(obj)]
+    if params && params['id']
+        r = r[params['id']]
+    end
+  end
+end
+
+class RestResource
+
+  def initialize(resource)
+    @resource = resource
+  end
+
+  def send(&block)
+    raise "no method given - call any CRUD method first" unless @method
+    headers = {}
+    headers[:params] = @params if @params
+    result =
+      if @payload
+        @resource.send @method, @payload.to_json, headers, &block
+      else
+        @resource.send @method, headers, &block
+      end
+    result = JSON.load(result)
+    if @model
+      if result.is_a? Array
+        result.collect do |r|
+          @model.new(r)
+        end
+      else
+        @model.new(result)
+      end
+    else
+      result
+    end
+  end
+
+  # retrieve(:locales, {:updated_at => ...}).verb(:last_changes) => GET /locales/last_changes?updated=...
+  def verb(v)
+    @resource = @resource[v.to_s]
+    self
+  end
+
+  def as_model(obj)
+    obj.respond_to?(:model_name) ? obj.model_name : obj.class
+  end
+
+  def path(data)
+    @model = 
+      case data
+      when Hash
+        data.keys.first
+      when Array
+        if data.empty?
+          #TODO
+        else
+          as_model(data[0])
+        end
+      else
+        as_model(data)
+      end
+    @model = key.to_s.underscore
+  end
+
+  # retrieve(Locale) => GET /locales
+  # retrieve(Locale, 1) => GET /locales/1
+  # retrieve(Locale, {:updated_at => ...}) => GET /locales?updated=...
+  # retrieve(:locales, {:updated_at => ...}) => GET /locales?updated=...
+  # retrieve(:locales, 1) => GET /locales/1
+  def retrieve(*args)
+    @method = :get
+    @payload = nil
+    if args.last.is_a? Hash
+      @params = args.delete_at(args.size - 1)
+    else
+      @params = nil
+    end
+    @resource = @base[path(args[0]) + args[1..-1].join('/')]
+    self
+  end
+
+  # create(locale) => POST /locales
+  # create(:locale => {:code => 'en'}) => POST /locales
+  def create(obj_or_hash)
+    @method = :post
+    @payload = obj_or_hash
+    @params = nil
+    @resource = @base[path(obj_or_hash)]
+    self
+  end
+
+  def update(obj_or_hash)
+    @method = :put
+    @payload = obj_or_hash
+    @params = nil
+    @resource = @base[path(obj_or_hash)]
+    self
+  end
+
+  def delete(obj_or_hash)
+    @method = :delete
+    @payload = obj_or_hash
+    @params = nil
+    @resource = @base[path(obj_or_hash)]
+    self
+  end
+
+end
+
+class ResourceFactory
+
+  def resource(key)
+    k = key.to_s.underscore.to_sym
+    RestClient::Resource.new("http://localhost:#{port}/#{key}")
+  end
+
+  def method_missing(method, *args)
+    case args[0]
+    when Hash
+      r = resource(args[0].keys.first)
+    when Array
+      if args[0].empty?
+        r = resource(args[1])
+      else
+        r = resource(args[0][0].class)
+      end
+    else
+      r = resource(args[0].class)
+    end
+
+    
+  end
+end

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

@@ -0,0 +1,11 @@
+module Ixtlan
+  module GetText
+    class TranslationKey
+      include DataMapper::Resource
+
+      property :key, String, :unique=>true, :required => true
+      
+      timestamps :at
+    end
+  end
+end

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

@@ -0,0 +1,71 @@
+require 'ixtlan/remote/summary'
+
+class Ixtlan::Remote::Updater
+
+  def initialize(restserver)
+    @restserver = restserver
+  end
+
+  def clazzes
+    @clazzes ||= {}
+  end
+  private :clazzes
+
+  def register(clazz, &block)
+    c = clazz.to_s.pluralize.underscore
+    clazzes[c] = block unless clazzes.key?(c)
+  end
+
+  # max method ORM dependent
+  if defined? ActiveRecord
+    def max(clazz)
+      @restserver.to_class(clazz).maximum(:updated_at)
+    end
+  else
+    def max(clazz)
+      @restserver.to_class(clazz).max(:updated_at)
+    end
+  end
+  private :max
+
+  # UTC timestamp of last updated record
+  def last_update(clazz)
+    @last_update ||= 
+      begin 
+        last_date = (max(clazz) || 2000.years.ago) + Date::SECONDS_IN_DAY
+        last_date.strftime('%Y-%m-%d %H:%M:%S.') + ("%06d" % (last_date.sec_fraction / Date::NANOSECONDS_IN_DAY / 1000)) + "+0:00"
+      end
+  end
+  private :last_update
+
+  # load the last changed records
+  def do_it(set = clazzes.keys)
+    @last_result = []
+    set = [set.to_s.pluralize] 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

data/lib/ixtlan/user_management/application_model.rb

@@ -0,0 +1,30 @@
+#
+# 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 UserManagement
+    class Application
+      include Virtus
+
+      attribute :name, String
+      attribute :url, String
+    end
+  end
+end

data/lib/ixtlan/user_management/application_model.rb~

@@ -0,0 +1,21 @@
+module Ixtlan
+  module UserManagement
+    class Application
+      include Virtus
+
+      attribute :name, String
+      attribute :url, String
+    end
+    class Group
+      include Virtus
+
+      attribute :name, String
+    end
+    class Authentication
+      include Virtus
+
+      attribute :login, String
+      attribute :password, String
+    end
+  end
+end

data/lib/ixtlan/user_management/application_resource.rb

@@ -0,0 +1,48 @@
+#
+# 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 UserManagement
+    class Application
+      include DataMapper::Resource
+
+      def self.storage_name(arg)
+        'ixtlan_applications'
+      end
+
+      # key for selectng the IdentityMap should remain this class if
+      # there is no single table inheritance with Discriminator in place
+      # i.e. the subclass used as key for the IdentityMap
+      def self.base_model
+        self
+      end
+
+      property :id, Serial, :auto_validation => false
+
+      property :name, String, :required => true, :unique => true, :length => 32
+      property :url, String, :required => true, :format => /^https?\:\/\/[a-z0-9\-\.]+(\.[a-z0-9]+)*(\:[0-9]+)?(\/\S*)?$/, :length => 64, :lazy => true
+      property :updated_at, DateTime, :required => true, :lazy => true
+
+      # do not record timestamps since they are set from outside
+      def set_timestamps_on_save
+      end
+    end
+  end
+end

data/lib/ixtlan/user_management/application_resource.rb~

@@ -0,0 +1,21 @@
+module Ixtlan
+  module UserManagement
+    class Application
+      include DataMapper::Resource
+
+      def self.storage_name(arg)
+        'ixtlan_applications'
+      end
+
+      property :id, Serial, :auto_validation => false
+
+      property :name, String, :required => true, :unique => true, :length => 32
+      property :url, String, :required => true, :format => /^https?\:\/\/[a-z0-9\-\.]+(\.[a-z0-9]+)*(\:[0-9]+)?(\/\S*)?$/, :length => 64, :lazy => true
+      property :updated_at, DateTime, :required => true, :lazy => true
+
+      # do not record timestamps since they are set from outside
+      def set_timestamps_on_save
+      end
+    end
+  end
+end

data/lib/ixtlan/user_management/authentcator.rb~

@@ -0,0 +1,31 @@
+module Ixtlan
+  module UserManagement
+    class User
+
+      include DataMapper::Resource
+
+      def self.storage_name(arg)
+        'ixtlan_users'
+      end
+
+      # key for selectng the IdentityMap should remain this class if
+      # there is no single table inheritance with Discriminator in place
+      # i.e. the subclass used as key for the IdentityMap
+      def self.base_model
+        self
+      end
+
+      property :id, Serial, :auto_validation => false
+      
+      property :login, String, :required => true, :unique => true, :length => 32
+      property :name, String, :required => true, :length => 128
+      property :updated_at, DateTime, :required => true
+
+      attr_accessor :groups, :applications
+
+      # do not record timestamps since they are set from outside
+      def set_timestamps_on_save
+      end
+    end
+  end
+end