datamapper2 0.0.1

data/.gitignore

@@ -0,0 +1,4 @@
+*.gem
+.bundle
+Gemfile.lock
+pkg/*

data/.rspec

@@ -0,0 +1 @@
+--colour

data/Gemfile

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

data/Guardfile

@@ -0,0 +1,6 @@
+guard 'rspec', :version => 2 do
+  watch(%r{^spec/.+_spec\.rb$})
+  watch(%r{^lib/dm2/(.+)\.rb$}) { |m| puts "spec/unit/#{m[1]}_spec.rb"; "spec/unit/#{m[1]}_spec.rb" }
+  watch('spec/spec_helper.rb')  { "spec" }
+end
+

data/Rakefile

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

data/dm2.gemspec

@@ -0,0 +1,23 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "dm2/version"
+
+Gem::Specification.new do |s|
+  s.name        = "datamapper2"
+  s.version     = Dm2::VERSION
+  s.authors     = ["kurko"]
+  s.email       = ["chavedomundo@gmail.com"]
+  s.homepage    = ""
+  s.summary     = %q{Implements the DataMapper pattern for you.}
+  s.description = %q{Implements the DataMapper pattern for you.}
+
+  s.rubyforge_project = "dm2"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+
+  s.add_development_dependency "rspec"
+  s.add_development_dependency "guard"
+end

data/lib/dm2.rb

@@ -0,0 +1,5 @@
+require "dm2/version"
+
+module Dm2
+  # Your code goes here...
+end

data/lib/dm2/mapper.rb

@@ -0,0 +1,23 @@
+module DataMapper
+  class Mapper
+    @@observed_attributes = []
+    @@attributes_values = {}
+
+    class << self
+      def attributes(*attributes)
+        @@observed_attributes = attributes
+      end
+
+      def unit_of_work(object, method, values)
+        @@attributes_values = unit_of_work_observer.observe(object, self, method, values)
+      end
+
+      def unit_of_work_observer
+        DataMapper::UnitOfWork::Observer
+      end
+
+      def observed_attributes; @@observed_attributes; end
+      def attributes_values; @@attributes_values; end
+    end
+  end
+end

data/lib/dm2/unit_of_work/observer.rb

@@ -0,0 +1,9 @@
+module DataMapper::UnitOfWork
+  class Observer
+    class << self
+      def observe(object, mapper, method, values)
+
+      end
+    end
+  end
+end

data/lib/dm2/unit_of_work/observer_definition.rb

@@ -0,0 +1,37 @@
+class Object
+  def self.method_added name
+    return true unless has_mapper?
+    return if @__last_methods_added && @__last_methods_added.include?(name)
+    return if self.methods.include?(name) && name != :name
+    send :set_unit_of_work_observer, name
+  end
+
+  def self.set_unit_of_work_observer method_name
+    modified_method = :"modified_#{method_name}"
+    @__last_methods_added = [method_name, modified_method]
+
+    alias_method modified_method, method_name
+    define_value_method method_name
+
+    @__last_methods_added = nil
+  end
+
+  def self.has_mapper?
+    Module.const_defined?("#{self}Mapper")
+  rescue
+    false
+  end
+
+  def self.define_value_method method_name
+    modified_method = modified_method_name method_name
+    define_method method_name.to_s do |*args, &block|
+      returned = send modified_method, *args, &block
+      Kernel.const_get("#{self.class}Mapper").unit_of_work self, method_name, args
+      returned
+    end
+  end
+
+  def self.modified_method_name method_name
+    :"modified_#{method_name}"
+  end
+end

data/lib/dm2/version.rb

@@ -0,0 +1,3 @@
+module Dm2
+  VERSION = "0.0.1"
+end

data/spec/spec_helper.rb

@@ -0,0 +1,10 @@
+require "rubygems"
+require "bundler/setup"
+
+Dir["lib/**/*.rb"].each { |f| require "./"+f }
+Dir["spec/support/**/*.rb"].each { |f| require "./"+f }
+
+RSpec.configure do |config|
+  config.filter_run wip: true
+  config.run_all_when_everything_filtered = true
+end

data/spec/unit/mapper_spec.rb

@@ -0,0 +1,45 @@
+require "spec_helper"
+
+describe DataMapper::Mapper do
+
+  class Mapper < DataMapper::Mapper
+  end
+
+  subject { Mapper }
+
+  before do
+
+  end
+
+  describe "#attributes" do
+    it "should define attributes to map" do
+      expect { subject.attributes(:name, :age) }
+        .to change { subject.observed_attributes }
+        .from([])
+        .to([:name, :age])
+    end
+  end
+
+  describe "#unit_of_work" do
+    class DummyMapperMapper < DataMapper::Mapper; end
+    class DummyMapper
+      attr_accessor :age
+    end
+
+    before do
+      @observer = double("Observer")
+      @dummy = DummyMapper.new
+      @dummy.age = 100
+      DummyMapperMapper.stub(:unit_of_work_observer).and_return(@observer)
+    end
+
+    it "transmits the message to UnitOfWork::Observer" do
+      @observer.should_receive(:observe)
+               .with(anything, DummyMapperMapper, an_instance_of(Symbol), an_instance_of(Array))
+               .and_return(@observer)
+
+      DummyMapperMapper.unit_of_work(@dummy, :a_method, [])
+      DummyMapperMapper.attributes_values.should == @observer
+    end
+  end
+end

data/spec/unit/unit_of_work/observer_definition_spec.rb

@@ -0,0 +1,110 @@
+require "spec_helper"
+
+describe "Observer definition" do
+
+  class Person; end
+  class PersonMapper; def unit_of_work; end; end
+  class Account; end
+  class DoubleMapper; def unit_of_work; end; end
+
+  describe "objects without a unit of work observer" do
+    context "mapper observer is not set" do
+      before do
+        Object.should_not_receive(:set_unit_of_work_observer)
+      end
+
+      it "when a method is added" do
+        class Account; def new_method; end; end
+      end
+
+      it "when an attr_accessor is set" do
+        class Account; attr_accessor :attr_accessor_method; end
+      end
+
+      it "when an attr_reader is set" do
+        class Account; attr_reader :attr_reader_method; end
+      end
+
+      it "when an attr_write is set" do
+        class Account; attr_writer :attr_writer_method; end
+      end
+    end
+  end
+
+  describe "objects with a unit of work observer" do
+    context "mapper observer is set" do
+      it "when a method is added" do
+        Object.should_receive(:set_unit_of_work_observer).once
+        class Person; def new_method; end; end
+      end
+
+      it "when an attr_accessor is set" do
+        Object.should_receive(:set_unit_of_work_observer).exactly(4).times
+        class Person; attr_accessor :attr_accessor_method, :second_attr_acessor_method; end
+      end
+
+      it "when an attr_reader is set" do
+        Object.should_receive(:set_unit_of_work_observer).once
+        class Person; attr_writer :attr_writer_method; end
+      end
+
+      it "when an attr_write is set" do
+        Object.should_receive(:set_unit_of_work_observer).once
+        class Person; attr_reader :attr_reader_method; end
+      end
+    end
+  end
+
+  describe "#set_unit_of_work_observer" do
+    it "sets an after filter for a pre-existent object" do
+      class Person; def has_after_filter; end; end
+      person = Person.new
+      PersonMapper.should_receive(:unit_of_work).with(person, :has_after_filter, []).once
+      person.has_after_filter
+    end
+
+    it "sets an after filter for a new object" do
+      class Double; def has_after_filter; end; end
+      a_double = Double.new
+      DoubleMapper.should_receive(:unit_of_work).with(a_double, :has_after_filter, []).once
+      a_double.has_after_filter
+    end
+  end
+
+  describe "unit of work observer" do
+    class UoWObserverPersonMapper
+      @@last_call = []
+      def self.unit_of_work(object, property, args)
+        @@last_call << [object, property, args]
+      end
+      def self.last_call; @@last_call; end
+    end
+
+    class UoWObserverPerson
+      attr_accessor :first_name
+      def initialize; end
+      def whatever;end
+    end
+
+    it "should register each call sepparatelly" do
+      person = UoWObserverPerson.new
+      UoWObserverPersonMapper.last_call.should include [person, :initialize, []]
+      person.first_name = "John Doe"
+      UoWObserverPersonMapper.last_call.should include [person, :first_name=, ["John Doe"]]
+      person.whatever
+      UoWObserverPersonMapper.last_call.should include [person, :whatever, []]
+      UoWObserverPersonMapper.last_call.last[0].first_name.should == "John Doe"
+    end
+  end
+
+  describe "#has_mapper?" do
+    it "should return true for Person" do
+      Person.has_mapper?.should == true
+    end
+
+    it "should return false for Account" do
+      Account.has_mapper?.should == false
+    end
+  end
+
+end

data/spec/unit/unit_of_work/observer_spec.rb

@@ -0,0 +1,12 @@
+require "spec_helper"
+
+describe DataMapper::UnitOfWork::Observer do
+  subject { DataMapper::UnitOfWork::Observer }
+
+  class DummyDomainObject; end
+
+  it "saves" do
+    subject.observe(DummyDomainObject.new, Class, "age", [100])
+  end
+
+end

metadata

@@ -0,0 +1,86 @@
+--- !ruby/object:Gem::Specification
+name: datamapper2
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- kurko
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-12 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &70178025149380 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70178025149380
+- !ruby/object:Gem::Dependency
+  name: guard
+  requirement: &70178025147800 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70178025147800
+description: Implements the DataMapper pattern for you.
+email:
+- chavedomundo@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .rspec
+- Gemfile
+- Guardfile
+- Rakefile
+- dm2.gemspec
+- lib/dm2.rb
+- lib/dm2/mapper.rb
+- lib/dm2/unit_of_work/observer.rb
+- lib/dm2/unit_of_work/observer_definition.rb
+- lib/dm2/version.rb
+- spec/spec_helper.rb
+- spec/unit/mapper_spec.rb
+- spec/unit/unit_of_work/observer_definition_spec.rb
+- spec/unit/unit_of_work/observer_spec.rb
+homepage: ''
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: dm2
+rubygems_version: 1.8.11
+signing_key: 
+specification_version: 3
+summary: Implements the DataMapper pattern for you.
+test_files:
+- spec/spec_helper.rb
+- spec/unit/mapper_spec.rb
+- spec/unit/unit_of_work/observer_definition_spec.rb
+- spec/unit/unit_of_work/observer_spec.rb