Moving test cases to test/cases

Adding adapter_test_sqlserver.rb to test/cases - I think this file should be maintained with the adapter.

Author: snowblink

test/aaaa_create_tables_test_sqlserver.rb renamed to test/cases/aaaa_create_tables_test_sqlserver.rb

@@ -5,8 +5,8 @@ class AAAACreateTablesTestSqlserver < ActiveRecord::TestCase
   self.use_transactional_fixtures = false
 
   def setup
-    @ar_path = "../../../rails/activerecord/test/schema"
-    @base_path = "#{File.dirname(__FILE__)}/fixtures/db_definitions"
+    @ar_path = "#{File.dirname(__FILE__)}/../schema"
+    @base_path = "#{File.dirname(__FILE__)}/../fixtures/db_definitions"
   end
 
   def __test_sqlserver_load_test_schema

test/cases/adapter_test_sqlserver.rb

@@ -0,0 +1,95 @@
+require "cases/helper"
+require 'models/default'
+require 'models/post'
+require 'models/task'
+
+class SqlServerAdapterTest < ActiveRecord::TestCase
+  class TableWithRealColumn < ActiveRecord::Base; end
+
+  fixtures :posts, :tasks
+
+  def setup
+    @connection = ActiveRecord::Base.connection
+  end
+
+  def teardown
+    @connection.execute("SET LANGUAGE us_english") rescue nil
+  end
+
+  def test_real_column_has_float_type
+    assert_equal :float, TableWithRealColumn.columns_hash["real_number"].type
+  end
+
+  # SQL Server 2000 has a bug where some unambiguous date formats are not
+  # correctly identified if the session language is set to german
+  def test_date_insertion_when_language_is_german
+    @connection.execute("SET LANGUAGE deutsch")
+
+    assert_nothing_raised do
+      Task.create(:starting => Time.utc(2000, 1, 31, 5, 42, 0), :ending => Date.new(2006, 12, 31))
+    end
+  end
+
+  def test_indexes_with_descending_order
+    # Make sure we have an index with descending order
+    @connection.execute "CREATE INDEX idx_credit_limit ON accounts (credit_limit DESC)" rescue nil
+    assert_equal ["credit_limit"], @connection.indexes('accounts').first.columns
+  ensure
+    @connection.execute "DROP INDEX accounts.idx_credit_limit"
+  end
+
+  def test_execute_without_block_closes_statement
+    assert_all_statements_used_are_closed do
+      @connection.execute("SELECT 1")
+    end
+  end
+
+  def test_execute_with_block_closes_statement
+    assert_all_statements_used_are_closed do
+      @connection.execute("SELECT 1") do |sth|
+        assert !sth.finished?, "Statement should still be alive within block"
+      end
+    end
+  end
+
+  def test_insert_with_identity_closes_statement
+    assert_all_statements_used_are_closed do
+      @connection.insert("INSERT INTO accounts ([id], [firm_id],[credit_limit]) values (999, 1, 50)")
+    end
+  end
+
+  def test_insert_without_identity_closes_statement
+    assert_all_statements_used_are_closed do
+      @connection.insert("INSERT INTO accounts ([firm_id],[credit_limit]) values (1, 50)")
+    end
+  end
+
+  def test_active_closes_statement
+    assert_all_statements_used_are_closed do
+      @connection.active?
+    end
+  end
+
+  def assert_all_statements_used_are_closed(&block)
+    existing_handles = []
+    ObjectSpace.each_object(DBI::StatementHandle) {|handle| existing_handles << handle}
+    GC.disable
+
+    yield
+
+    used_handles = []
+    ObjectSpace.each_object(DBI::StatementHandle) {|handle| used_handles << handle unless existing_handles.include? handle}
+
+    assert_block "No statements were used within given block" do
+      used_handles.size > 0
+    end
+
+    ObjectSpace.each_object(DBI::StatementHandle) do |handle|
+      assert_block "Statement should have been closed within given block" do
+        handle.finished?
+      end
+    end
+  ensure
+    GC.enable
+  end
+end