dbd-sqlanywhere 0.1.0 → 0.1.1

data/CHANGELOG

@@ -1,6 +1,12 @@
 =CHANGE LOG
 
+=====0.1.1 -- 2008/11/06
+- Changed file permissions on archives
+- Changed archives to be specific to platform (.zip on windows, .tar.gz
+otherwise)
+- Removed the default rake task
+
 =====0.1.0 -- 2008/10/29
 - Initial Release
-- Wraps DBCAPI funcationality
+- Wraps DBCAPI functionality
 - Tested against DBI 0.4

data/README

@@ -29,7 +29,7 @@ The connection string takes the general form:
 where,
   [DB_NAME] is the name of the database you wish to connect to
   [USER_NAME] is the username
-  [PASSWORD] is the correspoding password for the username
+  [PASSWORD] is the corresponding password for the username
 
   [OPTIONS] is a hash of additional options for the connection. 
 
@@ -37,6 +37,12 @@ For example, to start with named connection called 'ruby_dbi' you can use:
  
   dbh = DBI.connect('DBI:SQLAnywhere:Test', 'dba', 'sql', {:CON => "ruby_dbi"})
 
+==Running Test Suite
+
+For information on running the Ruby/DBI DBD Tests, please see
+
+   test/DBD_TESTS
+
 ==Driver-Specific Features
 
 At the time of this writing, there was no standard way to handle INOUT and OUT parameters
@@ -91,7 +97,7 @@ to retrieve the output value using the :name supplied at binding time.
       buffer = "-some_string-"
       prefix = "PREFIX"
       
-      # preparing the statment
+      # preparing the statement
       sth = dbh.prepare("call foo( ?, ?, ?, ? )")
 
       # Binding buffer column as :buf, and str_len column as :len

data/lib/dbd/SQLAnywhere.rb

@@ -37,7 +37,7 @@ module DBI
 module DBD
 module SQLAnywhere
 
-   VERSION = "0.1.0"
+   VERSION = "0.1.1"
 
    def self.driver_name
       "SQLAnywhere"
@@ -98,7 +98,7 @@ module SQLAnywhere
    end
 
 
-   # This module provides funcationality that is used by all the DBD classes
+   # This module provides functionality that is used by all the DBD classes
    module Utility
 
       NO_DIRECTION = 0
@@ -170,6 +170,6 @@ end # module SQLAnywhere
 end # module DBD
 end # module DBI
 
-require 'dbd/SQLAnywhere/driver'
-require 'dbd/SQLAnywhere/database'
-require 'dbd/SQLAnywhere/statement'
+require 'dbd/sqlanywhere/driver'
+require 'dbd/sqlanywhere/database'
+require 'dbd/sqlanywhere/statement'

data/test/DBD_TESTS

@@ -0,0 +1,48 @@
+================================================================================
+Using DBD tests
+================================================================================
+
+Create a YAML file named .ruby-dbi.test-config.yaml in your home directory.
+
+This file is a hash of keys that determine what you want to test and how you
+access the databases related to those tests.
+
+The key 'dbtypes' is an array which determines what tests you want to run. They
+*do not* correspond to the driver names, they correspond to the test
+directories that were made for them.
+
+Each 'dbtype' has a key that contains a hash of values:
+    - username: the username of your account
+    - password: the password for your account
+    - dbname: the name of the database to connect to
+
+NOTE that tests expect to connect to a database on localhost currently. This
+may be fixed in the future, especially when we start writing Oracle and
+SQLServer tests.
+
+Each DBD test relies on database semantics which may not match up entirely with
+this configuration. For instance, the postgresql tests expect you to be able to
+work with the database directly via the `psql' client. This is something which
+will eventually be remedied as time and ability allows.
+
+Here is a sample configuration to get you started with the postgresql tests:
+
+################################################################################
+
+---
+dbtypes:
+    - postgresql
+postgresql:
+    username: erikh
+    password: monkeys
+    dbname: rubytest 
+
+################################################################################
+
+NOTE the --- is part of the file and is not a separator.
+
+================================================================================
+Writing DBD tests
+================================================================================
+
+Coming soon.

data/test/dbd/general/test_database.rb

@@ -0,0 +1,157 @@
+@class = Class.new(DBDConfig.testbase(DBDConfig.current_dbtype)) do
+    def test_ping
+        assert @dbh.ping
+        # XXX if it isn't obvious, this should be tested better. Not sure what
+        # good behavior is yet.
+    end
+
+    def test_columns
+        assert_nothing_raised do
+            cols = @dbh.columns("precision_test")
+
+            assert(cols)
+            assert_kind_of(Array, cols)
+            assert_equal(2, cols.length)
+
+            # the first column should always be "text_field" and have the following
+            # properties:
+            assert_equal("text_field", cols[0]["name"])
+            assert(!cols[0]["nullable"])
+
+            assert_equal(20, cols[0]["precision"])
+            # scale can be either nil or 0 for character types.
+            case cols[0]["scale"]
+            when nil
+                assert_equal(nil, cols[0]["scale"])
+            when 0
+                assert_equal(0, cols[0]["scale"])
+            else
+                flunk "scale can be either 0 or nil for character types"
+            end
+
+            assert_equal(
+                DBI::Type::Varchar, 
+                DBI::TypeUtil.type_name_to_module(cols[0]["type_name"])
+            )
+
+            # the second column should always be "integer_field" and have the following
+            # properties:
+            assert_equal("integer_field", cols[1]["name"])
+            assert(cols[1]["nullable"])
+            assert_equal(1, cols[1]["scale"])
+            assert_equal(2, cols[1]["precision"])
+            assert_equal(
+                DBI::Type::Decimal, 
+                DBI::TypeUtil.type_name_to_module(cols[1]["type_name"])
+            )
+
+            # finally, we ensure that every column in the array is a ColumnInfo
+            # object
+            cols.each { |col| assert_kind_of(DBI::ColumnInfo, col) }
+        end
+    end
+
+    def test_prepare
+        @sth = @dbh.prepare('select * from names')
+
+        assert @sth
+        assert_kind_of DBI::StatementHandle, @sth
+
+        @sth.finish
+    end
+
+    def test_do
+        assert_equal 1, @dbh.do("insert into names (name, age) values (?, ?)", "Billy", 21)
+        @sth = @dbh.prepare("select * from names where name = ?")
+        @sth.execute("Billy")
+        assert_equal ["Billy", 21], @sth.fetch
+        @sth.finish
+    end
+
+    def test_tables
+        tables = @dbh.tables.sort
+
+        # since this is a general test, let's prune the system tables
+        # FIXME not so sure if this should be a general test anymore.
+        if dbtype == "odbc"
+            tables -= [
+                "administrable_role_authorizations",
+                "applicable_roles",
+                "attributes",
+                "check_constraint_routine_usage",
+                "check_constraints",
+                "column_domain_usage",
+                "column_privileges",
+                "column_udt_usage",
+                "columns",
+                "constraint_column_usage",
+                "constraint_table_usage",
+                "data_type_privileges",
+                "domain_constraints",
+                "domain_udt_usage",
+                "domains",
+                "element_types",
+                "enabled_roles",
+                "information_schema_catalog_name",
+                "key_column_usage",
+                "parameters",
+                "referential_constraints",
+                "role_column_grants",
+                "role_routine_grants",
+                "role_table_grants",
+                "role_usage_grants",
+                "routine_privileges",
+                "routines",
+                "schemata",
+                "sequences",
+                "sql_features",
+                "sql_implementation_info",
+                "sql_languages",
+                "sql_packages",
+                "sql_parts",
+                "sql_sizing",
+                "sql_sizing_profiles",
+                "table_constraints",
+                "table_privileges",
+                "tables",
+                "triggered_update_columns",
+                "triggers",
+                "usage_privileges",
+                "view_column_usage",
+                "view_routine_usage",
+                "view_table_usage",
+                "views"
+            ]
+        end
+        
+        case dbtype 
+        when "postgresql"
+            tables.reject! { |x| x =~ /^pg_/ }
+            assert_equal %w(array_test bit_test blob_test boolean_test bytea_test db_specific_types_test field_types_test names precision_test time_test timestamp_test view_names), tables
+        else
+            assert_equal %w(bit_test blob_test boolean_test db_specific_types_test field_types_test names precision_test time_test timestamp_test view_names), tables
+        end
+    end
+
+    def test_attrs
+        # test defaults
+        assert @dbh["AutoCommit"] # should be true
+
+        # test setting
+        assert !(@dbh["AutoCommit"] = false)
+        assert !@dbh["AutoCommit"]
+
+        # test committing an outstanding transaction
+        
+        @sth = @dbh.prepare("insert into names (name, age) values (?, ?)")
+        @sth.execute("Billy", 22)
+        @sth.finish
+
+        assert @dbh["AutoCommit"] = true # should commit at this point
+        
+        @sth = @dbh.prepare("select * from names where name = ?")
+        @sth.execute("Billy")
+        assert_equal [ "Billy", 22 ], @sth.fetch
+        @sth.finish
+    end
+end

data/test/dbd/general/test_statement.rb

@@ -0,0 +1,249 @@
+@class = Class.new(DBDConfig.testbase(DBDConfig.current_dbtype)) do
+
+    def test_execute
+        assert_nothing_raised do
+            @dbh.execute("select * from names order by age") do |sth|
+                assert_equal([["Joe", 19], ["Bob", 21], ["Jim", 30]], sth.fetch_all)
+            end
+        end
+    end
+
+    def test_quoting # FIXME breaks sqlite-ruby to a segfault - research
+        @sth = nil
+
+        assert_nothing_raised do
+            if dbtype == "postgresql"
+                @sth = @dbh.prepare('select E\'\\\\\'')
+            else
+                @sth = @dbh.prepare('select \'\\\\\'')
+            end
+            @sth.execute
+            row = @sth.fetch
+            assert_equal ['\\'], row
+            @sth.finish
+        end
+    end
+
+    def test_duplicate_columns
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select name, name from names where name = ?")
+            @sth.execute("Bob")
+            assert_equal [["Bob", "Bob"]], @sth.fetch_all
+            @sth.finish
+        end
+    end
+
+    def test_columninfo
+        @sth = nil
+        
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from precision_test")
+            @sth.execute
+
+            cols = @sth.column_info
+
+            assert(cols)
+            assert_kind_of(Array, cols)
+            assert_equal(2, cols.length)
+            
+            # the first column should always be "text_field" and have the following
+            # properties:
+            assert_equal("text_field", cols[0]["name"])
+            assert_equal(20, cols[0]["precision"])
+            # scale can be either nil or 0 for character types.
+            case cols[0]["scale"]
+            when nil
+                assert_equal(nil, cols[0]["scale"])
+            when 0
+                assert_equal(0, cols[0]["scale"])
+            else
+                flunk "scale can be either 0 or nil for character types"
+            end
+                
+            assert_equal(
+                DBI::Type::Varchar, 
+                DBI::TypeUtil.type_name_to_module(cols[0]["type_name"])
+            )
+
+            # the second column should always be "integer_field" and have the following
+            # properties:
+            assert_equal("integer_field", cols[1]["name"])
+            assert_equal(1, cols[1]["scale"])
+            assert_equal(2, cols[1]["precision"])
+            assert_equal(
+                DBI::Type::Decimal, 
+                DBI::TypeUtil.type_name_to_module(cols[1]["type_name"])
+            )
+
+            cols.each { |col| assert_kind_of(DBI::ColumnInfo, col) }
+            @sth.finish
+        end
+    end
+
+    def test_duplicate_columns
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select name, name from names where name = ?")
+            @sth.execute("Bob")
+            assert_equal [["Bob", "Bob"]], @sth.fetch_all
+            @sth.finish
+        end
+    end
+
+    def test_rows
+        @sth = nil
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into names (name, age) values (?, ?)")
+            @sth.execute("Bill", 22);
+        end
+
+        assert 1, @sth.rows
+
+        @sth.finish
+        @sth = nil
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("delete from names where name = ?")
+            @sth.execute("Bill");
+        end
+
+        assert 1, @sth.rows
+
+        @sth.finish
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from names")
+            @sth.execute
+        end
+
+        assert_equal 0, @sth.rows
+        assert @sth.fetchable?
+        assert @sth.any?
+        assert @sth.rows.zero?
+        @sth.finish
+    end
+
+    def test_prepare_execute
+        assert_nothing_raised do 
+            @sth = @dbh.prepare("select * from names")
+            @sth.execute
+            @sth.finish
+        end
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from names where name = ?")
+            @sth.execute("Bob")
+            @sth.finish
+        end
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into names (name, age) values (?, ?)")
+            @sth.execute("Bill", 22);
+            @sth.finish
+        end
+    end
+
+    def test_prepare_execute_with_transactions
+        @dbh["AutoCommit"] = false 
+        config = DBDConfig.get_config['sqlite3']
+
+        # rollback 1 (the right way)
+        @sth = nil
+        @sth2 = nil
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into names (name, age) values (?, ?)")
+            @sth.execute("Billy", 23)
+            @sth2 = @dbh.prepare("select * from names where name = ?")
+            @sth2.execute("Billy")
+        end
+        assert_equal ["Billy", 23 ], @sth2.fetch
+        @sth2.finish
+        @sth.finish
+        assert_nothing_raised { @dbh.rollback }
+
+        @sth = @dbh.prepare("select * from names where name = ?")
+        @sth.execute("Billy")
+        assert_nil @sth.fetch
+        @sth.finish
+       
+        # rollback 2 (without closing statements first)
+
+        @sth = nil
+        @sth2 = nil
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into names (name, age) values (?, ?)")
+            @sth.execute("Billy", 23)
+            @sth2 = @dbh.prepare("select * from names where name = ?")
+            @sth2.execute("Billy")
+        end
+
+        assert_equal ["Billy", 23], @sth2.fetch
+
+        # FIXME some throw here, some don't. we should probably normalize this
+        @dbh.rollback rescue true
+        
+        @sth2.finish
+        @sth.finish
+        assert_nothing_raised { @dbh.rollback }
+        
+        @sth = @dbh.prepare("select * from names where name = ?")
+        @sth.execute("Billy")
+        assert_nil @sth.fetch
+        @sth.finish
+
+        # commit
+
+        @sth = nil
+        @sth2 = nil
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into names (name, age) values (?, ?)")
+            @sth.execute("Billy", 23)
+            @sth2 = @dbh.prepare("select * from names where name = ?")
+            @sth2.execute("Billy")
+        end
+        assert_equal ["Billy", 23 ], @sth2.fetch
+        @sth2.finish
+        @sth.finish
+        assert_nothing_raised { @dbh.commit }
+
+        @sth = @dbh.prepare("select * from names where name = ?")
+        @sth.execute("Billy")
+        assert_equal ["Billy", 23 ], @sth.fetch
+        @sth.finish
+    end
+
+    def test_fetch
+        @sth = nil
+        assert_nothing_raised do 
+            @sth = @dbh.prepare("select * from names order by age")
+            @sth.execute
+        end
+
+        # this tests that we're getting the rows in the right order,
+        # and that the types are being converted. 
+        assert_equal ["Joe", 19], @sth.fetch
+        assert_equal ["Bob", 21], @sth.fetch
+        assert_equal ["Jim", 30], @sth.fetch
+        assert_nil @sth.fetch
+
+        @sth.finish
+    end
+
+    def test_transaction_block
+        @dbh["AutoCommit"] = false
+        # this transaction should not fail because it called return early
+        @dbh.transaction do |dbh|
+            dbh.do('INSERT INTO names (name, age) VALUES (?, ?)', "Cooter", 69)
+            return 42
+        end 
+        @sth = @dbh.prepare("select * from names where name = ?")
+        @sth.execute("Cooter")
+        row = @sth.fetch
+        assert row
+        assert_equal ["Cooter", 69], row
+        @sth.finish
+    end
+end

data/test/dbd/general/test_types.rb

@@ -0,0 +1,253 @@
+@class = Class.new(DBDConfig.testbase(DBDConfig.current_dbtype)) do
+    def skip_bit
+        # FIXME this test fails because DBI's type system blows goats.
+       @sth = nil
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into bit_test (mybit) values (?)")
+            @sth.bind_param(1, 0, DBI::SQL_TINYINT)
+            @sth.execute
+#             if dbtype == "postgresql"
+#                 @sth.execute("0")
+#             else
+#                 @sth.execute(0)
+#             end
+            @sth.finish
+        end
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from bit_test")
+            @sth.execute
+            row = @sth.fetch
+            @sth.finish
+
+            assert_equal [0], row
+        end
+    end
+
+    # FIXME
+    # Ideally, this test should be split across the DBI tests and DBD, but for
+    # now testing against the DBDs really doesn't cost us anything other than
+    # debugging time if something breaks.
+    def test_bind_coltype
+        # ensure type conv didn't get turned off somewhere.
+        assert(DBI.convert_types)
+        assert(@dbh.convert_types)
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select name, age from names order by age")
+            assert(@sth.convert_types) # again
+            @sth.execute
+            @sth.bind_coltype(2, DBI::Type::Varchar)
+            assert_equal(
+                [
+                    ["Joe", "19"], 
+                    ["Bob", "21"],
+                    ["Jim", "30"], 
+                ], @sth.fetch_all
+            )
+            @sth.finish
+        end
+
+        # just to be sure..
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select name, age from names order by age")
+            @sth.execute
+            @sth.bind_coltype(2, DBI::Type::Float)
+            @sth.fetch_all.collect { |x| assert_kind_of(Float, x[1]) }
+            @sth.finish
+        end
+
+        # now, let's check some failure cases
+        @sth = @dbh.prepare("select name, age from names order by age")
+
+        # can't bind_coltype before execute
+        assert_raise(DBI::InterfaceError) { @sth.bind_coltype(1, DBI::Type::Float) }
+        # can't index < 1
+        assert_raise(DBI::InterfaceError) { @sth.bind_coltype(0, DBI::Type::Float) }
+    end
+
+    def test_noconv
+        # XXX this test will fail the whole test suite miserably if it fails at any point.
+        assert(DBI.convert_types)
+
+        DBI.convert_types = false
+        @sth.finish rescue nil
+        @dbh.disconnect
+        set_base_dbh
+
+        assert(!@dbh.convert_types)
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from names order by age")
+            assert(!@sth.convert_types)
+            @sth.execute
+            assert_equal(
+                [
+                    ["Joe", "19"], 
+                    ["Bob", "21"],
+                    ["Jim", "30"], 
+                ], @sth.fetch_all
+            )
+            @sth.finish
+        end
+
+        DBI.convert_types = true
+        @sth.finish rescue nil
+        @dbh.disconnect
+        set_base_dbh
+
+        assert(DBI.convert_types)
+        assert(@dbh.convert_types)
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from names order by age")
+            assert(@sth.convert_types)
+            @sth.execute
+            assert_equal(
+                [
+                    ["Joe", 19], 
+                    ["Bob", 21],
+                    ["Jim", 30], 
+                ], @sth.fetch_all
+            )
+            @sth.finish
+        end
+
+        @dbh.convert_types = false
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from names order by age")
+            assert(!@sth.convert_types)
+            @sth.execute
+            assert_equal(
+                [
+                    ["Joe", "19"], 
+                    ["Bob", "21"],
+                    ["Jim", "30"], 
+                ], @sth.fetch_all
+            )
+            @sth.finish
+        end
+
+        @dbh.convert_types = true
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from names order by age")
+            assert(@sth.convert_types)
+            @sth.convert_types = false
+            @sth.execute
+            assert_equal(
+                [
+                    ["Joe", "19"], 
+                    ["Bob", "21"],
+                    ["Jim", "30"], 
+                ], @sth.fetch_all
+            )
+            @sth.finish
+        end
+    rescue Exception => e
+        DBI.convert_types = true
+        @sth.finish
+        @dbh.disconnect
+        set_base_dbh
+        raise e
+    end
+
+    def test_null
+        assert_nothing_raised do
+            @sth = @dbh.prepare('insert into names (name, age) values (?, ?)')
+            @sth.execute("'NULL'", 201)
+            @sth.execute(nil, 202)
+            @sth.execute("NULL", 203)
+            @sth.finish
+        end
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare('select * from names where age > 200 order by age')
+            @sth.execute
+            assert_equal(["'NULL'", 201], @sth.fetch)
+            assert_equal([nil, 202], @sth.fetch)
+            assert_equal(["NULL", 203], @sth.fetch)
+            @sth.finish
+        end
+    end
+
+    def test_time
+        @sth = nil
+        t = nil
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into time_test (mytime) values (?)")
+            t = Time.now
+            @sth.execute(t)
+            @sth.finish
+        end
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from time_test")
+            @sth.execute
+            row = @sth.fetch
+            assert_kind_of DateTime, row[0]
+            assert_equal t.hour, row[0].hour
+            assert_equal t.min, row[0].min
+            assert_equal t.sec, row[0].sec
+            @sth.finish
+        end
+    end
+
+    def test_timestamp
+        @sth = nil
+         # We omit fractional second testing here -- timestamp precision
+         # is a very slippery, dependent on driver and driver version.
+        t = DBI::Timestamp.new(2008, 3, 8, 10, 39, 1)
+        assert_nothing_raised do
+            @sth = @dbh.prepare("insert into timestamp_test (mytimestamp) values (?)")
+            @sth.execute(t)
+            @sth.finish
+        end
+
+        assert_nothing_raised do
+            @sth = @dbh.prepare("select * from timestamp_test")
+            @sth.execute
+            row = @sth.fetch
+            assert_kind_of DateTime, row[0]
+            assert_equal t.year, row[0].year
+            assert_equal t.month, row[0].month
+            assert_equal t.day, row[0].day
+            assert_equal t.hour, row[0].hour
+            assert_equal t.min, row[0].min
+            assert_equal t.sec, row[0].sec
+             # omit fractional tests
+            @sth.finish
+        end
+    end
+
+    def test_boolean_return
+        @sth = nil
+
+        unless dbtype == "odbc" # ODBC has no boolean type
+            assert_nothing_raised do
+                @sth = @dbh.prepare("insert into boolean_test (num, mybool) values (?, ?)")
+                @sth.execute(1, true)
+                @sth.execute(2, false)
+                @sth.finish
+            end
+
+            assert_nothing_raised do
+                @sth = @dbh.prepare("select * from boolean_test order by num")
+                @sth.execute
+
+                pairs = @sth.fetch_all
+
+                assert_equal(
+                    [
+                                 [1, true],
+                                 [2, false],
+                    ], pairs
+                )
+
+                @sth.finish
+            end
+        end
+    end
+end

data/test/dbd/sqlanywhere/base.rb

@@ -0,0 +1,26 @@
+DBDConfig.set_testbase(:sqlanywhere, Class.new(Test::Unit::TestCase) do
+        def dbtype 
+            "sqlanywhere"
+        end
+
+        def test_base
+            assert_equal(@dbh.driver_name, "SQLAnywhere")
+            assert_kind_of(DBI::DBD::SQLAnywhere::Database, @dbh.instance_variable_get(:@handle))
+        end
+
+        def set_base_dbh
+            config = DBDConfig.get_config["sqlanywhere"]
+            @dbh = DBI.connect("dbi:SQLAnywhere:"+config["dbname"], config["username"], config["password"], { })
+        end
+
+        def setup
+            set_base_dbh
+            DBDConfig.inject_sql(@dbh, dbtype, "dbd/sqlanywhere/up.sql")
+        end
+
+        def teardown
+            DBDConfig.inject_sql(@dbh, dbtype, "dbd/sqlanywhere/down.sql")
+            @dbh.disconnect
+        end
+    end
+)

data/test/dbd/sqlanywhere/down.sql

@@ -0,0 +1,19 @@
+drop view view_names;
+---
+drop table names;
+---
+drop table blob_test;
+---
+drop table boolean_test;
+---
+drop table time_test;
+---
+drop table timestamp_test;
+---
+drop table bit_test;
+---
+drop table field_types_test;
+---
+drop table db_specific_types_test;
+---
+drop table precision_test;

data/test/dbd/sqlanywhere/up.sql

@@ -0,0 +1,28 @@
+create table names (
+    name varchar(255),
+    age integer
+);
+---
+insert into names (name, age) values ('Joe', 19);
+---
+insert into names (name, age) values ('Jim', 30);
+---
+insert into names (name, age) values ('Bob', 21);
+---
+create table precision_test (text_field varchar(20) primary key not null, integer_field decimal(2,1));
+---
+CREATE TABLE blob_test (name VARCHAR(30), data long binary);
+---
+create view view_names as select * from names;
+---
+create table boolean_test (num integer, mybool bit);
+---
+create table time_test (mytime time);
+---
+create table timestamp_test (mytimestamp timestamp);
+---
+create table bit_test (mybit bit);
+---
+create table field_types_test (foo integer not null primary key default 1);
+---
+create table db_specific_types_test (ts timestamp, dt date);

data/test/ts_dbd.rb

@@ -0,0 +1,118 @@
+# figure out what tests to run
+require 'yaml'
+require 'test/unit/testsuite'
+require 'test/unit/ui/console/testrunner'
+
+if File.basename(Dir.pwd) == "test"
+    $:.unshift('../lib')
+else
+    $:.unshift('lib')
+end
+
+module Test::Unit::Assertions
+    def build_message(head, template=nil, *arguments)
+        template += "\n" + "DATABASE: " + dbtype
+        template &&= template.chomp
+        return AssertionMessage.new(head, template, arguments)
+    end
+end
+
+module DBDConfig
+    @testbase = { }
+    @current_dbtype = nil
+
+    def self.get_config
+        config = nil
+
+        begin
+            config = YAML.load_file(File.join(ENV["HOME"], ".ruby-dbi.test-config.yaml"))
+        rescue Exception => e
+            config = { }
+            config["dbtypes"] = [ ]
+        end
+
+        return config
+    end
+
+    def self.inject_sql(dbh, dbtype, file)
+        # splits by --- in the file, strips newlines and the semicolons.
+        # this way we can still manually import the file, but use it with our
+        # drivers for client-independent injection.
+        File.open(file).read.split(/\n*---\n*/, -1).collect { |x| x.gsub!(/\n/, ''); x.sub(/;\z/, '') }.each do |stmt|
+            tmp = STDERR.dup
+            STDERR.reopen('sql.log', 'a')
+            begin
+                dbh.commit rescue nil
+                dbh["AutoCommit"] = true rescue nil
+                dbh.do(stmt)
+                dbh.commit unless dbtype == 'sqlite3'
+            rescue Exception => e
+                tmp.puts "Error injecting '#{stmt}' for db #{dbtype}"
+                tmp.puts "Error: #{e.message}"
+            end
+            STDERR.reopen(tmp)
+        end
+    end
+
+    def self.current_dbtype
+        @current_dbtype
+    end
+
+    def self.current_dbtype=(setting)
+        @current_dbtype = setting
+    end
+
+    def self.testbase(klass_name)
+        return @testbase[klass_name]
+    end
+
+    def self.set_testbase(klass_name, klass)
+        @testbase[klass_name] = klass
+    end
+
+    def self.suite
+        @suite ||= []
+    end
+end
+
+if __FILE__ == $0
+    Dir.chdir("..") if File.basename(Dir.pwd) == "test"
+    $LOAD_PATH.unshift(File.join(Dir.pwd, "lib"))
+    Dir.chdir("test") rescue nil
+
+    begin
+        require 'dbi'
+    rescue LoadError => e
+        begin
+            require 'rubygems'
+            gem 'dbi'
+            require 'dbi'
+        rescue LoadError => e
+            abort "DBI must already be installed or must come with this package for tests to work."
+        end
+    end
+
+    Deprecate.set_action(proc { })
+
+    config = DBDConfig.get_config
+
+    config["dbtypes"] = ENV["DBTYPES"].split(/\s+/) if ENV["DBTYPES"]
+
+    if config and config["dbtypes"]
+        config["dbtypes"].each do |dbtype|
+            unless config[dbtype]
+                warn "#{dbtype} is selected for testing but not configured; see test/DBD_TESTS"
+                next
+            end
+
+            # base.rb is special, see DBD_TESTS
+            require "dbd/#{dbtype}/base.rb"
+            Dir["dbd/#{dbtype}/test*.rb"].each { |file| require file }
+            # run the general tests
+            DBDConfig.current_dbtype = dbtype.to_sym
+            Dir["dbd/general/test*.rb"].each { |file| load file; DBDConfig.suite << @class }
+        end
+    elsif !config["dbtypes"]
+        warn "Please see test/DBD_TESTS for information on configuring DBD tests."
+    end
+end

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.9.4
 specification_version: 1
 name: dbd-sqlanywhere
 version: !ruby/object:Gem::Version 
-  version: 0.1.0
-date: 2008-11-03 00:00:00 -05:00
+  version: 0.1.1
+date: 2008-11-07 00:00:00 -05:00
 summary: Ruby DBI driver (DBD) for SQL Anywhere
 require_paths: 
 - lib
@@ -29,10 +29,21 @@ post_install_message:
 authors: 
 - Eric Farrar
 files: 
-- lib/dbd/SQLAnywhere.rb
-- lib/dbd/sqlanywhere/statement.rb
-- lib/dbd/sqlanywhere/driver.rb
 - lib/dbd/sqlanywhere/database.rb
+- lib/dbd/sqlanywhere/driver.rb
+- lib/dbd/sqlanywhere/statement.rb
+- lib/dbd/SQLAnywhere.rb
+- test/dbd
+- test/dbd/general
+- test/dbd/general/test_database.rb
+- test/dbd/general/test_statement.rb
+- test/dbd/general/test_types.rb
+- test/dbd/sqlanywhere
+- test/dbd/sqlanywhere/base.rb
+- test/dbd/sqlanywhere/down.sql
+- test/dbd/sqlanywhere/up.sql
+- test/DBD_TESTS
+- test/ts_dbd.rb
 - README
 - CHANGELOG
 - LICENSE