data_contract 0.0.2 → 0.0.3

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 21313bf05ccac5fd51cab90b564671c466fef3e8
-  data.tar.gz: e47156450c05cd0701743c566409f6b08d67a60a
+  metadata.gz: 8578d4e2bac5649c5c7151ba5bd12fe72129ff5b
+  data.tar.gz: aacdb343d6a2af0d1afa97c3f4b6d57bdda8f430
 SHA512:
-  metadata.gz: 55899798ce639684c28fd30c514de98801084dc42d7ec8ded6142351e7ff3facb54984d990bdc7ca9295714c72c88710929cd2a779fc8a8304128c71c63bf1de
-  data.tar.gz: 7a7f8e393b9f44c2da1edd7ad206fe7fe282a3e1b897c67a0ecb0f80a1669405e63f50d90e3709ca44a1e5841b9e70702d4fecc6b5ebf3a790df4fcfe3ed67ef
+  metadata.gz: cf3068a09d339ae0dada6f14ab9e293304a29ff2c17b22ef294c67f1d05f6e8e301b34b7c041574300f080e501064d55bc0833dff4c9b6b0155de37db80ba447
+  data.tar.gz: f459919bc8ed89c4989b207afc692c74d501221490737e770c1e268f37bd6c5905b71e0ca8f0ff1351373e3cdfaa505238dc795afe1ca4e043a0c4d329d91fb9

data/lib/data_contract/contract.rb

@@ -0,0 +1,37 @@
+class DataContract < Module
+  class Contract
+    attr_reader :mod
+
+    def initialize(mod)
+      @mod = mod
+    end
+
+    def setters
+      mod.instance_methods(false).select { |m| m.to_s[-1, 1] == '=' }
+    end
+
+    def getters
+      mod.instance_methods(false).select { |m| m.to_s[-1, 1] != '=' }
+    end
+
+    def compatible?(other_obj)
+      mod.instance_methods(false).each do |m|
+        return false unless other_obj.respond_to? m
+      end
+      return true
+    end
+
+    def shared?(other_obj)
+      other_obj.is_a? mod
+    end
+
+    def assignable?(other_obj)
+      unless shared? other_obj
+        unless compatible? other_obj
+          return false
+        end
+      end
+      true
+    end
+  end
+end

data/lib/data_contract/contract_error.rb

@@ -0,0 +1,4 @@
+class DataContract < Module
+  class ContractError < StandardError
+  end
+end

data/lib/data_contract/contract_list.rb

@@ -0,0 +1,35 @@
+class DataContract < Module
+  class ContractList < Array
+    attr_reader :obj
+
+    def initialize(obj=nil)
+      @obj = obj
+    end
+
+    def get(mod)
+      contract = find { |contract| contract.mod == mod }
+      raise ContractError, "No contract for #{mod.name}" unless contract
+      contract
+    end
+
+    def [](mod)
+      get mod
+    end
+
+    def assignable(receiver)
+      assignable_contracts = self.class.new obj
+
+      each do |contract|
+        if contract.assignable? receiver
+          assignable_contracts << contract
+        end
+      end
+
+      assignable_contracts
+    end
+
+    def scatter(receiver, contract_module=nil)
+      Scatter.! self, receiver, contract_module
+    end
+  end
+end

data/lib/data_contract/data_contract.rb

@@ -1,16 +1,19 @@
 class DataContract < Module
-  def self.[](contract_module)
-    new contract_module
+  def self.[](*contract_modules)
+    new contract_modules
   end
 
-  def initialize(contract_module)
-    mod = contract_module
+  def initialize(contract_modules)
+    contract_modules.each do |contract_module|
+      include contract_module
+    end
 
-    define_method(:contract_module) do
-      return contract_module
+    mods = contract_modules
+    define_method :data_contract_modules do
+      return mods
     end
+    private :data_contract_modules
 
-    include contract_module
-    include Implementation
+    include DataContractsImpl
   end
 end

data/lib/data_contract/data_contracts_impl.rb

@@ -0,0 +1,15 @@
+class DataContract < Module
+  module DataContractsImpl
+    def data_contracts
+      return @data_contracts if @data_contracts
+
+      @data_contracts = ContractList.new self
+
+      data_contract_modules.each do |contract_module|
+        @data_contracts << Contract.new(contract_module)
+      end
+      
+      @data_contracts
+    end
+  end
+end

data/lib/data_contract/scatter.rb

@@ -0,0 +1,48 @@
+class DataContract < Module
+  class Scatter
+    include Initializer
+
+    initializer :list, :source, :receiver, :assignable_contracts, :contract_module
+
+    def self.!(list, receiver, contract_module)
+      assignable_contracts = list.assignable(receiver)
+      instance = new list, list.obj, receiver, assignable_contracts, contract_module
+      instance.!
+    end
+
+    def !
+      if assignable_contracts.empty?
+        raise ContractError, "#{receiver.class.name} cannot be assigned from #{source.class.name} without a shared or compatible contract"
+      end
+
+      if contract_module
+        @assignable_contracts = specific_contract
+      end
+
+      assignable_contracts.each do |contract|
+        copy_data contract
+      end
+
+      receiver
+    end
+
+    def specific_contract
+      contract = list[contract_module]
+
+      unless assignable_contracts.include? contract
+        raise ContractError, "#{receiver.class.name} cannot be assigned from #{contract_module.name} without a shared or compatible contract"
+      end
+
+      [contract]
+    end
+
+    def copy_data(contract)
+      contract.setters.each do |setter|
+        getter = setter[0...-1]
+        val = source.send getter
+        receiver.send setter, val
+      end
+      receiver
+    end
+  end
+end

data/lib/data_contract.rb

@@ -1,3 +1,8 @@
+require 'initializer'
+
+require 'data_contract/contract'
+require 'data_contract/scatter'
+require 'data_contract/contract_list'
+require 'data_contract/data_contracts_impl'
 require 'data_contract/data_contract'
-require 'data_contract/incompatible_signature_error'
-require 'data_contract/implementation'
+require 'data_contract/contract_error'

metadata

@@ -1,24 +1,41 @@
 --- !ruby/object:Gem::Specification
 name: data_contract
 version: !ruby/object:Gem::Version
-  version: 0.0.2
+  version: 0.0.3
 platform: ruby
 authors:
 - The Sans Collective
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2013-11-24 00:00:00.000000000 Z
-dependencies: []
+date: 2013-11-25 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: initializer
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
 description: 
 email: 
 executables: []
 extensions: []
 extra_rdoc_files: []
 files:
+- lib/data_contract/contract.rb
+- lib/data_contract/contract_error.rb
+- lib/data_contract/contract_list.rb
 - lib/data_contract/data_contract.rb
-- lib/data_contract/implementation.rb
-- lib/data_contract/incompatible_signature_error.rb
+- lib/data_contract/data_contracts_impl.rb
+- lib/data_contract/scatter.rb
 - lib/data_contract.rb
 homepage: https://github.com/Sans/data-contract
 licenses: []

data/lib/data_contract/implementation.rb

@@ -1,27 +0,0 @@
-class DataContract < Module
-  module Implementation
-    def scatter(target)
-      raise IncompatibleSignatureError, "#{self.class.name} does not have a shared contract with #{target.class.name}" if !shared_contract? target
-      setters.each do |setter|
-        getter = setter[0...-1]
-        val = send getter
-        target.send setter, val
-      end
-    end
-
-    def setters
-      contract_module.instance_methods(false).select { |m| m.to_s[-1, 1] == '=' }
-    end
-
-    def getters
-      contract_module.instance_methods(false).select { |m| m.to_s[-1, 1] != '=' }
-    end
-
-    def shared_contract?(other)
-      contract_module.instance_methods(false).each do |m|
-        return false unless other.respond_to? m
-      end
-      return true
-    end
-  end
-end

data/lib/data_contract/incompatible_signature_error.rb

@@ -1,4 +0,0 @@
-class DataContract < Module
-  class IncompatibleSignatureError < StandardError
-  end
-end