sqlite-ruby 2.0.3

data/lib/sqlite/statement.rb

@@ -0,0 +1,145 @@
+#--
+# =============================================================================
+# Copyright (c) 2004, Jamis Buck (jgb3@email.byu.edu)
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+#     * Redistributions of source code must retain the above copyright notice,
+#       this list of conditions and the following disclaimer.
+# 
+#     * Redistributions in binary form must reproduce the above copyright
+#       notice, this list of conditions and the following disclaimer in the
+#       documentation and/or other materials provided with the distribution.
+# 
+#     * The names of its contributors may not be used to endorse or promote
+#       products derived from this software without specific prior written
+#       permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+# =============================================================================
+#++
+
+require 'sqlite_api'
+require 'sqlite/resultset'
+require 'sqlite/parsed_statement'
+
+module SQLite
+
+  # A statement represents a prepared-but-unexecuted SQL query. It will rarely
+  # (if ever) be instantiated directly by a client, and is most often obtained
+  # via the Database#prepare method.
+  class Statement
+
+    # This is any text that followed the first valid SQL statement in the text
+    # with which the statement was initialized. If there was no trailing text,
+    # this will be the empty string.
+    attr_reader :remainder
+
+    # Create a new statement attached to the given Database instance, and which
+    # encapsulates the given SQL text. If the text contains more than one
+    # statement (i.e., separated by semicolons), then the #remainder property
+    # will be set to the trailing text.
+    def initialize( db, sql )
+      @db = db
+      @statement = ParsedStatement.new( sql )
+      @remainder = @statement.trailing
+      @sql = @statement.to_s
+    end
+
+    # Binds the given variables to the corresponding placeholders in the SQL
+    # text.
+    #
+    # See Database#execute for a description of the valid placeholder
+    # syntaxes.
+    #
+    # Example:
+    #
+    #   stmt = db.prepare( "select * from table where a=? and b=?" )
+    #   stmt.bind_params( 15, "hello" )
+    #
+    # See also #execute, #bind_param, Statement#bind_param, and
+    # Statement#bind_params.
+    def bind_params( *bind_vars )
+      @statement.bind_params( *bind_vars )
+    end
+
+    # Binds value to the named (or positional) placeholder. If +param+ is a
+    # Fixnum, it is treated as an index for a positional placeholder.
+    # Otherwise it is used as the name of the placeholder to bind to.
+    #
+    # See also #bind_params.
+    def bind_param( param, value )
+      @statement.bind_param( param, value )
+    end
+
+    # Execute the statement. This creates a new ResultSet object for the
+    # statement's virtual machine. If a block was given, the new ResultSet will
+    # be yielded to it and then closed; otherwise, the ResultSet will be
+    # returned. In that case, it is the client's responsibility to close the
+    # ResultSet.
+    #
+    # Example:
+    #
+    #   stmt = db.prepare( "select * from table" )
+    #   stmt.execute do |result|
+    #     ...
+    #   end
+    #
+    # See also #bind_params.
+    def execute
+      results = ResultSet.new( @db, @statement.to_s )
+
+      if block_given?
+        begin
+          yield results
+        ensure
+          results.close
+        end
+      else
+        return results
+      end
+    end
+
+    # Return an array of the column names for this statement. Note that this
+    # may execute the statement in order to obtain the metadata; this makes it
+    # a (potentially) expensive operation.
+    def columns
+      get_metadata unless @columns
+      return @columns
+    end
+
+    # Return an array of the data types for each column in this statement. Note
+    # that this may execute the statement in order to obtain the metadata; this
+    # makes it a (potentially) expensive operation.
+    def types
+      get_metadata unless @types
+      return @types
+    end
+
+    # A convenience method for obtaining the metadata about the query. Note
+    # that this will actually execute the SQL, which means it can be a
+    # (potentially) expensive operation.
+    def get_metadata
+      vm, rest = API.compile( @db.handle, @statement.to_s )
+      result = API.step( vm )
+      API.finalize( vm )
+
+      @columns = result[:columns]
+      @types = result[:types]
+    end
+    private :get_metadata
+
+  end
+
+end

data/lib/sqlite/translator.rb

@@ -0,0 +1,135 @@
+#--
+# =============================================================================
+# Copyright (c) 2004, Jamis Buck (jgb3@email.byu.edu)
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+#     * Redistributions of source code must retain the above copyright notice,
+#       this list of conditions and the following disclaimer.
+# 
+#     * Redistributions in binary form must reproduce the above copyright
+#       notice, this list of conditions and the following disclaimer in the
+#       documentation and/or other materials provided with the distribution.
+# 
+#     * The names of its contributors may not be used to endorse or promote
+#       products derived from this software without specific prior written
+#       permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+# =============================================================================
+#++
+
+require 'time'
+
+module SQLite
+
+  # The Translator class encapsulates the logic and callbacks necessary for
+  # converting string data to a value of some specified type. Every Database
+  # instance may have a Translator instance, in order to assist in type
+  # translation (Database#type_translation).
+  #
+  # Further, applications may define their own custom type translation logic
+  # by registering translator blocks with the corresponding database's
+  # translator instance (Database#translator).
+  class Translator
+
+    # Create a new Translator instance. It will be preinitialized with default
+    # translators for most SQL data types.
+    def initialize
+      @translators = Hash.new( proc { |type,value| value } )
+      register_default_translators
+    end
+
+    # Add a new translator block, which will be invoked to process type
+    # translations to the given type. The type should be an SQL datatype, and
+    # may include parentheses (i.e., "VARCHAR(30)"). However, any parenthetical
+    # information is stripped off and discarded, so type translation decisions
+    # are made solely on the "base" type name.
+    #
+    # The translator block itself should accept two parameters, "type" and
+    # "value". In this case, the "type" is the full type name (including
+    # parentheses), so the block itself may include logic for changing how a
+    # type is translated based on the additional data. The "value" parameter
+    # is the (string) data to convert.
+    #
+    # The block should return the translated value.
+    def add_translator( type, &block ) # :yields: type, value
+      @translators[ type_name( type ) ] = block
+    end
+
+    # Translate the given string value to a value of the given type. In the
+    # absense of an installed translator block for the given type, the value
+    # itself is always returned. Further, +nil+ values are never translated,
+    # and are always passed straight through regardless of the type parameter.
+    def translate( type, value )
+      unless value.nil?
+        @translators[ type_name( type ) ].call( type, value )
+      end
+    end
+
+    # A convenience method for working with type names. This returns the "base"
+    # type name, without any parenthetical data.
+    def type_name( type )
+      type = $1 if type =~ /^(.*?)\(/
+      type.upcase
+    end
+    private :type_name
+
+    # Register the default translators for the current Translator instance.
+    # This includes translators for most major SQL data types.
+    def register_default_translators
+      [ "date",
+        "datetime",
+        "time" ].each { |type| add_translator( type ) { |t,v| Time.parse( v ) } }
+
+      [ "decimal",
+        "float",
+        "numeric",
+        "double",
+        "real",
+        "dec",
+        "fixed" ].each { |type| add_translator( type ) { |t,v| v.to_f } }
+
+      [ "integer",
+        "smallint",
+        "mediumint",
+        "int",
+        "bigint" ].each { |type| add_translator( type ) { |t,v| v.to_i } }
+
+      [ "bit",
+        "bool",
+        "boolean" ].each do |type|
+        add_translator( type ) do |t,v|
+          !( v.strip.gsub(/00+/,"0") == "0" ||
+             v.downcase == "false" ||
+             v.downcase == "f" ||
+             v.downcase == "no" ||
+             v.downcase == "n" )
+        end
+      end
+
+      add_translator( "timestamp" ) { |type, value| Time.at( value.to_i ) }
+      add_translator( "tinyint" ) do |type, value|
+        if type =~ /\(\s*1\s*\)/
+          value.to_i == 1
+        else
+          value.to_i
+        end
+      end
+    end
+    private :register_default_translators
+
+  end
+
+end

data/lib/sqlite/version.rb

@@ -0,0 +1,45 @@
+#--
+# =============================================================================
+# Copyright (c) 2004, Jamis Buck (jgb3@email.byu.edu)
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+#     * Redistributions of source code must retain the above copyright notice,
+#       this list of conditions and the following disclaimer.
+# 
+#     * Redistributions in binary form must reproduce the above copyright
+#       notice, this list of conditions and the following disclaimer in the
+#       documentation and/or other materials provided with the distribution.
+# 
+#     * The names of its contributors may not be used to endorse or promote
+#       products derived from this software without specific prior written
+#       permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+# =============================================================================
+#++
+
+module SQLite
+
+  module Version
+
+    MAJOR = 2
+    MINOR = 0
+    TINY  = 3
+
+    STRING = [ MAJOR, MINOR, TINY ].join( "." )
+
+  end
+
+end

data/lib/sqlite.rb

@@ -0,0 +1,34 @@
+#--
+# =============================================================================
+# Copyright (c) 2004, Jamis Buck (jgb3@email.byu.edu)
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+#     * Redistributions of source code must retain the above copyright notice,
+#       this list of conditions and the following disclaimer.
+# 
+#     * Redistributions in binary form must reproduce the above copyright
+#       notice, this list of conditions and the following disclaimer in the
+#       documentation and/or other materials provided with the distribution.
+# 
+#     * The names of its contributors may not be used to endorse or promote
+#       products derived from this software without specific prior written
+#       permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+# =============================================================================
+#++
+
+require 'sqlite/database'
+require 'sqlite/version'

data/test/db/fixtures.sql

@@ -0,0 +1,25 @@
+create table A
+(
+  name VARCHAR(60),
+  age INTEGER
+);
+
+insert into A values ( 'Zephyr', 1 );
+insert into A values ( 'Timothy', 2 );
+insert into A values ( 'Juniper', 3 );
+insert into A values ( 'Cinnamon', 4 );
+insert into A values ( 'Amber', 5 );
+insert into A values ( NULL, 6 );
+
+create table B
+(
+  id INTEGER PRIMARY KEY,
+  name VARCHAR(60)
+);
+
+create index B_idx on B ( name );
+
+create table D
+(
+  b_id INTEGER REFERENCES B ( id )
+);

data/test/tc_api_core.rb

@@ -0,0 +1,201 @@
+#--
+# =============================================================================
+# Copyright (c) 2004, Jamis Buck (jgb3@email.byu.edu)
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+#     * Redistributions of source code must retain the above copyright notice,
+#       this list of conditions and the following disclaimer.
+# 
+#     * Redistributions in binary form must reproduce the above copyright
+#       notice, this list of conditions and the following disclaimer in the
+#       documentation and/or other materials provided with the distribution.
+# 
+#     * The names of its contributors may not be used to endorse or promote
+#       products derived from this software without specific prior written
+#       permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+# =============================================================================
+#++
+
+$:.unshift "lib"
+
+require 'sqlite_api'
+require 'test/unit'
+
+# MISSING TESTS FOR:
+#   SQLite::Exceptions::BusyException (and related cases)
+#   API.interrupt
+#   API.busy_handler
+#   API.busy_timeout
+#   API.function_type
+#   API.set_result_error
+
+class TC_APICore < Test::Unit::TestCase
+  include SQLite
+
+  def test_constants
+    assert_equal( "constant", defined? API::VERSION )
+    assert_equal( "constant", defined? API::ENCODING )
+    assert_equal( "constant", defined? API::NUMERIC )
+    assert_equal( "constant", defined? API::TEXT )
+    assert_equal( "constant", defined? API::ARGS )
+  end
+
+  def test_open_new
+    assert !File.exist?( "db/dummy.db" )
+    db = API.open( "db/dummy.db", 0 )
+    assert File.exist?( "db/dummy.db" )
+    API.close db
+    File.delete "db/dummy.db"
+  end
+
+  def test_compile
+    db = API.open( "db/fixtures.db", 0 )
+    vm, rest = API.compile( db, "select name, age from A order by name;extra" )
+    assert_equal "extra", rest
+    result = API.step( vm )
+    assert_nil result[:row][0]
+    assert_equal ["name","age"], result[:columns]
+    result = API.step( vm )
+    assert_equal 'Amber', result[:row][0]
+    result = API.step( vm )
+    assert_equal 'Cinnamon', result[:row][0]
+    result = API.step( vm )
+    assert_equal 'Juniper', result[:row][0]
+    result = API.step( vm )
+    assert_equal 'Timothy', result[:row][0]
+    result = API.step( vm )
+    assert_equal 'Zephyr', result[:row][0]
+    result = API.step( vm )
+    assert !result.has_key?(:row)
+
+    assert_raise( SQLite::Exceptions::MisuseException ) do
+      API.step( vm )
+    end
+
+    API.finalize( vm )
+    API.close( db )
+  end
+
+  def test_bad_compile
+    db = API.open( "db/fixtures.db", 0 )
+    assert_raise( SQLite::Exceptions::SQLException ) do
+      API.compile( db, "select name, age from BOGUS order by name" )
+    end
+    API.close( db )
+  end
+
+  def test_empty_compile
+    db = API.open( "db/fixtures.db", 0 )
+    vm, rest = API.compile( db, "select * from B order by name" )
+    result = API.step( vm )
+    assert !result.has_key?(:row)
+    assert_equal ["id","name"], result[:columns]
+    API.finalize( vm )
+    API.close( db )
+  end
+
+  def test_last_insert_row_id
+    db = API.open( "db/dummy.db", 0 )
+
+    vm, rest = API.compile( db, "create table Z ( a integer primary key, b varchar(60) )" )
+    API.step(vm)
+    API.finalize(vm)
+
+    vm, rest = API.compile( db, "insert into Z values ( 14, 'Hello' )" )
+    API.step(vm)
+    API.finalize(vm)
+
+    assert_equal 14, API.last_insert_row_id( db )
+
+    API.close(db)
+
+  ensure
+    File.delete( "db/dummy.db" )
+  end
+
+  def test_changes
+    db = API.open( "db/dummy.db", 0 )
+
+    vm, rest = API.compile( db, "create table Z ( a integer primary key, b varchar(60) )" )
+    API.step(vm)
+    API.finalize(vm)
+
+    vm, rest = API.compile( db, "insert into Z values ( 14, 'Hello' )" )
+    API.step(vm)
+    API.finalize(vm)
+
+    assert_equal 1, API.changes( db )
+
+    vm, rest = API.compile( db, "insert into Z values ( 15, 'Hello' )" )
+    API.step(vm)
+    API.finalize(vm)
+
+    vm, rest = API.compile( db, "delete from Z where 1" )
+    API.step(vm)
+    API.finalize(vm)
+
+    assert_equal 2, API.changes( db )
+
+    API.close(db)
+
+  ensure
+    File.delete( "db/dummy.db" )
+  end
+
+  def test_complete
+    sql = "select * from"
+    assert !API.complete( sql )
+    sql << "a_table;"
+    assert API.complete( sql )
+  end
+
+  def test_create_function
+    db = API.open( "db/fixtures.db", 0 )
+
+    API.create_function( db, "maim", 1, proc { |func,arg| API.set_result( func, arg.split(//).sort.join ) } )
+
+    vm, rest = API.compile( db, "select maim(name) from A where name = 'Amber'" )
+    result = API.step( vm )
+    assert_equal "Abemr", result[:row][0]
+    API.finalize( vm )
+
+    API.close( db )
+  end
+
+  def test_create_aggregate
+    db = API.open( "db/fixtures.db", 0 )
+
+    API.create_aggregate( db, "lengths", 1,
+      proc { |func,arg|
+        ctx = API.aggregate_context( func )
+        ctx[:count] = API.aggregate_count( func )
+        ctx[:len] ||= 0
+        ctx[:len] += ( arg.nil? ? 0 : arg.length )
+      },
+      proc { |func|
+        ctx = API.aggregate_context( func )
+        API.set_result( func, "#{ctx[:len] || 0}/#{ctx[:count] || 0}" )
+      } )
+
+    vm, rest = API.compile( db, "select lengths(name) from A" )
+    result = API.step( vm )
+    assert_equal "33/6", result[:row][0]
+    API.finalize( vm )
+
+    API.close( db )
+  end
+end

data/test/tc_arrayfields.rb

@@ -0,0 +1,74 @@
+#--
+# =============================================================================
+# Copyright (c) 2004, Jamis Buck (jgb3@email.byu.edu)
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+#     * Redistributions of source code must retain the above copyright notice,
+#       this list of conditions and the following disclaimer.
+# 
+#     * Redistributions in binary form must reproduce the above copyright
+#       notice, this list of conditions and the following disclaimer in the
+#       documentation and/or other materials provided with the distribution.
+# 
+#     * The names of its contributors may not be used to endorse or promote
+#       products derived from this software without specific prior written
+#       permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+# =============================================================================
+#++
+
+$:.unshift "lib"
+
+require 'sqlite'
+require 'test/unit'
+
+begin
+
+  require 'arrayfields'
+
+  class TC_ArrayFields < Test::Unit::TestCase
+
+    def setup
+      @db = SQLite::Database.open( "db/fixtures.db" )
+      @db.type_translation = true
+    end
+
+    def teardown
+      @db.close
+    end
+
+    def test_fields
+      row = @db.get_first_row "select * from A"
+      assert_equal( [ "name", "age" ], row.fields )
+    end
+
+    def test_name_access
+      row = @db.get_first_row "select * from A"
+      assert_equal( "Zephyr", row["name"] )
+      assert_equal( 1, row["age"] )
+    end
+
+    def test_index_access
+      row = @db.get_first_row "select * from A"
+      assert_equal( "Zephyr", row[0] )
+      assert_equal( 1, row[1] )
+    end
+
+  end
+
+rescue LoadError => e
+  puts "'arrayfields' does not appear to exist... skipping arrayfields integration test"
+end