dm-core 0.10.2 → 1.0.0.rc1

data/lib/dm-core/spec/data_objects_adapter_shared_spec.rb

@@ -1,366 +0,0 @@
-share_examples_for 'A DataObjects Adapter' do
-  before :all do
-    raise '+@adapter+ should be defined in before block' unless instance_variable_get('@adapter')
-
-    @log = StringIO.new
-
-    @original_logger = DataMapper.logger
-    DataMapper.logger = DataMapper::Logger.new(@log, :debug)
-
-    # set up the adapter after switching the logger so queries can be captured
-    @adapter = DataMapper.setup(@adapter.name, @adapter.options)
-
-    @jruby = !!(RUBY_PLATFORM =~ /java/)
-
-    @postgres   = defined?(DataMapper::Adapters::PostgresAdapter)  && @adapter.kind_of?(DataMapper::Adapters::PostgresAdapter)
-    @mysql      = defined?(DataMapper::Adapters::MysqlAdapter)     && @adapter.kind_of?(DataMapper::Adapters::MysqlAdapter)
-    @sql_server = defined?(DataMapper::Adapters::SqlserverAdapter) && @adapter.kind_of?(DataMapper::Adapters::SqlserverAdapter)
-    @oracle     = defined?(DataMapper::Adapters::OracleAdapter)    && @adapter.kind_of?(DataMapper::Adapters::OracleAdapter)
-  end
-
-  after :all do
-    DataMapper.logger = @original_logger
-  end
-
-  def reset_log
-    @log.truncate(0)
-    @log.rewind
-  end
-
-  def log_output
-    @log.rewind
-    @log.read.chomp.gsub(/^\s+~ \(\d+\.?\d*\)\s+/, '').split("\n")
-  end
-
-  def supports_default_values?
-    @adapter.send(:supports_default_values?)
-  end
-
-  def supports_returning?
-    @adapter.send(:supports_returning?)
-  end
-
-  describe '#create' do
-    describe 'serial properties' do
-      before :all do
-        class ::Article
-          include DataMapper::Resource
-
-          property :id, Serial
-
-          auto_migrate!
-        end
-
-        reset_log
-
-        Article.create
-      end
-
-      it 'should not send NULL values' do
-        statement = if @mysql
-          /\AINSERT INTO `articles` \(\) VALUES \(\)\z/
-        elsif @oracle
-          /\AINSERT INTO "ARTICLES" \("ID"\) VALUES \(DEFAULT\) RETURNING "ID"/
-        elsif supports_default_values? && supports_returning?
-          /\AINSERT INTO "articles" DEFAULT VALUES RETURNING \"id\"\z/
-        elsif supports_default_values?
-          /\AINSERT INTO "articles" DEFAULT VALUES\z/
-        else
-          /\AINSERT INTO "articles" \(\) VALUES \(\)\z/
-        end
-
-        log_output.first.should =~ statement
-      end
-    end
-
-    describe 'properties without a default' do
-      before :all do
-        class ::Article
-          include DataMapper::Resource
-
-          property :id,    Serial
-          property :title, String
-
-          auto_migrate!
-        end
-
-        reset_log
-
-        Article.create(:id => 1)
-      end
-
-      it 'should not send NULL values' do
-        regexp = if @mysql
-          /^INSERT INTO `articles` \(`id`\) VALUES \(.{1,2}\)$/i
-        elsif @sql_server
-          /^SET IDENTITY_INSERT \"articles\" ON INSERT INTO "articles" \("id"\) VALUES \(.{1,2}\) SET IDENTITY_INSERT \"articles\" OFF $/i
-        else
-          /^INSERT INTO "articles" \("id"\) VALUES \(.{1,2}\)$/i
-        end
-
-        log_output.first.should =~ regexp
-      end
-    end
-  end
-
-  describe '#select' do
-    before :all do
-      class ::Article
-        include DataMapper::Resource
-
-        property :name,   String, :key => true
-        property :author, String, :required => true
-
-        auto_migrate!
-      end
-
-      @article_model = Article
-
-      @article_model.create(:name => 'Learning DataMapper', :author => 'Dan Kubb')
-    end
-
-    describe 'when one field specified in SELECT statement' do
-      before :all do
-        @return = @adapter.select('SELECT name FROM articles')
-      end
-
-      it 'should return an Array' do
-        @return.should be_kind_of(Array)
-      end
-
-      it 'should have a single result' do
-        @return.size.should == 1
-      end
-
-      it 'should return an Array of values' do
-        @return.should == [ 'Learning DataMapper' ]
-      end
-    end
-
-    describe 'when more than one field specified in SELECT statement' do
-      before :all do
-        @return = @adapter.select('SELECT name, author FROM articles')
-      end
-
-      it 'should return an Array' do
-        @return.should be_kind_of(Array)
-      end
-
-      it 'should have a single result' do
-        @return.size.should == 1
-      end
-
-      it 'should return an Array of Struct objects' do
-        @return.first.should be_kind_of(Struct)
-      end
-
-      it 'should return expected values' do
-        @return.first.values.should == [ 'Learning DataMapper', 'Dan Kubb' ]
-      end
-    end
-  end
-
-  describe '#execute' do
-    before :all do
-      class ::Article
-        include DataMapper::Resource
-
-        property :name,   String, :key => true
-        property :author, String, :required => true
-
-        auto_migrate!
-      end
-
-      @article_model = Article
-    end
-
-    before :all do
-      @result = @adapter.execute('INSERT INTO articles (name, author) VALUES(?, ?)', 'Learning DataMapper', 'Dan Kubb')
-    end
-
-    it 'should return a DataObjects::Result' do
-      @result.should be_kind_of(DataObjects::Result)
-    end
-
-    it 'should affect 1 row' do
-      @result.affected_rows.should == 1
-    end
-
-    it 'should not have an insert_id' do
-      pending_if 'Inconsistent insert_id results', !(@postgres || @oracle || (@jruby && @mysql)) do
-        @result.insert_id.should be_nil
-      end
-    end
-  end
-
-  describe '#read' do
-    before :all do
-      class ::Article
-        include DataMapper::Resource
-
-        property :name, String, :key => true
-
-        belongs_to :parent, self, :required => false
-        has n, :children, self, :inverse => :parent
-
-        auto_migrate!
-      end
-
-      @article_model = Article
-    end
-
-    describe 'with a raw query' do
-      before :all do
-        @article_model.create(:name => 'Test').should be_saved
-
-        @query = DataMapper::Query.new(@repository, @article_model, :conditions => [ 'name IS NOT NULL' ])
-
-        @return = @adapter.read(@query)
-      end
-
-      it 'should return an Array of Hashes' do
-        @return.should be_kind_of(Array)
-        @return.all? { |entry| entry.should be_kind_of(Hash) }
-      end
-
-      it 'should return expected values' do
-        @return.should == [ { @article_model.properties[:name] => 'Test', @article_model.properties[:parent_name] => nil } ]
-      end
-    end
-
-    describe 'with a raw query with a bind value mismatch' do
-      before :all do
-        @article_model.create(:name => 'Test').should be_saved
-
-        @query = DataMapper::Query.new(@repository, @article_model, :conditions => [ 'name IS NOT NULL', nil ])
-      end
-
-      it 'should raise an error' do
-        lambda {
-          @adapter.read(@query)
-        }.should raise_error(ArgumentError, 'Binding mismatch: 1 for 0')
-      end
-    end
-
-    describe 'with a Collection bind value' do
-      describe 'with an inclusion comparison' do
-        before :all do
-          5.times do |index|
-            @article_model.create(:name => "Test #{index}", :parent => @article_model.last).should be_saved
-          end
-
-          @parents = @article_model.all
-          @query   = DataMapper::Query.new(@repository, @article_model, :parent => @parents)
-
-          @expected = @article_model.all[1, 4].map { |article| article.attributes(:property) }
-        end
-
-        describe 'that is not loaded' do
-          before :all do
-            reset_log
-            @return = @adapter.read(@query)
-          end
-
-          it 'should return an Array of Hashes' do
-            @return.should be_kind_of(Array)
-            @return.all? { |entry| entry.should be_kind_of(Hash) }
-          end
-
-          it 'should return expected values' do
-            @return.should == @expected
-          end
-
-          it 'should execute one subquery' do
-            pending_if @mysql do
-              log_output.size.should == 1
-            end
-          end
-        end
-
-        describe 'that is loaded' do
-          before :all do
-            @parents.to_a  # lazy load the collection
-          end
-
-          before :all do
-            reset_log
-            @return = @adapter.read(@query)
-          end
-
-          it 'should return an Array of Hashes' do
-            @return.should be_kind_of(Array)
-            @return.all? { |entry| entry.should be_kind_of(Hash) }
-          end
-
-          it 'should return expected values' do
-            @return.should == @expected
-          end
-
-          it 'should execute one query' do
-            log_output.size.should == 1
-          end
-        end
-      end
-
-      describe 'with an negated inclusion comparison' do
-        before :all do
-          5.times do |index|
-            @article_model.create(:name => "Test #{index}", :parent => @article_model.last).should be_saved
-          end
-
-          @parents = @article_model.all
-          @query   = DataMapper::Query.new(@repository, @article_model, :parent.not => @parents)
-
-          @expected = []
-        end
-
-        describe 'that is not loaded' do
-          before :all do
-            reset_log
-            @return = @adapter.read(@query)
-          end
-
-          it 'should return an Array of Hashes' do
-            @return.should be_kind_of(Array)
-            @return.all? { |entry| entry.should be_kind_of(Hash) }
-          end
-
-          it 'should return expected values' do
-            @return.should == @expected
-          end
-
-          it 'should execute one subquery' do
-            pending_if @mysql do
-              log_output.size.should == 1
-            end
-          end
-        end
-
-        describe 'that is loaded' do
-          before :all do
-            @parents.to_a  # lazy load the collection
-          end
-
-          before :all do
-            reset_log
-            @return = @adapter.read(@query)
-          end
-
-          it 'should return an Array of Hashes' do
-            @return.should be_kind_of(Array)
-            @return.all? { |entry| entry.should be_kind_of(Hash) }
-          end
-
-          it 'should return expected values' do
-            @return.should == @expected
-          end
-
-          it 'should execute one query' do
-            log_output.size.should == 1
-          end
-        end
-      end
-
-    end
-  end
-end

data/lib/dm-core/transaction.rb

@@ -1,508 +0,0 @@
-# TODO: move to dm-more/dm-transaction
-
-module DataMapper
-  class Transaction
-    extend Chainable
-
-    # @api private
-    attr_accessor :state
-
-    # @api private
-    def none?
-      state == :none
-    end
-
-    # @api private
-    def begin?
-      state == :begin
-    end
-
-    # @api private
-    def rollback?
-      state == :rollback
-    end
-
-    # @api private
-    def commit?
-      state == :commit
-    end
-
-    # Create a new Transaction
-    #
-    # @see Transaction#link
-    #
-    # In fact, it just calls #link with the given arguments at the end of the
-    # constructor.
-    #
-    # @api public
-    def initialize(*things)
-      @transaction_primitives = {}
-      self.state = :none
-      @adapters = {}
-      link(*things)
-      if block_given?
-        warn "Passing block to #{self.class.name}.new is deprecated (#{caller[0]})"
-        commit { |*block_args| yield(*block_args) }
-      end
-    end
-
-    # Associate this Transaction with some things.
-    #
-    # @param [Object] things
-    #   the things you want this Transaction associated with:
-    #
-    #   Adapters::AbstractAdapter subclasses will be added as
-    #     adapters as is.
-    #   Arrays will have their elements added.
-    #   Repository will have it's own @adapters added.
-    #   Resource subclasses will have all the repositories of all
-    #     their properties added.
-    #   Resource instances will have all repositories of all their
-    #     properties added.
-    #
-    # @param [Proc] block
-    #   a block (taking one argument, the Transaction) to execute within
-    #   this transaction. The transaction will begin and commit around
-    #   the block, and rollback if an exception is raised.
-    #
-    # @api private
-    def link(*things)
-      unless none?
-        raise "Illegal state for link: #{state}"
-      end
-
-      things.each do |thing|
-        case thing
-          when DataMapper::Adapters::AbstractAdapter
-            @adapters[thing] = :none
-          when DataMapper::Repository
-            link(thing.adapter)
-          when DataMapper::Model
-            link(*thing.repositories)
-          when DataMapper::Resource
-            link(thing.model)
-          when Array
-            link(*thing)
-          else
-            raise "Unknown argument to #{self.class}#link: #{thing.inspect} (#{thing.class})"
-        end
-      end
-
-      if block_given?
-        commit { |*block_args| yield(*block_args) }
-      else
-        self
-      end
-    end
-
-    # Begin the transaction
-    #
-    # Before #begin is called, the transaction is not valid and can not be used.
-    #
-    # @api private
-    def begin
-      unless none?
-        raise "Illegal state for begin: #{state}"
-      end
-
-      each_adapter(:connect_adapter, [:log_fatal_transaction_breakage])
-      each_adapter(:begin_adapter, [:rollback_and_close_adapter_if_begin, :close_adapter_if_none])
-      self.state = :begin
-    end
-
-    # Commit the transaction
-    #
-    #   If no block is given, it will simply commit any changes made since the
-    #   Transaction did #begin.
-    #
-    # @param block<Block>   a block (taking the one argument, the Transaction) to
-    #   execute within this transaction. The transaction will begin and commit
-    #   around the block, and roll back if an exception is raised.
-    #
-    # @api private
-    def commit
-      if block_given?
-        unless none?
-          raise "Illegal state for commit with block: #{state}"
-        end
-
-        begin
-          self.begin
-          rval = within { |*block_args| yield(*block_args) }
-        rescue Exception => exception
-          if begin?
-            rollback
-          end
-          raise exception
-        ensure
-          unless exception
-            if begin?
-              commit
-            end
-            return rval
-          end
-        end
-      else
-        unless begin?
-          raise "Illegal state for commit without block: #{state}"
-        end
-        each_adapter(:commit_adapter, [:log_fatal_transaction_breakage])
-        each_adapter(:close_adapter, [:log_fatal_transaction_breakage])
-        self.state = :commit
-      end
-    end
-
-    # Rollback the transaction
-    #
-    # Will undo all changes made during the transaction.
-    #
-    # @api private
-    def rollback
-      unless begin?
-        raise "Illegal state for rollback: #{state}"
-      end
-      each_adapter(:rollback_adapter_if_begin, [:rollback_and_close_adapter_if_begin, :close_adapter_if_none])
-      each_adapter(:close_adapter_if_open, [:log_fatal_transaction_breakage])
-      self.state = :rollback
-    end
-
-    # Execute a block within this Transaction.
-    #
-    # No #begin, #commit or #rollback is performed in #within, but this
-    # Transaction will pushed on the per thread stack of transactions for each
-    # adapter it is associated with, and it will ensures that it will pop the
-    # Transaction away again after the block is finished.
-    #
-    # @param block<Block> the block of code to execute.
-    #
-    # @api private
-    def within
-      unless block_given?
-        raise 'No block provided'
-      end
-
-      unless begin?
-        raise "Illegal state for within: #{state}"
-      end
-
-      adapters = @adapters
-
-      adapters.each_key do |adapter|
-        adapter.push_transaction(self)
-      end
-
-      begin
-        yield self
-      ensure
-        adapters.each_key do |adapter|
-          adapter.pop_transaction
-        end
-      end
-    end
-
-    # @api private
-    def method_missing(method, *args, &block)
-      first_arg = args.first
-
-      return super unless args.size == 1 && first_arg.kind_of?(Adapters::AbstractAdapter)
-      return super unless match = method.to_s.match(/\A(.*)_(if|unless)_(none|begin|rollback|commit)\z/)
-
-      action, condition, expected_state = match.captures
-      return super unless respond_to?(action, true)
-
-      state   = state_for(first_arg).to_s
-      execute = (condition == 'if') == (state == expected_state)
-
-      send(action, first_arg) if execute
-    end
-
-    # @api private
-    def primitive_for(adapter)
-      unless @adapters.include?(adapter)
-        raise "Unknown adapter #{adapter}"
-      end
-
-      unless @transaction_primitives.include?(adapter)
-        raise "No primitive for #{adapter}"
-      end
-
-      @transaction_primitives[adapter]
-    end
-
-    private
-
-    # @api private
-    def validate_primitive(primitive)
-      [:close, :begin, :rollback, :commit].each do |meth|
-        unless primitive.respond_to?(meth)
-          raise "Invalid primitive #{primitive}: doesnt respond_to?(#{meth.inspect})"
-        end
-      end
-
-      primitive
-    end
-
-    # @api private
-    def each_adapter(method, on_fail)
-      adapters = @adapters
-      begin
-        adapters.each_key do |adapter|
-          send(method, adapter)
-        end
-      rescue Exception => exception
-        adapters.each_key do |adapter|
-          on_fail.each do |fail_handler|
-            begin
-              send(fail_handler, adapter)
-            rescue Exception => inner_exception
-              DataMapper.logger.fatal("#{self}#each_adapter(#{method.inspect}, #{on_fail.inspect}) failed with #{exception.inspect}: #{exception.backtrace.join("\n")} - and when sending #{fail_handler} to #{adapter} we failed again with #{inner_exception.inspect}: #{inner_exception.backtrace.join("\n")}")
-            end
-          end
-        end
-        raise exception
-      end
-    end
-
-    # @api private
-    def state_for(adapter)
-      unless @adapters.include?(adapter)
-        raise "Unknown adapter #{adapter}"
-      end
-
-      @adapters[adapter]
-    end
-
-    # @api private
-    def do_adapter(adapter, what, prerequisite)
-      unless @transaction_primitives.include?(adapter)
-        raise "No primitive for #{adapter}"
-      end
-
-      state = state_for(adapter)
-
-      unless state == prerequisite
-        raise "Illegal state for #{what}: #{state}"
-      end
-
-      DataMapper.logger.debug("#{adapter.name}: #{what}")
-      @transaction_primitives[adapter].send(what)
-      @adapters[adapter] = what
-    end
-
-    # @api private
-    def log_fatal_transaction_breakage(adapter)
-      DataMapper.logger.fatal("#{self} experienced a totally broken transaction execution. Presenting member #{adapter.inspect}.")
-    end
-
-    # @api private
-    def connect_adapter(adapter)
-      if @transaction_primitives.key?(adapter)
-        raise "Already a primitive for adapter #{adapter}"
-      end
-
-      @transaction_primitives[adapter] = validate_primitive(adapter.transaction_primitive)
-    end
-
-    # @api private
-    def close_adapter_if_open(adapter)
-      if @transaction_primitives.include?(adapter)
-        close_adapter(adapter)
-      end
-    end
-
-    # @api private
-    def close_adapter(adapter)
-      unless @transaction_primitives.include?(adapter)
-        raise 'No primitive for adapter'
-      end
-
-      @transaction_primitives[adapter].close
-      @transaction_primitives.delete(adapter)
-    end
-
-    # @api private
-    def begin_adapter(adapter)
-      do_adapter(adapter, :begin, :none)
-    end
-
-    # @api private
-    def commit_adapter(adapter)
-      do_adapter(adapter, :commit, :begin)
-    end
-
-    # @api private
-    def rollback_adapter(adapter)
-      do_adapter(adapter, :rollback, :begin)
-    end
-
-    # @api private
-    def rollback_and_close_adapter(adapter)
-      rollback_adapter(adapter)
-      close_adapter(adapter)
-    end
-
-    module Adapter
-      extend Chainable
-
-      # @api private
-      def self.included(base)
-        [ :Repository, :Model, :Resource ].each do |name|
-          DataMapper.const_get(name).send(:include, Transaction.const_get(name))
-        end
-      end
-
-      # Produces a fresh transaction primitive for this Adapter
-      #
-      # Used by Transaction to perform its various tasks.
-      #
-      # @return [Object]
-      #   a new Object that responds to :close, :begin, :commit,
-      #   and :rollback,
-      #
-      # @api private
-      def transaction_primitive
-        DataObjects::Transaction.create_for_uri(normalized_uri)
-      end
-
-      # Pushes the given Transaction onto the per thread Transaction stack so
-      # that everything done by this Adapter is done within the context of said
-      # Transaction.
-      #
-      # @param [Transaction] transaction
-      #   a Transaction to be the 'current' transaction until popped.
-      #
-      # @return [Array(Transaction)]
-      #   the stack of active transactions for the current thread
-      #
-      # @api private
-      def push_transaction(transaction)
-        transactions << transaction
-      end
-
-      # Pop the 'current' Transaction from the per thread Transaction stack so
-      # that everything done by this Adapter is no longer necessarily within the
-      # context of said Transaction.
-      #
-      # @return [Transaction]
-      #   the former 'current' transaction.
-      #
-      # @api private
-      def pop_transaction
-        transactions.pop
-      end
-
-      # Retrieve the current transaction for this Adapter.
-      #
-      # Everything done by this Adapter is done within the context of this
-      # Transaction.
-      #
-      # @return [Transaction]
-      #   the 'current' transaction for this Adapter.
-      #
-      # @api private
-      def current_transaction
-        transactions.last
-      end
-
-      chainable do
-        protected
-
-        # @api semipublic
-        def open_connection
-          current_connection || super
-        end
-
-        # @api semipublic
-        def close_connection(connection)
-          unless current_connection == connection
-            super
-          end
-        end
-      end
-
-      private
-
-      # @api private
-      def transactions
-        Thread.current[:dm_transactions] ||= []
-      end
-
-      # Retrieve the current connection for this Adapter.
-      #
-      # @return [Transaction]
-      #   the 'current' connection for this Adapter.
-      #
-      # @api private
-      def current_connection
-        if transaction = current_transaction
-          transaction.primitive_for(self).connection
-        end
-      end
-    end # module Adapter
-
-    # alias the MySQL, PostgreSQL, Sqlite3 and Oracle adapters to use transactions
-    MysqlAdapter = PostgresAdapter = Sqlite3Adapter = OracleAdapter = SqlserverAdapter = Adapter
-
-    module Repository
-
-      # Produce a new Transaction for this Repository
-      #
-      # @return [Adapters::Transaction]
-      #   a new Transaction (in state :none) that can be used
-      #   to execute code #with_transaction
-      #
-      # @api public
-      def transaction
-        Transaction.new(self)
-      end
-    end # module Repository
-
-    module Model
-      # @api private
-      def self.included(mod)
-        mod.descendants.each { |model| model.extend self }
-      end
-
-      # Produce a new Transaction for this Resource class
-      #
-      # @return <Adapters::Transaction
-      #   a new Adapters::Transaction with all Repositories
-      #   of the class of this Resource added.
-      #
-      # @api public
-      def transaction
-        transaction = Transaction.new(self)
-        transaction.commit { |block_args| yield(*block_args) }
-      end
-    end # module Model
-
-    module Resource
-
-      # Produce a new Transaction for the class of this Resource
-      #
-      # @return [Adapters::Transaction]
-      #   a new Adapters::Transaction for the Repository
-      #   of the class of this Resource added.
-      #
-      # @api public
-      def transaction
-        model.transaction { |*block_args| yield(*block_args) }
-      end
-    end # module Resource
-  end # class Transaction
-
-  module Adapters
-    extendable do
-
-      # @api private
-      def const_added(const_name)
-        if Transaction.const_defined?(const_name)
-          adapter = const_get(const_name)
-          adapter.send(:include, Transaction.const_get(const_name))
-        end
-
-        super
-      end
-    end
-  end # module Adapters
-end # module DataMapper