activerecord-sqlserver-adapter 2.3.24 → 3.0.0

data/lib/arel/engines/sql/compilers/sqlserver_compiler.rb

@@ -0,0 +1,267 @@
+module Arel
+  class Lock < Compound
+    def initialize(relation, locked)
+      super(relation)
+      @locked = true == locked ? "WITH(HOLDLOCK, ROWLOCK)" : locked
+    end
+  end
+end
+
+module Arel
+  module SqlCompiler
+    class SQLServerCompiler < GenericCompiler
+      
+      def select_sql
+        if complex_count_sql?
+          select_sql_with_complex_count
+        elsif relation.skipped
+          select_sql_with_skipped
+        else
+          select_sql_without_skipped
+        end
+      end
+      
+      def delete_sql
+        build_query \
+          "DELETE #{taken_clause if relation.taken.present?}".strip,
+          "FROM #{relation.table_sql}",
+          ("WHERE #{relation.wheres.collect(&:to_sql).join(' AND ')}" unless relation.wheres.blank? )
+      end
+      
+      
+      protected
+      
+      def complex_count_sql?
+        projections = relation.projections
+        projections.first.is_a?(Arel::Count) && projections.size == 1 &&
+          (relation.taken.present? || relation.wheres.present?) && relation.joins(self).blank?
+      end
+      
+      def taken_only?
+        relation.taken.present? && relation.skipped.blank?
+      end
+      
+      def taken_clause
+        "TOP (#{relation.taken.to_i}) "
+      end
+      
+      def expression_select?
+        relation.select_clauses.any? { |sc| sc.match /(COUNT|SUM|MAX|MIN|AVG)\s*\(.*\)/ }
+      end
+      
+      def eager_limiting_select?
+        single_distinct_select? && taken_only? && relation.group_clauses.blank?
+      end
+      
+      def single_distinct_select?
+        relation.select_clauses.size == 1 && relation.select_clauses.first.to_s.include?('DISTINCT')
+      end
+      
+      def all_select_clauses_aliased?
+        relation.select_clauses.all? do |sc|
+          sc.split(',').all? { |c| c.include?(' AS ') }
+        end
+      end
+      
+      def select_sql_with_complex_count
+        joins   = correlated_safe_joins
+        wheres  = relation.where_clauses
+        groups  = relation.group_clauses
+        havings = relation.having_clauses
+        orders  = relation.order_clauses
+        taken   = relation.taken.to_i
+        skipped = relation.skipped.to_i
+        top_clause = "TOP (#{taken+skipped}) " if relation.taken.present?
+        build_query \
+          "SELECT COUNT([count]) AS [count_id]",
+          "FROM (",
+            "SELECT #{top_clause}ROW_NUMBER() OVER (ORDER BY #{unique_orders(rowtable_order_clauses).join(', ')}) AS [__rn],",
+            "1 AS [count]",
+            "FROM #{relation.from_clauses}",
+            (locked unless locked.blank?),
+            (joins unless joins.blank?),
+            ("WHERE #{wheres.join(' AND ')}" unless wheres.blank?),
+            ("GROUP BY #{groups.join(', ')}" unless groups.blank?),
+            ("HAVING #{havings.join(' AND ')}" unless havings.blank?),
+            ("ORDER BY #{unique_orders(orders).join(', ')}" unless orders.blank?),
+          ") AS [__rnt]",
+          "WHERE [__rnt].[__rn] > #{relation.skipped.to_i}"
+      end
+      
+      def select_sql_without_skipped(windowed=false)
+        selects = relation.select_clauses
+        joins   = correlated_safe_joins
+        wheres  = relation.where_clauses
+        groups  = relation.group_clauses
+        havings = relation.having_clauses
+        orders  = relation.order_clauses
+        if windowed
+          selects = expression_select? ? selects : selects.map{ |sc| clause_without_expression(sc) }          
+        elsif eager_limiting_select?
+          groups = selects.map { |sc| clause_without_expression(sc) }
+          selects = selects.map { |sc| "#{taken_clause}#{clause_without_expression(sc)}" }
+          orders = orders.map do |oc|
+            oc.split(',').reject(&:blank?).map do |c|
+              max = c =~ /desc\s*/i
+              c = clause_without_expression(c).sub(/(asc|desc)/i,'').strip
+              max ? "MAX(#{c})" : "MIN(#{c})"
+            end.join(', ')
+          end
+        elsif taken_only?
+          fsc = "#{taken_clause}#{selects.first}"
+          selects = selects.tap { |sc| sc.shift ; sc.unshift(fsc) }
+        end
+        build_query(
+          (windowed ? selects.join(', ') : "SELECT #{selects.join(', ')}"),
+          "FROM #{relation.from_clauses}",
+          (locked unless locked.blank?),
+          (joins unless joins.blank?),
+          ("WHERE #{wheres.join(' AND ')}" unless wheres.blank?),
+          ("GROUP BY #{groups.join(', ')}" unless groups.blank?),
+          ("HAVING #{havings.join(' AND ')}" unless havings.blank?),
+          ("ORDER BY #{unique_orders(orders).join(', ')}" if orders.present? && !windowed))
+      end
+      
+      def select_sql_with_skipped
+        tc = taken_clause if relation.taken.present? && !single_distinct_select?
+        build_query \
+          "SELECT #{tc}#{rowtable_select_clauses.join(', ')}",
+          "FROM (",
+            "SELECT ROW_NUMBER() OVER (ORDER BY #{unique_orders(rowtable_order_clauses).join(', ')}) AS [__rn],",
+            select_sql_without_skipped(true),
+          ") AS [__rnt]",
+          "WHERE [__rnt].[__rn] > #{relation.skipped.to_i}"
+      end
+      
+      def rowtable_select_clauses
+        if single_distinct_select?
+          ::Array.wrap(relation.select_clauses.first.dup.tap do |sc|
+            sc.sub! 'DISTINCT', "DISTINCT #{taken_clause if relation.taken.present?}".strip
+            sc.sub! table_name_from_select_clause(sc), '__rnt'
+            sc.strip!
+          end)
+        elsif relation.join? && all_select_clauses_aliased?
+          relation.select_clauses.map do |sc|
+            sc.split(',').map { |c| c.split(' AS ').last.strip  }.join(', ')
+          end
+        elsif expression_select?
+          ['*']
+        else
+          relation.select_clauses.map do |sc|
+            sc.gsub /\[#{relation.table.name}\]\./, '[__rnt].'
+          end
+        end
+      end
+      
+      def rowtable_order_clauses
+        orders = relation.order_clauses
+        if orders.present?
+          orders
+        elsif relation.join?
+          table_names_from_select_clauses.map { |tn| quote("#{tn}.#{pk_for_table(tn)}") }
+        else
+          [quote("#{relation.table.name}.#{relation.primary_key}")]
+        end
+      end
+      
+      def limited_update_conditions(conditions,taken)
+        quoted_primary_key = engine.connection.quote_column_name(relation.primary_key)
+        conditions = " #{conditions}".strip
+        build_query \
+          "WHERE #{quoted_primary_key} IN",
+          "(SELECT #{taken_clause if relation.taken.present?}#{quoted_primary_key} FROM #{engine.connection.quote_table_name(relation.table.name)}#{conditions})"
+      end
+      
+      def quote(value)
+        engine.connection.quote_column_name(value)
+      end
+      
+      def pk_for_table(table_name)
+        engine.connection.primary_key(table_name)
+      end
+      
+      def clause_without_expression(clause)
+        clause.to_s.split(',').map do |c|
+          c.strip!
+          c.sub!(/^(COUNT|SUM|MAX|MIN|AVG)\s*(\((.*)\))?/,'\3')
+          c.sub!(/^DISTINCT\s*/,'')
+          c.sub!(/TOP\s*\(\d+\)\s*/i,'')
+          c.strip
+        end.join(', ')
+      end
+      
+      def unqualify_table_name(table_name)
+        table_name.to_s.split('.').last.tr('[]','')
+      end
+      
+      def table_name_from_select_clause(sc)
+        parts = clause_without_expression(sc).split('.')
+        tn = parts.third ? parts.second : (parts.second ? parts.first : nil)
+        tn ? tn.tr('[]','') : nil
+      end
+
+      def table_names_from_select_clauses
+        relation.select_clauses.map do |sc|
+          sc.split(',').map { table_name_from_select_clause(sc) }
+        end.flatten.compact.uniq
+      end
+      
+      def unique_orders(orders)
+        existing_columns = {}
+        orders.inject([]) do |queued_orders, order|
+          table_column, dir = clause_without_expression(order).split
+          table_column = table_column.tr('[]','').split('.')
+          table, column = table_column.size == 2 ? table_column : table_column.unshift('')
+          existing_columns[table] ||= []
+          unless existing_columns[table].include?(column)
+            existing_columns[table] << column
+            queued_orders << order 
+          end
+          queued_orders
+        end
+      end
+      
+      def correlated_safe_joins
+        joins = relation.joins(self)
+        if joins.present?
+          find_and_fix_uncorrelated_joins
+          relation.joins(self)
+        else
+          joins
+        end
+      end
+      
+      def find_and_fix_uncorrelated_joins
+        join_relation = relation
+        while join_relation.present?
+          return join_relation if uncorrelated_inner_join_relation?(join_relation)
+          join_relation = join_relation.relation rescue nil
+        end
+      end
+
+      def uncorrelated_inner_join_relation?(r)
+        if r.is_a?(Arel::StringJoin) && r.relation1.is_a?(Arel::OuterJoin) && 
+            r.relation2.is_a?(String) && r.relation2.starts_with?('INNER JOIN')
+          outter_join_table1 = r.relation1.relation1.table
+          outter_join_table2 = r.relation1.relation2.table
+          string_join_table_info = r.relation2.split(' ON ').first.sub('INNER JOIN ','')
+          return nil if string_join_table_info.include?(' AS ') # Assume someone did something right.
+          string_join_table_name = unqualify_table_name(string_join_table_info)
+          uncorrelated_table1 = string_join_table_name == outter_join_table1.name && string_join_table_name == outter_join_table1.alias.name
+          uncorrelated_table2 = string_join_table_name == outter_join_table2.name && string_join_table_name == outter_join_table2.alias.name
+          if uncorrelated_table1 || uncorrelated_table2
+            on_index = r.relation2.index(' ON ')
+            r.relation2.insert on_index, " AS [#{string_join_table_name}_crltd]"
+            r.relation2.sub! "[#{string_join_table_name}].", "[#{string_join_table_name}_crltd]."
+            return r
+          else
+            return nil
+          end
+        end
+      rescue
+        nil
+      end
+      
+    end
+  end
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: activerecord-sqlserver-adapter
 version: !ruby/object:Gem::Version 
-  hash: 51
-  prerelease: 
+  hash: 7
+  prerelease: false
   segments: 
-  - 2
   - 3
-  - 24
-  version: 2.3.24
+  - 0
+  - 0
+  version: 3.0.0
 platform: ruby
 authors: 
 - Ken Collins
@@ -19,7 +19,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-10-23 00:00:00 -04:00
+date: 2010-08-29 00:00:00 -04:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -32,12 +32,12 @@ dependencies:
       - !ruby/object:Gem::Version 
         hash: 7
         segments: 
-        - 2
-        - 2
-        version: "2.2"
+        - 3
+        - 0
+        version: "3.0"
   type: :runtime
   version_requirements: *id001
-description: SQL Server 2000, 2005 and 2008 Adapter For Rails.
+description: SQL Server 2005 and 2008 Adapter For ActiveRecord
 email: ken@metaskills.net
 executables: []
 
@@ -48,48 +48,24 @@ extra_rdoc_files:
 files: 
 - CHANGELOG
 - MIT-LICENSE
-- Rakefile
 - README.rdoc
-- RUNNING_UNIT_TESTS
-- lib/activerecord-sqlserver-adapter.rb
+- lib/active_record/connection_adapters/sqlserver/core_ext/active_record.rb
+- lib/active_record/connection_adapters/sqlserver/core_ext/odbc.rb
+- lib/active_record/connection_adapters/sqlserver/database_limits.rb
+- lib/active_record/connection_adapters/sqlserver/database_statements.rb
+- lib/active_record/connection_adapters/sqlserver/errors.rb
+- lib/active_record/connection_adapters/sqlserver/query_cache.rb
+- lib/active_record/connection_adapters/sqlserver/quoting.rb
+- lib/active_record/connection_adapters/sqlserver/schema_statements.rb
 - lib/active_record/connection_adapters/sqlserver_adapter.rb
-- lib/active_record/connection_adapters/sqlserver_adapter/core_ext/active_record.rb
-- lib/active_record/connection_adapters/sqlserver_adapter/core_ext/odbc.rb
-- test/cases/aaaa_create_tables_test_sqlserver.rb
-- test/cases/adapter_test_sqlserver.rb
-- test/cases/attribute_methods_test_sqlserver.rb
-- test/cases/basics_test_sqlserver.rb
-- test/cases/calculations_test_sqlserver.rb
-- test/cases/column_test_sqlserver.rb
-- test/cases/connection_test_sqlserver.rb
-- test/cases/eager_association_test_sqlserver.rb
-- test/cases/execute_procedure_test_sqlserver.rb
-- test/cases/inheritance_test_sqlserver.rb
-- test/cases/method_scoping_test_sqlserver.rb
-- test/cases/migration_test_sqlserver.rb
-- test/cases/named_scope_test_sqlserver.rb
-- test/cases/offset_and_limit_test_sqlserver.rb
-- test/cases/pessimistic_locking_test_sqlserver.rb
-- test/cases/query_cache_test_sqlserver.rb
-- test/cases/schema_dumper_test_sqlserver.rb
-- test/cases/specific_schema_test_sqlserver.rb
-- test/cases/sqlserver_helper.rb
-- test/cases/table_name_test_sqlserver.rb
-- test/cases/transaction_test_sqlserver.rb
-- test/cases/unicode_test_sqlserver.rb
-- test/cases/validations_test_sqlserver.rb
-- test/connections/native_sqlserver/connection.rb
-- test/connections/native_sqlserver_odbc/connection.rb
-- test/migrations/transaction_table/1_table_will_never_be_created.rb
-- test/schema/sqlserver_specific_schema.rb
+- lib/activerecord-sqlserver-adapter.rb
+- lib/arel/engines/sql/compilers/sqlserver_compiler.rb
 has_rdoc: true
-homepage: http://github.com/rails-sqlserver
+homepage: http://github.com/rails-sqlserver/activerecord-sqlserver-adapter
 licenses: []
 
 post_install_message: 
 rdoc_options: 
-- --line-numbers
-- --inline-source
 - --main
 - README.rdoc
 require_paths: 
@@ -114,36 +90,10 @@ required_rubygems_version: !ruby/object:Gem::Requirement
       version: "0"
 requirements: []
 
-rubyforge_project: 
-rubygems_version: 1.6.2
+rubyforge_project: activerecord-sqlserver-adapter
+rubygems_version: 1.3.7
 signing_key: 
 specification_version: 3
-summary: SQL Server 2000, 2005 and 2008 Adapter For Rails.
-test_files: 
-- test/cases/aaaa_create_tables_test_sqlserver.rb
-- test/cases/adapter_test_sqlserver.rb
-- test/cases/attribute_methods_test_sqlserver.rb
-- test/cases/basics_test_sqlserver.rb
-- test/cases/calculations_test_sqlserver.rb
-- test/cases/column_test_sqlserver.rb
-- test/cases/connection_test_sqlserver.rb
-- test/cases/eager_association_test_sqlserver.rb
-- test/cases/execute_procedure_test_sqlserver.rb
-- test/cases/inheritance_test_sqlserver.rb
-- test/cases/method_scoping_test_sqlserver.rb
-- test/cases/migration_test_sqlserver.rb
-- test/cases/named_scope_test_sqlserver.rb
-- test/cases/offset_and_limit_test_sqlserver.rb
-- test/cases/pessimistic_locking_test_sqlserver.rb
-- test/cases/query_cache_test_sqlserver.rb
-- test/cases/schema_dumper_test_sqlserver.rb
-- test/cases/specific_schema_test_sqlserver.rb
-- test/cases/sqlserver_helper.rb
-- test/cases/table_name_test_sqlserver.rb
-- test/cases/transaction_test_sqlserver.rb
-- test/cases/unicode_test_sqlserver.rb
-- test/cases/validations_test_sqlserver.rb
-- test/connections/native_sqlserver/connection.rb
-- test/connections/native_sqlserver_odbc/connection.rb
-- test/migrations/transaction_table/1_table_will_never_be_created.rb
-- test/schema/sqlserver_specific_schema.rb
+summary: SQL Server 2005 and 2008 Adapter For ActiveRecord.
+test_files: []
+

data/RUNNING_UNIT_TESTS

@@ -1,31 +0,0 @@
-== Creating the test database
-
-The default names for the test databases are "activerecord_unittest" and 
-"activerecord_unittest2". If you want to use another database name then be sure 
-to update the connection adapter setups you want to test with in 
-test/connections/<your database>/connection.rb. Define a user named 'rails' 
-in SQL Server with all privileges granted for the test databases. Use an empty 
-password for said user.
-
-The connection files make certain assumptions. For instance, the ODBC connection 
-assumes you have a DSN setup that matches the name of the default database names.
-Review the test/connections/native_sqlserver_#{mode} file you are testing for details.
-
-
-== Requirements
-
-Get the development dependencies.
-
-  $ bundle install
-
-The tests of this adapter depend on the existence of rails checkout. Make sure 
-to checkout remotes/origin/2-3-stable, I suggest using the git_remote_branch to 
-create a personal tracking branch. Then make a local topic branch off of that like
-2-3-stable_sqlserver and commit this patch https://gist.github.com/761508 or you 
-will have around 90 some errors like this.
-
-  "Conversion failed when converting the nvarchar value 'Godfather' to data 
-   type int.: INSERT INTO [items] ([name], [id]) VALUES (N'Godfather', 1)
-
-
-

data/Rakefile

@@ -1,60 +0,0 @@
-require 'rake'
-require 'rake/testtask'
-require 'rake/rdoctask'
-
-
-def test_libs(mode='odbc')
-  ['lib',
-   'test',
-   "test/connections/native_sqlserver#{mode == 'adonet' ? '' : "_#{mode}"}",
-   "#{ENV['RAILS_SOURCE']}/activerecord/test"]
-end
-
-def test_files
-  Dir.glob("test/cases/**/*_test_sqlserver.rb").sort + 
-  (Dir.glob("#{ENV['RAILS_SOURCE']}/activerecord/test/cases/**/*_test.rb") - 
-   Dir.glob("#{ENV['RAILS_SOURCE']}/activerecord/test/cases/adapters/**/*_test.rb")).sort
-end
-
-
-task :test => ['test:dblib']
-
-
-namespace :test do
-  
-  ['dblib','odbc','adonet'].each do |mode|
-    
-    Rake::TestTask.new(mode) do |t|
-      t.libs = test_libs(mode)
-      t.test_files = test_files
-      t.verbose = true
-    end
-    
-  end
-  
-end
-
-
-namespace :profile do
-  
-  ['dblib','odbc','adonet'].each do |mode|
-    namespace mode.to_sym do
-      
-      Dir.glob("test/profile/*_profile_case.rb").sort.each do |test_file|
-        
-        profile_case = File.basename(test_file).sub('_profile_case.rb','')
-        
-        Rake::TestTask.new(profile_case) do |t|
-          t.libs = test_libs(mode)
-          t.test_files = [test_file]
-          t.verbose = true
-        end
-        
-      end
-      
-    end
-  end
-  
-end
-
-