engine-rea 0.2.1 → 0.2.2

data/lib/rea/aspect_type/due_date_type.rb

@@ -1,5 +0,0 @@
-class Rea::AspectType::DueDateType < Rea::AspectType::Base
-
-  attr_reader :name, :activation_rule
-
-end

data/lib/rea/aspect_type/identifier_setup.rb

@@ -1,7 +0,0 @@
-module Rea
-  module AspectType
-    class IdentifierSetup < Base
-      attr_reader :name, :identifier
-    end
-  end
-end

data/lib/rea/dsl.rb

@@ -1,24 +0,0 @@
-module Rea
-  module Dsl
-
-    autoload :Structural, 'rea/dsl/structural'
-    autoload :Behavioral, 'rea/dsl/behavioral'
-
-
-    def self.included base
-      base.extend ClassMethods
-      base.cattr_reader :rea, :rea_ast
-      base.cattr_accessor :type, :fields
-      base.class_variable_set "@@rea", {}
-      base.class_variable_set "@@rea_ast", {}
-      base.class_eval do
-        include Structural
-        include Behavioral
-      end
-    end
-
-    module ClassMethods
-    end
-  end
-end
-

data/lib/rea/dsl/behavioral.rb

@@ -1,50 +0,0 @@
-module Rea
-  module Dsl
-    module Behavioral
-      def self.included base
-        base.extend ClassMethods
-      end
-
-      def create_id_string
-        id_setup = self.class.rea_ast[:identifier]
-        self.send("#{id_setup.name}=", Rea::Identifier.find_last_by_name(id_setup.identifier).try(:generate))
-      end
-
-      module ClassMethods
-
-        def classification options={}, &block
-          include ::Rea::AspectType::Classification
-          rea_ast[:classification] = {}
-          Rea::CategoryType.find_or_create_by_name name.to_s, options
-          block.call if block_given?
-        end
-
-
-        def identification name, identifier
-          rea_ast[:identifier] = ::Rea::AspectType::IdentifierSetup.new :name=>name, :identifier=>identifier
-          self.before_create :create_id_string
-        end
-
-        def description name, media, options={}
-          rea[name] = ::Rea::AspectType::Description.new :name=>name, :media=>media
-        end
-
-        def due_date name, options={}
-          options = {:name=>name, :activation_rule=>'true'}.merge(options)
-          rea[name] = ::Rea::AspectType::DueDateType.new options
-          define_method "#{name}_state".to_sym do
-            if try(name).nil?
-              :disabled
-            else
-              if send(name) > Time.now
-                :incoming
-              else
-                :expired
-              end
-            end
-          end
-        end
-      end
-    end
-  end
-end

data/lib/rea/dsl/structural.rb

@@ -1,53 +0,0 @@
-module Rea
-  module Dsl
-    module Structural
-      def self.included base
-        base.extend ClassMethods
-        if base == ActiveRecord::Base
-
-        else
-          base.class_eval do
-            include ::Rea::Plugins::ActiveModel
-            def initialize options = {}
-              options.keys.each do |key|
-                instance_variable_set "@#{key}", options[key]
-              end
-            end
-          end
-        end
-      end
-
-
-      module ClassMethods
-
-        def acts_as_resource options={}, &block
-          include ::Rea::MetaType::Resource
-          block.call if block_given?
-        end
-
-
-        def acts_as_commitment options={}, &block
-          include ::Rea::MetaType::Commitment
-          yield
-        end
-
-        def acts_as_event options={}, &block
-          include ::Rea::MetaType::Event
-          block.call if block_given?
-        end
-
-        def acts_as_agent options={}, &block
-          include ::Rea::MetaType::Agent
-          yield if block_given?
-        end
-
-        def acts_as_contract options={}
-          include ::Rea::MetaType::Contract
-          yield if block_given?
-        end
-
-      end
-
-    end
-  end
-end

data/spec/models/rea/group_entity_spec.rb

@@ -1,5 +0,0 @@
-require 'spec_helper'
-
-describe Rea::GroupEntity do
-  pending "add some examples to (or delete) #{__FILE__}"
-end

data/spec/rea/dsl/behavioral_spec.rb

@@ -1,149 +0,0 @@
-require 'spec_helper'
-
-describe Rea::Dsl::Behavioral do
-
-  context :identification do
-    with_model :entity do
-      table do |t|
-        t.string :name
-        t.string :value
-        t.string :sn
-      end
-      model do
-        acts_as_resource do
-          identification :sn, :entity_sn
-        end
-      end
-    end
-
-    context :sematics do
-      subject { Entity.rea_ast }
-      its([:identifier]) { should be_a_kind_of Rea::AspectType::IdentifierSetup }
-    end
-
-    context :model do
-      subject { Entity.create :name=>:entity, :value=>1 }
-
-      before(:all) { Rea::Identifier.create! :name=>:entity_sn, :id_rule=>'#{"%010d" % last_value}' }
-
-      it { should be_valid }
-      its(:sn) { should_not be_nil }
-      its(:sn) { should =~ /\d{10}/ }
-    end
-    
-  end
-
-  context :classification do
-
-    with_model :entity do
-      table do |t|
-        t.string :name
-        t.string :value
-        t.string :category
-      end
-      model do
-        acts_as_resource do
-          classification do
-            category_type 'category_type_one' do |ct|
-              ct.category :cate_1 do |c|
-                c.category :cate_2, :cate_3
-              end
-            end
-            category_type 'category_type_two', :automatic=>true, :system=>true do |ct|
-              ct.category :category_one, :category_two
-              ct.category :category_tree do |c|
-                c.category :category_node_1, :category_node_2, :category_node_3
-              end
-            end
-          end
-          member :category, :type=>:category_type_one
-        end
-      end
-    end
-
-    context :sematics do
-
-      context :category_type_defaults do
-        subject { Rea::CategoryType.find_by_name 'category_type_one' }
-
-        it { should_not be_nil }
-        it { should_not be_system }
-        it { should_not be_multiple }
-        it { should_not be_automatic }
-      end
-
-      context :category_type_two do
-        subject { Rea::CategoryType.find_by_name 'category_type_two' }
-
-        it { should_not be_nil }
-        its(:categories) { should have(6).items }
-        context :category_tree do
-          subject { Rea::Category.find_by_name('category_tree').child_categories }
-          it { should have(3).items }
-        end
-      end
-
-      context :rea do
-        subject { Entity.rea }
-        its([:category]) { should be_a_kind_of(Rea::AspectType::MemberType) }
-      end
-      context :member_field do
-        subject { Entity.rea[:category] }
-        its(:category_options) { should have(3).items }
-      end
-    end
-    context :model do
-      context :entity do
-        context :methods do
-          let(:cate_3) { Rea::Category.find_by_name :cate_3 }
-          let(:cate_1) { Rea::Category.find_by_name :cate_1 }
-          subject { Entity.create :name=>:name, :value=>1, :category=>:cate_3 }
-          it { subject.is(cate_3).should be_true }
-          it { subject.is_in(cate_1).should be_true }
-        end
-      end
-    end
-  end
-
-  context :description do
-
-    with_model :entity do
-      table do |t|
-      end
-      model do
-        acts_as_resource do
-          description :text, :text
-          description :markdown, :md
-        end
-      end
-    end
-
-    subject { Entity.rea }
-    its([:text]) { should be_a_kind_of(Rea::AspectType::Description) }
-  end
-
-  context :due_date do
-    with_model :entity do
-      table do |t|
-        t.datetime :date_one
-        t.datetime :date_two
-      end
-      model do
-        acts_as_resource do
-          due_date :date_one
-          due_date :date_two, :activation_rule=>'date_one.nil?'
-        end
-      end
-    end
-
-    context :sematics do
-      subject { Entity.rea }
-      its([:date_one]) { should be_a_kind_of(::Rea::AspectType::DueDateType) }
-    end
-    context :model do
-      subject { Entity.new :date_one=>1.day.ago, :date_two=>nil }
-      its(:date_one_state) { should == :expired }
-      its(:date_two_state) { should == :disabled }
-    end
-  end
-end

data/spec/rea/dsl/structural_spec.rb

@@ -1,299 +0,0 @@
-require 'spec_helper'
-
-describe Rea::Dsl::Structural do
-  shared_examples "entities" do |attrs, defaults|
-    context :definations do
-      let!(:entity) { entity_class.new defaults }
-      subject { entity_class }
-      attrs.each do |attr|
-        its(:public_instance_methods) { should include attr }
-      end
-    end
-    context :validations do
-      context :valid do
-        subject { (entity_class).new defaults }
-        after(:each) { pp subject.errors unless subject.valid? }
-        it { should be_valid }
-      end
-      context :invalid do
-        subject { (entity_class).new }
-        it { should_not be_valid }
-      end
-    end
-  end
-
-  def self.create_entity_model name, columns = [:name, :value], &block
-    with_model name do
-      table do |t|
-        columns.each do |c| t.string c end
-      end
-      model &block
-    end
-    let!(:entity_class) { name.to_s.camelize.constantize }
-  end
-
-
-  context :acts_as_resource do
-    context :active_record do
-      with_model :resource do
-        table do |t|
-          t.string :name
-          t.decimal :value
-        end
-        model do
-          acts_as_resource
-        end
-      end
-      let!(:entity_class) { Resource }
-      include_examples "entities", [:name, :value], :name=>:name, :value=>1
-    end
-
-    context :simple_class do
-      class SimpleResource
-        include Rea::Dsl
-        acts_as_resource do
-          item :rmb, :id=>1, :value=>1
-          item :usd, :id=>2, :value=>6.78
-        end
-      end
-
-      entity_class = SimpleResource
-      let!(:entity_class) { entity_class }
-      include_examples "entities", [:name, :value], :name=>:name, :value=>1
-      context :nested_items do
-        subject { entity_class }
-        its("rmb.value") { should == 1 }
-        its("rmb.name") { should == "rmb" }
-        its("usd.value") { should == 6.78 }
-      end
-    end
-  end
-
-  context :acts_as_agent do
-    context :active_record do
-      create_entity_model(:agent, [:name]) do acts_as_agent end
-      include_examples "entities", [:name], :name=>:name
-    end
-
-    context :simple_class do
-      class SimpleAgent
-        include Rea::Dsl
-        acts_as_agent do
-          item :facebook, :id=>1
-          item :google, :id=>2
-        end
-      end
-      entity_class = SimpleAgent
-      let!(:entity_class) { entity_class}
-      include_examples "entities", [:name], :name=>:name
-      context :nested_items do
-        subject { entity_class }
-        its("facebook.name") { should == "facebook" }
-      end
-    end
-
-  end
-
-  context :acts_as_event do
-    context :active_record do
-      with_model :resource do
-        table do |t|
-          t.string :name
-          t.decimal :value
-        end
-        model do
-          acts_as_resource
-        end
-      end
-      with_model :agent do
-        table do |t|
-          t.string :name
-        end
-        model do
-          acts_as_agent
-        end
-      end
-      with_model :increment_event do
-        table do |t|
-          t.references :resource
-          t.references :provider
-          t.decimal :amount
-          t.timestamps
-        end
-        model do
-          acts_as_event do
-            resource Resource
-            provider Agent
-          end
-        end
-      end
-      let!(:entity_class) { IncrementEvent }
-      include_examples "entities", [:resource, :amount, :provider ], {:resource_id=>1,:provider_id=>1,:amount=>1}
-    end
-
-  end
-  context :acts_as_increment_commitment do
-    context :active_record do
-      with_model :resource do
-        table do |t|
-          t.string :name
-          t.decimal :value
-        end
-        model do
-          acts_as_resource
-        end
-      end
-      with_model :agent do
-        table do |t|
-          t.string :name
-        end
-        model do
-          acts_as_agent
-        end
-      end
-      with_model :increment_event do
-        table do |t|
-          t.references :resource
-          t.references :provider
-          t.decimal :amount
-          t.timestamps
-        end
-        model do
-          acts_as_event do
-            resource Resource
-            provider Agent
-          end
-        end
-      end
-
-      with_model :increment_commitment do
-        table do |t|
-          t.references :resource
-          t.references :provider
-          t.decimal :amount
-          t.boolean :fulfilled, :default=>false
-          t.timestamps
-        end
-        model do
-          acts_as_commitment do
-            resource Resource
-            provider Agent
-            event_creator IncrementEvent
-          end
-        end
-      end
-      let!(:entity_class) { IncrementCommitment }
-      include_examples "entities", [:resource, :amount, :provider ], {:resource_id=>1,:provider_id=>1,:amount=>1}
-
-      context :fulfill do
-        subject { IncrementCommitment }
-        its(:event_creator) { should == IncrementEvent }
-      end
-
-      context :callback do
-        subject { IncrementCommitment.new :resource_id=>1, :provider_id=>1, :amount=>1, :fulfilled=>true }
-        it :should_create_event do
-          expect {
-            subject.save
-          }.to change {IncrementEvent.count}
-        end
-        it :event_sum_amount_should_plus_when_fulfill do
-          expect {
-            subject.save
-          }.to change{IncrementEvent.sum(:amount)}.by(1)
-        end
-        it :event_sum_amount_should_minus_when_not_fulfill do
-          subject.save
-          subject.fulfilled = false
-          expect {
-            subject.save
-          }.to change{IncrementEvent.sum(:amount)}.by(-1)
-        end
-      end
-    end
-  end
-
-  context :acts_as_contract do
-    context :normal do
-      with_model :increment_commitment do
-        table do |t|
-          t.references :provider
-          t.references :resource
-          t.references :contract
-          t.decimal :amount
-          t.boolean :fulfilled
-        end
-        model do
-          acts_as_commitment do
-          end
-        end
-      end
-      with_model :decrement_commitment do
-        table do |t|
-          t.references :contract
-        end
-        model do
-          acts_as_commitment do
-          end
-        end
-      end
-      with_model :order do
-        table do |t|
-        end
-        model do
-          acts_as_contract do
-            clause IncrementCommitment
-            clause DecrementCommitment
-          end
-        end
-      end
-      context :sematics do
-        context :contract do
-          subject { Order }
-          its(:public_instance_methods) { should include :increment_commitments }
-          its(:public_instance_methods) { should include :decrement_commitments }
-        end
-        context :commitment do
-          subject { IncrementCommitment }
-          its(:public_instance_methods) { should include :contract }
-        end
-      end
-      context :model do
-        subject { Order.create }
-        it :could_add_increment_commitment do
-          expect { subject.increment_commitments.create :provider_id=>1, :resource_id=>1, :amount=>10
-          }.to change{IncrementCommitment.count}
-        end
-      end
-    end
-  end
-
-  context :grouping do
-    with_model :entity do
-      table do |t|
-        t.string :name
-      end
-      model do
-        acts_as_resource do
-          grouping do
-            group_item :group_one, :group_two
-            group_item :group_three
-          end
-        end
-      end
-    end
-
-    context :reflect_on_all_associations do
-      subject { Entity.reflect_on_all_associations.map(&:name) }
-      it { should include(:group_entities) }
-      it { should include(:groups) }
-    end
-
-    context :group_items do
-      subject { Rea::Group.groups(Entity).map(&:name) }
-      its(:size) { should == 3}
-      it { should include('group_one') } 
-    end
-  end
-
-end