active_model_association_adapters 0.0.2

data/.gitignore

@@ -0,0 +1,5 @@
+pkg/*
+*.gem
+.bundle
+db/*
+log/*

data/Gemfile

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

data/Rakefile

@@ -0,0 +1,2 @@
+require 'bundler'
+Bundler::GemHelper.install_tasks

data/Readme.md

@@ -0,0 +1,30 @@
+ActiveModel Association Adapters
+================================
+Simple association adapters for polyglot applications.
+
+Summary
+-------
+Simple association adapters for ActiveModel-compliant models used in polyglot applications. 
+Use Mongoid and ActiveRecord together with simple macros.
+
+Examples
+--------
+
+    class Monkey < ActiveRecord::Base
+      include ActiveRecord::Adapters::Mongoid::Associations
+      has_one_document :banana
+    end
+
+    class Banana
+      include Mongoid::Document
+      field :monkey_id, :type => Integer
+    end
+
+    monkey.banana = Banana.create
+    #=> #<Banana id: 1, monkey_id: 2, created_at: "2011-06-13 21:24:39", updated_at: "2011-06-13 21:24:42"> 
+
+Caveats
+-------
+No magic, no fancy stuff. Not built for performance. Terrible craftsmanship. Currently only supports ActiveRecord and Mongoid, and only a few macros. Will likely cause segfaults, server crashes, public unrest, and giant lizard attacks.
+
+See RDoc for details (if there ever is one), and use at your own risk, if at all.

data/active_model_association_adapters.gemspec

@@ -0,0 +1,22 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "active_model_association_adapters/version"
+
+Gem::Specification.new do |s|
+  s.name        = "active_model_association_adapters"
+  s.version     = ActiveModelAssociationAdapters::VERSION
+  s.platform    = Gem::Platform::RUBY
+  s.authors     = ["Scott Burton"]
+  s.email       = ["scott.burton@chaione.com"]
+  s.homepage    = "http://www.chaione.com"
+  s.summary     = %q{Simple association adapters for polyglot applications}
+  s.description = %q{Simple association adapters for ActiveModel-compliant models used in polyglot applications.}
+
+  s.rubyforge_project = "active_model_association_adapters"
+
+  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"]
+  
+end

data/lib/active_model_association_adapters/version.rb

@@ -0,0 +1,3 @@
+module ActiveModelAssociationAdapters
+  VERSION = "0.0.2"
+end

data/lib/active_model_association_adapters.rb

@@ -0,0 +1,16 @@
+require 'active_support/concern'
+require 'active_support/dependencies/autoload'
+
+module ActiveRecord
+  module Adapters
+    module Mongoid
+      extend ActiveSupport::Autoload
+      autoload :Associations
+    end
+  end
+end
+
+module ActiveModelAssociationAdapters
+  extend ActiveSupport::Autoload
+  autoload :Verion
+end

data/lib/active_record/adapters/mongoid/associations.rb

@@ -0,0 +1,115 @@
+module ActiveRecord
+  module Adapters
+    module Mongoid
+      module Associations
+        extend ActiveSupport::Concern
+
+        def save(*args)
+          super(*args)
+          self.class.send(:__has_one_documents).each do |document|
+            save_document(document)
+          end
+          self.class.send(:__has_many_documents).each do |document|
+            save_documents(document)
+          end
+          self
+        end
+
+        private
+
+        module InstanceMethods
+          def save_document(document)
+            send(document).save if send(document) && (send(document).changed? || send(document).new_record?)
+            instance_variable_get("@old_#{document}".to_sym).save if instance_variable_get("@old_#{document}".to_sym)
+          end
+
+          def save_documents(documents)
+            send(documents).each do |document|
+              document.save if document && (document.changed? || document.new_record?)
+            end
+            if instance_variable_get("@old_#{documents}".to_sym)
+              instance_variable_get("@old_#{documents}".to_sym).each do |old_document| 
+                old_document.save
+              end
+            end
+          end
+
+          def method_missing(meth, *args, &block)
+            case meth
+            when /build_(.+)$/
+              self.send("#{$1}=".to_sym, ($1.classify.constantize).new(*args, &block)) rescue super(meth, *args, &block)
+            when /create_(.+)$/          
+              self.send("#{$1}=".to_sym, ($1.classify.constantize).create(*args, &block)) rescue super(meth, *args, &block)
+            else
+              super(meth, *args, &block)
+            end
+          end
+
+        end
+
+        module ClassMethods
+
+          def has_one_document(name)
+            __has_one_documents.delete(name)
+            __has_one_documents.push(name)
+            add_has_one_accessors_for(name)
+          end
+
+          def has_many_documents(name)
+            __has_many_documents.delete(name)
+            __has_many_documents.push(name)
+            add_has_many_accessors_for(name)
+          end
+
+          private
+
+          def __has_one_documents
+            @__has_one_documents ||= Array.new
+          end
+
+          def __has_many_documents
+            @__has_many_documents ||= Array.new
+          end
+
+          def add_has_many_accessors_for(name)
+            class_eval %Q{
+              def #{name}
+                @#{name} ||= #{name.to_s.classify}.where( (self.class.to_s.underscore + "_id").to_sym => id)
+              end
+
+              def #{name}=(others)
+                if #{name}
+                  @old_#{name} = #{name}
+                  @old_#{name}.each do |doc|
+                    doc.send((self.class.to_s.underscore + "_id=").to_sym, nil)
+                  end
+                end
+                others.each do |doc|
+                  doc.send((self.class.to_s.underscore + "_id=").to_sym, id)
+                end
+                @#{name} = others
+              end
+            }        
+          end
+
+          def add_has_one_accessors_for(name)
+            class_eval %Q{
+              def #{name}
+                @#{name} ||= #{name.to_s.classify}.first(:conditions => {(self.class.to_s.underscore + "_id").to_sym => id})
+              end
+
+              def #{name}=(other)
+                if #{name}
+                  @old_#{name} = #{name}
+                  @old_#{name}.send((self.class.to_s.underscore + "_id=").to_sym, nil)              
+                end
+                other.send((self.class.to_s.underscore + "_id=").to_sym, id)
+                @#{name} = other
+              end
+            }
+          end
+        end
+      end
+    end
+  end
+end

data/spec/mongoid_activerecord_adapter_spec.rb

@@ -0,0 +1,263 @@
+require 'spec_helper'
+
+describe ActiveModelAssociationAdapters do
+  
+  describe "ActiveRecord to Mongoid adapters" do
+    describe "has_one_document" do
+      class Monkey < ActiveRecord::Base
+        include ActiveRecord::Adapters::Mongoid::Associations
+        has_one_document :banana
+      end
+
+      class Banana
+        include Mongoid::Document
+        field :monkey_id, :type => Integer
+      end
+
+      subject {Monkey.new}
+
+      it "should have :banana in its @__has_one_documents" do
+        subject.class.instance_variable_get(:@__has_one_documents).should eql([:banana])
+      end
+
+      it "should respond_to :banana" do
+        subject.should respond_to(:banana)
+      end
+
+      it "should respond_to :banana=" do
+        subject.should respond_to(:banana=)
+      end
+
+      its(:banana) {should be_nil}
+
+      describe "adding a banana" do
+        let(:banana_1) {Banana.new}
+        let(:banana_2) {Banana.new}
+
+        context "when unsaved" do
+          context "without an existing banana" do
+            it "should get a banana" do
+              subject.banana = banana_1
+              subject.banana.should eql banana_1
+            end
+          end
+
+          context "with an existing banana" do
+            before(:each) do
+              subject.banana = banana_1
+            end
+
+            it "swaps out the banana" do
+              subject.banana = banana_2
+              subject.banana.should eql banana_2
+            end
+          end
+        end
+
+        context "when saved" do
+          subject {Monkey.create}
+          context "without an existing banana" do
+            it "should get a banana" do
+              subject.banana = banana_1
+              subject.banana.should eql banana_1
+            end
+          end
+
+          context "with an existing banana" do
+            before(:each) do
+              subject.banana = banana_1
+            end
+            it "swaps out the banana" do
+              subject.banana = banana_2
+              subject.banana.should eql banana_2
+            end
+
+            it "modifies the new banana's monkey_id" do
+              subject.banana.monkey_id.should eql(subject.id)
+            end
+          end
+
+          describe "saving" do
+            context "when the banana is a new record" do
+              it "saves the banana" do
+                subject.banana = banana_1              
+                subject.save
+                Banana.find(banana_1.id).monkey_id.should eql(subject.id)
+              end
+            end
+
+            context "when the banana is already saved" do
+              before(:each) do
+                banana_1.save
+              end
+
+              it "saves the banana's new foreign key" do
+                subject.banana = banana_1
+                subject.save
+                Banana.find(banana_1.id).monkey_id.should eql(subject.id)
+              end
+            end
+
+            context "when switching bananas" do
+              context "when the first banana is saved and the second is a new record" do
+                before(:each) do
+                  banana_1.save
+                  subject.banana = banana_1
+                  subject.save
+                  subject.banana = banana_2
+                  subject.save
+                end
+
+                it "unsets the monkey_id for the first banana" do
+                  Banana.find(banana_1.id).monkey_id.should be_nil
+                end              
+              end
+            end
+          end
+        end
+      end
+
+      describe "builder methods" do
+        its(:build_banana) {should be_an_instance_of(Banana)}
+        describe "create_banana" do
+          it "should be an instance of Banana" do
+            banana = subject.create_banana
+            banana.should be_an_instance_of(Banana)
+            banana.should_not be_new_record
+          end        
+        end
+      end
+
+    end
+
+    describe "has_many_documents" do
+      class Monkey < ActiveRecord::Base
+        include ActiveRecord::Adapters::Mongoid::Associations
+        has_many_documents :bananas
+      end
+
+      class Banana
+        include Mongoid::Document
+        field :monkey_id, :type => Integer
+      end
+
+      subject {Monkey.new}
+
+      it "should have :bananas in its @__has_many_documents" do
+        subject.class.instance_variable_get(:@__has_many_documents).should eql([:bananas])
+      end
+
+      it "should respond_to :bananas" do
+        subject.should respond_to(:bananas)
+      end
+
+      it "should respond_to :banana=" do
+        subject.should respond_to(:bananas=)
+      end
+
+      its(:bananas) {should be_an_instance_of(Mongoid::Criteria)}
+
+      describe "adding a banana" do
+        let(:banana_1) {Banana.new}
+        let(:banana_2) {Banana.new}
+        let(:banana_3) {Banana.new}
+
+        context "when unsaved" do
+          context "without existing bananas" do
+            it "should get a banana array" do
+              subject.bananas = [banana_1]
+              subject.bananas.should eql [banana_1]
+            end
+          end
+
+          context "with existing bananas" do
+            before(:each) do
+              subject.bananas = [banana_1]
+            end
+
+            it "swaps out the bananas arrays" do
+              subject.bananas = [banana_2]
+              subject.bananas.should eql [banana_2]
+            end
+          end
+        end
+
+        context "when saved" do
+          subject {Monkey.create}
+          context "without existing bananas" do
+            it "should get a banana array" do
+              subject.bananas = [banana_1]
+              subject.bananas.should eql [banana_1]
+            end
+          end
+
+          context "with existing bananas" do
+            before(:each) do
+              subject.bananas = [banana_1]
+            end
+            it "swaps out the bananas arrays" do
+              subject.bananas = [banana_2]
+              subject.bananas.should eql [banana_2]
+            end
+
+            it "modifies the new bananas' monkey_ids" do
+              subject.bananas.each do |banana|
+                banana.monkey_id.should eql(subject.id)
+              end
+            end
+          end
+
+          describe "saving" do
+            context "when one of the bananas is a new record" do
+              it "saves the banana" do
+                subject.bananas = [banana_1]              
+                subject.save
+                Banana.find(banana_1.id).monkey_id.should eql(subject.id)
+              end
+            end
+
+            context "when one of the bananas is already saved" do
+              before(:each) do
+                banana_1.save
+              end
+
+              it "saves the banana's new foreign key" do
+                subject.bananas = [banana_1]
+                subject.save
+                Banana.find(banana_1.id).monkey_id.should eql(subject.id)
+              end
+            end
+
+            context "when switching bananas" do
+              context "when the first banana is saved and the second is a new record" do
+                before(:each) do
+                  [banana_1, banana_2].each {|banana| banana.save}
+                  subject.bananas = [banana_1, banana_2]
+                  subject.save
+                  subject.bananas = [banana_2, banana_3]
+                  subject.save
+                end
+
+                it "unsets the monkey_id for banana_1" do
+                  Banana.find(banana_1.id).monkey_id.should be_nil
+                end              
+              end
+            end
+          end
+        end
+      end
+
+      describe "builder methods" do
+        its(:build_banana) {should be_an_instance_of(Banana)}
+        describe "create_banana" do
+          it "should be an instance of Banana" do
+            banana = subject.create_banana
+            banana.should be_an_instance_of(Banana)
+            banana.should_not be_new_record
+          end        
+        end
+      end 
+    end    
+  end
+  
+end

data/spec/spec_helper.rb

@@ -0,0 +1,33 @@
+require 'rubygems'
+# require 'bson_ext'
+require 'mongoid'
+require 'database_cleaner'
+require 'active_record'
+require 'rspec'
+
+require File.expand_path(File.join(__FILE__, "..", "..", "lib", "active_model_association_adapters"))
+
+ActiveRecord::Base.establish_connection(
+  :database => "db/active_model_association_adapters_test",
+  :adapter  => "sqlite3"
+)
+
+ar_tables = ["monkeys"]
+
+ar_tables.each do |table_name|
+  ActiveRecord::Base.connection.create_table table_name, :force => true do |t|
+    t.string :name
+  end
+end
+
+Mongoid.database = Mongo::Connection.new.db("active_model_association_adapters_test")
+
+include DatabaseCleaner
+
+RSpec.configure do |config|
+  config.mock_with :rspec
+
+  config.before(:all) do
+    Mongoid.master.collections.reject { |c| c.name == 'system.indexes' }.each(&:drop)
+  end
+end

metadata

@@ -0,0 +1,75 @@
+--- !ruby/object:Gem::Specification 
+name: active_model_association_adapters
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 2
+  version: 0.0.2
+platform: ruby
+authors: 
+- Scott Burton
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-06-14 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: Simple association adapters for ActiveModel-compliant models used in polyglot applications.
+email: 
+- scott.burton@chaione.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- .gitignore
+- Gemfile
+- Rakefile
+- Readme.md
+- active_model_association_adapters.gemspec
+- lib/active_model_association_adapters.rb
+- lib/active_model_association_adapters/version.rb
+- lib/active_record/adapters/mongoid/associations.rb
+- spec/mongoid_activerecord_adapter_spec.rb
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://www.chaione.com
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: active_model_association_adapters
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Simple association adapters for polyglot applications
+test_files: 
+- spec/mongoid_activerecord_adapter_spec.rb
+- spec/spec_helper.rb