gexp 0.0.1

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in gexp.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2013 Kazantsev Nickolay
+
+MIT License
+
+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.md

@@ -0,0 +1,29 @@
+# Gexp
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'gexp'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install gexp
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Add some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/gexp.gemspec

@@ -0,0 +1,32 @@
+# -*- encoding: utf-8 -*-
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'gexp/version'
+
+Gem::Specification.new do |gem|
+  gem.name          = "gexp"
+  gem.version       = Gexp::VERSION
+  gem.authors       = ["Kazantsev Nickolay"]
+  gem.email         = ["kazantsev.nickolay@gmail.com"]
+  gem.description   = %q{Gexp - comand hadlers}
+  gem.summary       = %q{Gexp - comand hadlers}
+  gem.homepage      = "http://github.com/realb0t/gexp"
+
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.require_paths = ["lib"]
+
+  gem.rubyforge_project = "gexp"
+
+  gem.add_development_dependency "rspec"
+  gem.add_development_dependency "rr"
+  gem.add_development_dependency "rake"
+  gem.add_development_dependency "state_machine"
+  gem.add_development_dependency "activesupport"
+  gem.add_development_dependency 'bson', '= 1.8.0'
+  gem.add_development_dependency 'bson_ext', '= 1.8.0'
+  gem.add_development_dependency 'mongo', '~> 1.8.0'
+  gem.add_development_dependency "mongoid", "~> 3.0.0"
+  gem.add_development_dependency 'money-mongoid', '= 0.1.2'
+end

data/lib/gexp.rb

@@ -0,0 +1,16 @@
+require "gexp/version"
+
+module Gexp
+  class << self
+    def label_to_class(label)
+      label.split('.').
+        map(&:classify).
+        join('::').constantize
+    end
+
+    def class_to_label(klass)
+      klass.name.split('::').
+        map(&:underscore).join('.')
+    end
+  end
+end

data/lib/gexp/command.rb

@@ -0,0 +1,50 @@
+# encoding: utf-8
+module Gexp
+  class Command
+
+    attr_accessor :errors
+    attr_accessor :context
+    attr_accessor :params
+
+    state_machine :initial => :new do
+      state :active
+      state :done
+      state :failed
+
+      event :activate do
+        transition :new => :active
+      end
+
+      event :complete do
+        transition :active => :done
+      end
+
+      event :failure do
+        transition :active => :failed
+      end
+    end
+
+    def initialize(params = {})
+      @params  = params.dup
+      @errors  = []
+      
+      super() # Инициализация StateMachine
+    end
+
+    def hash
+      # TODO: Заменить на BSON:ObjectId
+      [
+        @params[:timestamp],
+        @params[:event],
+        @params[:seed],
+      ].join('_')
+    end
+
+    def perform
+      self.activate!
+      self.failure!
+      raise 'Not defined perform method'
+    end
+
+  end
+end

data/lib/gexp/command/object.rb

@@ -0,0 +1,37 @@
+module Gexp
+  class Command
+    class Object < self
+
+      attr_accessor :event # TODO: only getter
+      attr_accessor :object
+
+      def initialize(params = {})
+        super
+        @event = @params[:event]
+        self.load_object
+      end
+
+      def perform
+        self.activate!
+        @object.send(self.event)
+        self.complete!
+      rescue => e
+        self.errors << e
+        self.failure!
+      end
+
+      protected
+
+        def load_object
+          if @params[:object]
+            label  = @params[:object].keys.first
+            id     = @params[:object].values.first
+            @object = Gexp.label_to_class(label).find(id)
+          else
+            raise "Can't find object params"
+          end
+        end
+
+    end
+  end
+end

data/lib/gexp/command/stack.rb

@@ -0,0 +1,50 @@
+module Gexp
+  class Command
+    class Stack
+
+      include Enumerable
+
+      attr_accessor :user, :request
+
+      def initialize(user, request)
+        @user     = user
+        @request  = request
+        @commands = {} # for ruby 1.9.x
+        self.fill()
+      end
+
+      def build_command(command_param = {})
+        Gexp::Command.new(command_param)
+      end
+
+      def fill(request = nil)
+        request ||= @request
+        @commands = {}
+
+        opts = request[:params][:commands] || []
+        opts.each do |command_param|
+          self.add self.build_command(command_param)
+        end
+      end
+
+      def size
+        @commands.size
+      end
+
+      def each(&block)
+        @commands.each(&block)
+      end
+
+      protected
+
+        def add(command)
+          command.context = self
+          if @commands[command.hash].present?
+            raise "Command with hash #{command.hash} be exist"
+          end
+          @commands[command.hash] = command
+        end
+
+    end
+  end
+end

data/lib/gexp/handler.rb

@@ -0,0 +1,25 @@
+module Gexp
+  class Handler
+    # Базовый класс обработчиков
+
+    attr_accessor :user, :object
+
+    #
+    #
+    # object - объект над котым производится обработка
+    #
+    #
+    def initialize(object = nil, params = {}, objects = nil, full_params = nil)
+      @object      = object
+      @params      = params
+      @objects     = objects
+      @user        = (@objects || {})[:self]
+      @full_params = full_params
+    end
+
+    def process(params = nil)
+      raise 'Override process handler method'
+    end
+
+  end
+end

data/lib/gexp/handler/caller.rb

@@ -0,0 +1,8 @@
+module Gexp
+  class Handler
+    class Caller < self
+
+      
+    end
+  end
+end

data/lib/gexp/handler/check.rb

@@ -0,0 +1,9 @@
+module Gexp
+  class Handler
+    class Check < self
+      def process
+        true
+      end
+    end
+  end
+end

data/lib/gexp/handler/check/item.rb

@@ -0,0 +1,34 @@
+module Gexp
+  class Handler
+    class Check
+      class Item < self
+
+        def process(params, &block)
+
+          results = params.map do |key, value|
+            [
+              key,
+              value,
+              @user.have_with_type?(key.to_s, value),
+            ]
+          end
+
+          haves = results.map(&:last).all?
+
+          if block_given?
+            return block.call(results) if haves
+          else
+            unless haves
+              view = results.map { |r| "#{r.first}_#{r.second}" }
+              raise Exception.new("not_have_items-#{view.join(',')}") 
+            end
+
+            haves
+          end
+
+        end
+
+      end
+    end
+  end
+end

data/lib/gexp/handler/check/resources.rb

@@ -0,0 +1,56 @@
+module Gexp
+  class Handler
+    class Check
+      class Resources < self
+
+        def chain_resource(resource, object = nil, params = nil)
+          if resource.is_a?(Array) # Если цепочка как массив
+            curr_field = resource.shift
+            if object # Если уже был получен результат
+              if resource.count.zero? # Если последний метод в цепочке
+                if params
+                  # Если сеттер
+                  object.send(curr_field, params) # last
+                else
+                  # Если геттер
+                  object.send(curr_field)
+                end
+              else # Если не последний метод в цепочке
+                access_resource_get(resource, object.send(curr_field), params)
+              end
+            else # Если метод еще не было вызовов
+              access_resource_get(resource, @user.send(curr_field), params)
+            end
+          else # Если цепочка как строка
+            access_resource_get(resource.split('.'), object, params)
+          end
+        end
+
+        def process(params, &block)
+
+          compairs = params.map do |resource, value|
+            if @user.respond_to?(resource)
+              current = @user.send(resource.to_s.split('.').last)
+              [ current >= value, current, value, resource ]
+            end
+          end
+
+          compairs.compact!
+          results = compairs.map(&:first).all?
+
+          if block_given?
+            block.call(compairs) if results
+          else
+            unless results
+              resources = compairs.reject(&:first).map(&:fourth)
+              raise Exception.new("out_of_resources-#{resources.join(',')}") 
+            end
+
+            results
+          end
+        end
+
+      end
+    end
+  end
+end

data/lib/gexp/handler/modify.rb

@@ -0,0 +1,9 @@
+module Gexp
+  class Handler
+    class Modify < self
+      def process
+        @user
+      end
+    end
+  end
+end

data/lib/gexp/handler/modify/resources.rb

@@ -0,0 +1,81 @@
+# encoding: utf-8
+
+# Изменяет количество ресурсов у пользователя
+module Gexp
+  class Handler
+    class Modify
+      class Resources < self
+
+        class Exception < StandardError; end
+
+        # Нормализация энергии
+        def normalize_energy(value)
+          if value > @user.max_energy
+            @user.max_energy 
+          else
+            value
+          end
+        end
+
+        # Нормализация неопределенного ресурса
+        def normalize_undefined(value)
+          value
+        end
+
+        # Нормальлизация значений ресурсов
+        def normalize(resource, value)
+          return 0 if value < 0
+          method_name = "normalize_#{resource}"
+          
+          if self.respond_to?(method_name)
+            self.send(method_name, value) 
+          else
+            self.normalize_undefined value
+          end
+        end
+
+        # Применение изменений к ОВ
+        def apply_changes
+          @changes.each do |resource, value| 
+            @user.send("#{resource}=", value[:after])
+          end
+        end
+
+        # Применимы изменения к объекту в момент обработки
+        def ontime_apply?
+          true # TODO: сделать выяснения что изменения применимы
+        end
+
+        def process(params = {}, &block)
+          @changes = {}
+          @params = params if @params.empty?
+          @params.each do |resource, value|
+            if @user.respond_to?(resource.to_sym)
+
+              if @user.send(resource) + value < 0
+                raise Exception.new("out_of_resource-#{resource}")
+              end
+
+              before_value = @user.send(resource)
+              new_value    = before_value + value
+              norm_value   = self.normalize(resource, new_value)
+
+              @changes[resource] = {
+                before: before_value,
+                delta:  value,
+                after:  norm_value,
+              }
+            end
+          end
+
+          self.apply_changes if self.ontime_apply?
+          @user.after_change!(@changes)
+
+          return block.call(@user) if block_given?
+          @user
+        end
+
+      end
+    end
+  end
+end