rainux-2000-2005-adapter 2.2.15

data/test/cases/specific_schema_test_sqlserver.rb

@@ -0,0 +1,26 @@
+require 'cases/sqlserver_helper'
+
+class StringDefault < ActiveRecord::Base; end;
+
+class SpecificSchemaTestSqlserver < ActiveRecord::TestCase
+  
+  should 'default strings before save' do
+    default = StringDefault.new
+    assert_equal nil, default.string_with_null_default
+    assert_equal 'null', default.string_with_pretend_null_one
+    assert_equal '(null)', default.string_with_pretend_null_two
+    assert_equal 'NULL', default.string_with_pretend_null_three
+    assert_equal '(NULL)', default.string_with_pretend_null_four
+    assert_equal '(3)', default.string_with_pretend_paren_three
+  end
+
+  should 'default strings after save' do
+    default = StringDefault.create
+    assert_equal nil, default.string_with_null_default
+    assert_equal 'null', default.string_with_pretend_null_one
+    assert_equal '(null)', default.string_with_pretend_null_two
+    assert_equal 'NULL', default.string_with_pretend_null_three
+    assert_equal '(NULL)', default.string_with_pretend_null_four
+  end
+  
+end

data/test/cases/sqlserver_helper.rb

@@ -0,0 +1,119 @@
+require 'rubygems'
+require 'shoulda'
+require 'mocha'
+require 'cases/helper'
+require 'models/topic'
+require 'active_record/version'
+
+SQLSERVER_TEST_ROOT       = File.expand_path(File.join(File.dirname(__FILE__),'..'))
+SQLSERVER_ASSETS_ROOT     = SQLSERVER_TEST_ROOT + "/assets"
+SQLSERVER_FIXTURES_ROOT   = SQLSERVER_TEST_ROOT + "/fixtures"
+SQLSERVER_MIGRATIONS_ROOT = SQLSERVER_TEST_ROOT + "/migrations"
+SQLSERVER_SCHEMA_ROOT     = SQLSERVER_TEST_ROOT + "/schema"
+ACTIVERECORD_TEST_ROOT    = File.expand_path(SQLSERVER_TEST_ROOT + "/../../../../rails/activerecord/test/")
+
+ActiveRecord::Migration.verbose = false
+
+# Defining our classes in one place as well as soem core tests that need coercing date/time types.
+
+class TableWithRealColumn < ActiveRecord::Base; end
+class FkTestHasFk < ActiveRecord::Base ; end
+class FkTestHasPk < ActiveRecord::Base ; end
+class NumericData < ActiveRecord::Base ; self.table_name = 'numeric_data' ; end
+class CustomersView < ActiveRecord::Base ; self.table_name = 'customers_view' ; end
+class StringDefaultsView < ActiveRecord::Base ; self.table_name = 'string_defaults_view' ; end
+class StringDefaultsBigView < ActiveRecord::Base ; self.table_name = 'string_defaults_big_view' ; end
+class SqlServerUnicode < ActiveRecord::Base ; end
+class SqlServerString < ActiveRecord::Base ; end
+class SqlServerChronic < ActiveRecord::Base
+  coerce_sqlserver_date :date
+  coerce_sqlserver_time :time
+  default_timezone = :utc
+end
+class Topic < ActiveRecord::Base
+  coerce_sqlserver_date :last_read
+  coerce_sqlserver_time :bonus_time
+end
+class Person < ActiveRecord::Base
+  coerce_sqlserver_date :favorite_day
+end
+
+# A module that we can include in classes where we want to override an active record test.
+
+module SqlserverCoercedTest
+  def self.included(base)
+    base.extend ClassMethods
+  end
+  module ClassMethods
+    def coerced_tests
+      self.const_get(:COERCED_TESTS) rescue nil
+    end
+    def method_added(method)
+      if coerced_tests && coerced_tests.include?(method)
+        undef_method(method)
+        STDOUT.puts("Undefined coerced test: #{self.name}##{method}")
+      end
+    end
+  end
+end
+
+# Set weather to test unicode string defaults or not. Used from rake task.
+
+if ENV['ENABLE_DEFAULT_UNICODE_TYPES'] == 'true'
+  puts "With enabled unicode string types"
+  ActiveRecord::ConnectionAdapters::SQLServerAdapter.enable_default_unicode_types = true
+end
+
+# Change the text database type to support ActiveRecord's tests for = on text columns which 
+# is not supported in SQL Server text columns, so use varchar(8000) instead.
+
+if ActiveRecord::Base.connection.sqlserver_2000?
+  if ActiveRecord::ConnectionAdapters::SQLServerAdapter.enable_default_unicode_types
+    ActiveRecord::ConnectionAdapters::SQLServerAdapter.native_text_database_type = 'nvarchar(4000)'
+  else
+    ActiveRecord::ConnectionAdapters::SQLServerAdapter.native_text_database_type = 'varchar(8000)'
+  end
+end
+
+# Our changes/additions to ActiveRecord test helpers specific for SQL Server.
+
+ActiveRecord::Base.connection.class.class_eval do
+  IGNORED_SQL << %r|SELECT SCOPE_IDENTITY| << %r{INFORMATION_SCHEMA\.(TABLES|VIEWS|COLUMNS)}
+  IGNORED_SQL << %r|SELECT @@IDENTITY| << %r|SELECT @@ROWCOUNT| << %r|SELECT @@version| << %r|SELECT @@TRANCOUNT|
+end
+
+ActiveRecord::ConnectionAdapters::SQLServerAdapter.class_eval do
+  def raw_select_with_query_record(sql, name = nil)
+    $queries_executed ||= []
+    $queries_executed << sql unless IGNORED_SQL.any? { |r| sql =~ r }
+    raw_select_without_query_record(sql,name)
+  end
+  alias_method_chain :raw_select, :query_record
+end
+
+module ActiveRecord 
+  class TestCase < ActiveSupport::TestCase
+    class << self
+      def sqlserver_2000? ; ActiveRecord::Base.connection.sqlserver_2000? ; end
+      def sqlserver_2005? ; ActiveRecord::Base.connection.sqlserver_2005? ; end
+      def active_record_2_point_2? ; ActiveRecord::VERSION::MAJOR == 2 && ActiveRecord::VERSION::MINOR == 2 ; end
+      def active_record_2_point_3? ; ActiveRecord::VERSION::MAJOR == 2 && ActiveRecord::VERSION::MINOR == 3 ; end
+    end
+    def assert_sql(*patterns_to_match)
+      $queries_executed = []
+      yield
+    ensure
+      failed_patterns = []
+      patterns_to_match.each do |pattern|
+        failed_patterns << pattern unless $queries_executed.any?{ |sql| pattern === sql }
+      end
+      assert failed_patterns.empty?, "Query pattern(s) #{failed_patterns.map(&:inspect).join(', ')} not found in:\n#{$queries_executed.inspect}"
+    end
+    def sqlserver_2000? ; self.class.sqlserver_2000? ; end
+    def sqlserver_2005? ; self.class.sqlserver_2005? ; end
+    def active_record_2_point_2? ; self.class.active_record_2_point_2? ; end
+    def active_record_2_point_3? ; self.class.active_record_2_point_3? ; end
+  end
+end
+
+

data/test/cases/table_name_test_sqlserver.rb

@@ -0,0 +1,22 @@
+require 'cases/sqlserver_helper'
+require 'models/order'
+
+class TableNameTestSqlserver < ActiveRecord::TestCase
+  
+  self.use_transactional_fixtures = false
+  
+  def setup
+    Order.table_name = '[orders]'
+    Order.reset_column_information
+  end
+  
+  should 'load columns with escaped table name for model' do
+    assert_equal 4, Order.columns.length
+  end
+  
+  should 'not re-escape table name if it is escaped already for SQL queries' do
+    assert_sql(/SELECT \* FROM \[orders\]/) { Order.all }
+  end
+  
+  
+end

data/test/cases/transaction_test_sqlserver.rb

@@ -0,0 +1,93 @@
+require 'cases/sqlserver_helper'
+require 'models/ship'
+require 'models/developer'
+
+class TransactionTestSqlserver < ActiveRecord::TestCase
+  
+  self.use_transactional_fixtures = false
+  
+  setup :delete_ships
+  
+  context 'Testing transaction basics' do
+    
+    should 'allow ActiveRecord::Rollback to work in 1 transaction block' do
+      Ship.transaction do
+        Ship.create! :name => 'Black Pearl'
+        raise ActiveRecord::Rollback
+      end
+      assert_no_ships
+    end
+    
+    should 'allow nested transactions to totally rollback' do
+      begin
+        Ship.transaction do
+          Ship.create! :name => 'Black Pearl'
+          Ship.transaction do
+            Ship.create! :name => 'Flying Dutchman'
+            raise 'HELL'
+          end
+        end
+      rescue Exception => e
+        assert_no_ships
+      end
+    end
+
+  end
+  
+  context 'Testing #outside_transaction?' do
+  
+    should 'work in simple usage' do
+      assert Ship.connection.outside_transaction?
+      Ship.connection.begin_db_transaction
+      assert !Ship.connection.outside_transaction?
+      Ship.connection.rollback_db_transaction
+      assert Ship.connection.outside_transaction?
+    end
+    
+    should 'work inside nested transactions' do
+      assert Ship.connection.outside_transaction?
+      Ship.transaction do
+        assert !Ship.connection.outside_transaction?
+        Ship.transaction do
+          assert !Ship.connection.outside_transaction?
+        end
+      end
+      assert Ship.connection.outside_transaction?
+    end
+    
+    should 'not call rollback if no transaction is active' do
+      assert_raise RuntimeError do
+        Ship.transaction do
+          Ship.connection.rollback_db_transaction
+          Ship.connection.expects(:rollback_db_transaction).never
+          raise "Rails doesn't scale!"
+        end
+      end
+    end
+    
+    should 'test_open_transactions_count_is_reset_to_zero_if_no_transaction_active' do
+      Ship.transaction do
+        Ship.transaction do
+          Ship.connection.rollback_db_transaction
+        end
+        assert_equal 0, Ship.connection.open_transactions
+      end
+      assert_equal 0, Ship.connection.open_transactions
+    end
+    
+  end unless active_record_2_point_2?
+  
+  
+  
+  protected
+  
+  def delete_ships
+    Ship.delete_all
+  end
+  
+  def assert_no_ships
+    assert Ship.count.zero?, "Expected Ship to have no models but it did have:\n#{Ship.all.inspect}"
+  end
+  
+end
+

data/test/cases/unicode_test_sqlserver.rb

@@ -0,0 +1,44 @@
+require 'cases/sqlserver_helper'
+
+class UnicodeTestSqlserver < ActiveRecord::TestCase
+  
+  
+  context 'Testing basic saves and unicode limits' do
+
+    should 'save and reload simple nchar string' do
+      assert nchar_data = SqlServerUnicode.create!(:nchar => 'A')
+      assert_equal 'A', SqlServerUnicode.find(nchar_data.id).nchar
+    end
+    
+    should 'save and reload simple nvarchar(max) string' do
+      test_string = 'Ken Collins'
+      assert nvarcharmax_data = SqlServerUnicode.create!(:nvarchar_max => test_string)
+      assert_equal test_string, SqlServerUnicode.find(nvarcharmax_data.id).nvarchar_max
+    end if sqlserver_2005?
+
+    should 'enforce default nchar_10 limit of 10' do
+      assert_raise(ActiveRecord::StatementInvalid) { SqlServerUnicode.create!(:nchar => '01234567891') }
+    end
+
+    should 'enforce default nvarchar_100 limit of 100' do
+      assert_raise(ActiveRecord::StatementInvalid) { SqlServerUnicode.create!(:nvarchar_100 => '0123456789'*10+'1') }
+    end
+
+  end
+  
+  context 'Testing unicode data' do
+
+    setup do
+      @unicode_data = "一二34五六"
+    end
+
+    should 'insert into nvarchar field' do
+      assert data = SqlServerUnicode.create!(:nvarchar => @unicode_data)
+      assert_equal @unicode_data, data.reload.nvarchar
+    end
+
+  end
+  
+  
+  
+end

data/test/connections/native_sqlserver/connection.rb

@@ -0,0 +1,23 @@
+print "Using native SQLServer\n"
+require_dependency 'models/course'
+require 'logger'
+
+ActiveRecord::Base.logger = Logger.new("debug.log")
+
+ActiveRecord::Base.configurations = {
+  'arunit' => {
+    :adapter  => 'sqlserver',
+    :host     => 'localhost',
+    :username => 'rails',
+    :database => 'activerecord_unittest'
+  },
+  'arunit2' => {
+    :adapter  => 'sqlserver',
+    :host     => 'localhost',
+    :username => 'rails',
+    :database => 'activerecord_unittest2'
+  }
+}
+
+ActiveRecord::Base.establish_connection 'arunit'
+Course.establish_connection 'arunit2'

data/test/connections/native_sqlserver_odbc/connection.rb

@@ -0,0 +1,25 @@
+print "Using native SQLServer via ODBC\n"
+require_dependency 'models/course'
+require 'logger'
+
+ActiveRecord::Base.logger = Logger.new("debug.log")
+
+ActiveRecord::Base.configurations = {
+  'arunit' => {
+    :adapter  => 'sqlserver',
+    :mode     => 'ODBC',
+    :host     => 'localhost',
+    :username => 'rails',
+    :dsn => 'activerecord_unittest'
+  },
+  'arunit2' => {
+    :adapter  => 'sqlserver',
+    :mode     => 'ODBC',
+    :host     => 'localhost',
+    :username => 'rails',
+    :dsn => 'activerecord_unittest2'
+  }
+}
+
+ActiveRecord::Base.establish_connection 'arunit'
+Course.establish_connection 'arunit2'

data/test/migrations/transaction_table/1_table_will_never_be_created.rb

@@ -0,0 +1,11 @@
+class TableWillNeverBeCreated < ActiveRecord::Migration
+  
+  def self.up
+    create_table(:sqlserver_trans_table1) {  }
+    create_table(:sqlserver_trans_table2) { raise ActiveRecord::StatementInvalid }
+  end
+  
+  def self.down
+  end
+  
+end

data/test/schema/sqlserver_specific_schema.rb

@@ -0,0 +1,88 @@
+ActiveRecord::Schema.define do
+  
+  create_table :table_with_real_columns, :force => true do |t|
+    t.column :real_number, :real
+    # t.column :varchar_max, :varchar_max if ActiveRecord::Base.connection.sqlserver_2005?
+  end
+  
+  create_table :defaults, :force => true do |t|
+    t.column :positive_integer, :integer, :default => 1
+    t.column :negative_integer, :integer, :default => -1
+    t.column :decimal_number, :decimal, :precision => 3, :scale => 2, :default => 2.78
+  end
+  
+  create_table :string_defaults, :force => true do |t|
+    t.column :string_with_null_default, :string, :default => nil
+    t.column :string_with_pretend_null_one, :string, :default => 'null'
+    t.column :string_with_pretend_null_two, :string, :default => '(null)'
+    t.column :string_with_pretend_null_three, :string, :default => 'NULL'
+    t.column :string_with_pretend_null_four, :string, :default => '(NULL)'
+    t.column :string_with_pretend_paren_three, :string, :default => '(3)'
+  end
+  
+  create_table :sql_server_chronics, :force => true do |t|
+    t.column :date,       :date
+    t.column :time,       :time
+    t.column :datetime,   :datetime
+    t.column :timestamp,  :timestamp
+    t.column :smalldatetime, :smalldatetime
+  end
+  
+  create_table(:fk_test_has_fks, :force => true) { |t| t.column(:fk_id, :integer, :null => false) }
+  create_table(:fk_test_has_pks, :force => true) { }
+  execute <<-ADDFKSQL
+    ALTER TABLE fk_test_has_fks 
+    ADD CONSTRAINT FK__fk_test_has_fk_fk_id
+    FOREIGN KEY (#{quote_column_name('fk_id')}) 
+    REFERENCES #{quote_table_name('fk_test_has_pks')} (#{quote_column_name('id')})
+  ADDFKSQL
+  
+  create_table :sql_server_unicodes, :force => true do |t|
+    t.column :nchar,          :nchar
+    t.column :nvarchar,       :nvarchar
+    t.column :ntext,          :ntext
+    t.column :ntext_10,       :ntext,     :limit => 10
+    t.column :nchar_10,       :nchar,     :limit => 10
+    t.column :nvarchar_100,   :nvarchar,  :limit => 100
+    if ActiveRecord::Base.connection.sqlserver_2005?
+      t.column :nvarchar_max,     :nvarchar_max 
+      t.column :nvarchar_max_10,  :nvarchar_max, :limit => 10
+    end
+  end
+  
+  create_table :sql_server_strings, :force => true do |t|
+    t.column :char,     :char
+    t.column :char_10,  :char,  :limit => 10
+    if ActiveRecord::Base.connection.sqlserver_2005?
+      t.column :varchar_max,     :varchar_max 
+      t.column :varchar_max_10,  :varchar_max, :limit => 10
+    end
+  end
+  
+  create_table :sql_server_binary_types, :force => true do |t|
+    # TODO: Add some different native binary types and test.
+  end
+  
+  execute "IF EXISTS (SELECT TABLE_NAME FROM INFORMATION_SCHEMA.VIEWS WHERE TABLE_NAME = 'customers_view') DROP VIEW customers_view"
+  execute <<-CUSTOMERSVIEW
+    CREATE VIEW customers_view AS
+      SELECT id, name, balance
+      FROM customers
+  CUSTOMERSVIEW
+
+  execute "IF EXISTS (SELECT TABLE_NAME FROM INFORMATION_SCHEMA.VIEWS WHERE TABLE_NAME = 'string_defaults_view') DROP VIEW string_defaults_view"
+  execute <<-STRINGDEFAULTSVIEW
+    CREATE VIEW string_defaults_view AS
+      SELECT id, string_with_pretend_null_one as pretend_null
+      FROM string_defaults
+  STRINGDEFAULTSVIEW
+  
+  execute "IF EXISTS (SELECT TABLE_NAME FROM INFORMATION_SCHEMA.VIEWS WHERE TABLE_NAME = 'string_defaults_big_view') DROP VIEW string_defaults_big_view"
+  execute <<-STRINGDEFAULTSBIGVIEW
+    CREATE VIEW string_defaults_big_view AS
+      SELECT id, string_with_pretend_null_one as pretend_null
+      /*#{'x'*4000}}*/
+      FROM string_defaults
+  STRINGDEFAULTSBIGVIEW
+  
+end