sqlite3-ruby 1.3.2 → 1.3.3.beta.1

data/LICENSE

@@ -1,27 +0,0 @@
-Copyright (c) 2004, Jamis Buck (jamis@jamisbuck.org)
-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.

data/Manifest.txt

@@ -1,50 +0,0 @@
-API_CHANGES.rdoc
-CHANGELOG.rdoc
-ChangeLog.cvs
-LICENSE
-Manifest.txt
-README.rdoc
-Rakefile
-ext/sqlite3/backup.c
-ext/sqlite3/backup.h
-ext/sqlite3/database.c
-ext/sqlite3/database.h
-ext/sqlite3/exception.c
-ext/sqlite3/exception.h
-ext/sqlite3/extconf.rb
-ext/sqlite3/sqlite3.c
-ext/sqlite3/sqlite3_ruby.h
-ext/sqlite3/statement.c
-ext/sqlite3/statement.h
-faq/faq.rb
-faq/faq.yml
-lib/sqlite3.rb
-lib/sqlite3/constants.rb
-lib/sqlite3/database.rb
-lib/sqlite3/errors.rb
-lib/sqlite3/pragmas.rb
-lib/sqlite3/resultset.rb
-lib/sqlite3/statement.rb
-lib/sqlite3/translator.rb
-lib/sqlite3/value.rb
-lib/sqlite3/version.rb
-setup.rb
-tasks/faq.rake
-tasks/gem.rake
-tasks/native.rake
-tasks/vendor_sqlite3.rake
-test/helper.rb
-test/test_backup.rb
-test/test_collation.rb
-test/test_database.rb
-test/test_database_readonly.rb
-test/test_deprecated.rb
-test/test_encoding.rb
-test/test_integration.rb
-test/test_integration_open_close.rb
-test/test_integration_pending.rb
-test/test_integration_resultset.rb
-test/test_integration_statement.rb
-test/test_sqlite3.rb
-test/test_statement.rb
-test/test_statement_execute.rb

data/README.rdoc

@@ -1,74 +0,0 @@
-= SQLite3/Ruby Interface
-
-* http://github.com/luislavena/sqlite3-ruby
-* http://rubyforge.org/projects/sqlite-ruby
-* http://sqlite-ruby.rubyforge.org
-* http://groups.google.com/group/sqlite3-ruby
-
-== DESCRIPTION
-
-This module allows Ruby programs to interface with the SQLite3
-database engine (http://www.sqlite.org).  You must have the
-SQLite engine installed in order to build this module.
-
-Note that this module is NOT compatible with SQLite 2.x.
-
-== Compilation and Installation
-
-Install SQLite3, enabling option SQLITE_ENABLE_COLUMN_METADATA (see
-www.sqlite.org/compile.html for details).
-
-Then do the following:
-
-  ruby setup.rb config
-  ruby setup.rb setup
-  ruby setup.rb install
-
-Alternatively, you can download and install the RubyGem package for
-SQLite3/Ruby (you must have RubyGems and SQLite3 installed, first):
-
-  gem install sqlite3-ruby
-
-If you have sqlite3 installed in a non-standard location, you can specify the location of the include and lib files by doing:
-
-  gem install sqlite3-ruby -- --with-sqlite3-include=/opt/local/include \
-     --with-sqlite3-lib=/opt/local/lib
-
-= SUPPORT!!!
-
-== OMG!  Something has gone wrong!  Where do I get help?
-
-The best place to get help is from the
-{sqlite3-ruby mailing list}[http://groups.google.com/group/sqlite3-ruby] which
-can be found here:
-
-  * http://groups.google.com/group/sqlite3-ruby
-
-== I've found a bug!  Where do I file it?
-
-Uh oh.  After contacting the mailing list, you've found that you've actually
-discovered a bug.  You can file the bug at the
-{github issues page}[http://github.com/luislavena/sqlite3-ruby/issues]
-which can be found here:
-
-  * http://github.com/luislavena/sqlite3-ruby/issues
-
-== Usage
-
-For help figuring out the SQLite3/Ruby interface, check out the
-FAQ[http://sqlite-ruby.rubyforge.org/sqlite3/faq.html]. It includes examples of
-usage. If you have any questions that you feel should be address in the
-FAQ, please send them to jamis@37signals.com
-
-== Source Code
-
-The source repository is accessible via git:
-
-  git clone git://github.com/luislavena/sqlite3-ruby.git
-
-== Contact Information
-
-The project page is http://rubyforge.org/projects/sqlite-ruby. There, you can
-find links to mailing lists and forums that you can use to discuss this
-library. Additionally, there are trackers for submitting bugs and feature
-requests. Feel free to use them!

data/Rakefile

@@ -1,10 +0,0 @@
-#
-# NOTE: Keep this file clean.
-# Add your customizations inside tasks directory.
-# Thank You.
-#
-
-# load rakefile extensions (tasks)
-Dir['tasks/*.rake'].sort.each { |f| load f }
-
-# vim: syntax=ruby

data/ext/sqlite3/backup.c

@@ -1,164 +0,0 @@
-#include <sqlite3_ruby.h>
-
-#define REQUIRE_OPEN_BACKUP(_ctxt) \
-  if(!_ctxt->p) \
-    rb_raise(rb_path2class("SQLite3::Exception"), "cannot use a closed backup");
-
-VALUE cSqlite3Backup;
-
-static void deallocate(void * ctx)
-{
-  sqlite3BackupRubyPtr c = (sqlite3BackupRubyPtr)ctx;
-  xfree(c);
-}
-
-static VALUE allocate(VALUE klass)
-{
-  sqlite3BackupRubyPtr ctx = xcalloc((size_t)1, sizeof(sqlite3BackupRuby));
-  return Data_Wrap_Struct(klass, NULL, deallocate, ctx);
-}
-
-/* call-seq: SQLite3::Backup.new(dstdb, dstname, srcdb, srcname)
- *
- * Initialize backup the backup.
- *
- * dstdb:
- *   the destination SQLite3::Database object.
- * dstname:
- *   the destination's database name.
- * srcdb:
- *   the source SQLite3::Database object.
- * srcname:
- *   the source's database name.
- *
- * The database name is "main", "temp", or the name specified in an
- * ATTACH statement.
- *
- * This feature requires SQLite 3.6.11 or later.
- *
- *   require 'sqlite3'
- *   sdb = SQLite3::Database.new('src.sqlite3')
- *
- *   ddb = SQLite3::Database.new(':memory:')
- *   b = SQLite3::Backup.new(ddb, 'main', sdb, 'main')
- *   p [b.remaining, b.pagecount] # invalid value; for example [0, 0]
- *   begin
- *     p b.step(1) #=> OK or DONE
- *     p [b.remaining, b.pagecount]
- *   end while b.remaining > 0
- *   b.finish
- *
- *   ddb = SQLite3::Database.new(':memory:')
- *   b = SQLite3::Backup.new(ddb, 'main', sdb, 'main')
- *   b.step(-1) #=> DONE
- *   b.finish
- *
- */
-static VALUE initialize(VALUE self, VALUE dstdb, VALUE dstname, VALUE srcdb, VALUE srcname)
-{
-  sqlite3BackupRubyPtr ctx;
-  sqlite3RubyPtr ddb_ctx, sdb_ctx;
-  sqlite3_backup *pBackup;
-
-  Data_Get_Struct(self, sqlite3BackupRuby, ctx);
-  Data_Get_Struct(dstdb, sqlite3Ruby, ddb_ctx);
-  Data_Get_Struct(srcdb, sqlite3Ruby, sdb_ctx);
-
-  if(!sdb_ctx->db)
-    rb_raise(rb_eArgError, "cannot backup from a closed database");
-  if(!ddb_ctx->db)
-    rb_raise(rb_eArgError, "cannot backup to a closed database");
-
-  pBackup = sqlite3_backup_init(ddb_ctx->db, StringValuePtr(dstname),
-    sdb_ctx->db, StringValuePtr(srcname));
-  if( pBackup ){
-    ctx->p = pBackup;
-  }
-  else {
-    CHECK(ddb_ctx->db, sqlite3_errcode(ddb_ctx->db));
-  }
-
-  return self;
-}
-
-/* call-seq: SQLite3::Backup#step(nPage)
- *
- * Copy database pages up to +nPage+.
- * If negative, copy all remaining source pages.
- *
- * If all pages are copied, it returns SQLite3::Constants::ErrorCode::DONE.
- * When coping is not done, it returns SQLite3::Constants::ErrorCode::OK.
- * When some errors occur, it returns the error code.
- */
-static VALUE step(VALUE self, VALUE nPage)
-{
-  sqlite3BackupRubyPtr ctx;
-  int status;
-
-  Data_Get_Struct(self, sqlite3BackupRuby, ctx);
-  REQUIRE_OPEN_BACKUP(ctx);
-  status = sqlite3_backup_step(ctx->p, NUM2INT(nPage));
-  return INT2NUM(status);
-}
-
-/* call-seq: SQLite3::Backup#finish
- *
- * Destroy the backup object.
- */
-static VALUE finish(VALUE self)
-{
-  sqlite3BackupRubyPtr ctx;
-
-  Data_Get_Struct(self, sqlite3BackupRuby, ctx);
-  REQUIRE_OPEN_BACKUP(ctx);
-  (void)sqlite3_backup_finish(ctx->p);
-  ctx->p = NULL;
-  return Qnil;
-}
-
-/* call-seq: SQLite3::Backup#remaining
- *
- * Returns the number of pages still to be backed up.
- *
- * Note that the value is only updated after step() is called,
- * so before calling step() returned value is invalid.
- */
-static VALUE remaining(VALUE self)
-{
-  sqlite3BackupRubyPtr ctx;
-
-  Data_Get_Struct(self, sqlite3BackupRuby, ctx);
-  REQUIRE_OPEN_BACKUP(ctx);
-  return INT2NUM(sqlite3_backup_remaining(ctx->p));
-}
-
-/* call-seq: SQLite3::Backup#pagecount
- *
- * Returns the total number of pages in the source database file.
- *
- * Note that the value is only updated after step() is called,
- * so before calling step() returned value is invalid.
- */
-static VALUE pagecount(VALUE self)
-{
-  sqlite3BackupRubyPtr ctx;
-
-  Data_Get_Struct(self, sqlite3BackupRuby, ctx);
-  REQUIRE_OPEN_BACKUP(ctx);
-  return INT2NUM(sqlite3_backup_pagecount(ctx->p));
-}
-
-void init_sqlite3_backup()
-{
-#if 0
-  VALUE mSqlite3 = rb_define_module("SQLite3");
-#endif
-  cSqlite3Backup = rb_define_class_under(mSqlite3, "Backup", rb_cObject);
-
-  rb_define_alloc_func(cSqlite3Backup, allocate);
-  rb_define_method(cSqlite3Backup, "initialize", initialize, 4);
-  rb_define_method(cSqlite3Backup, "step", step, 1);
-  rb_define_method(cSqlite3Backup, "finish", finish, 0);
-  rb_define_method(cSqlite3Backup, "remaining", remaining, 0);
-  rb_define_method(cSqlite3Backup, "pagecount", pagecount, 0);
-}

data/ext/sqlite3/backup.h

@@ -1,15 +0,0 @@
-#ifndef SQLITE3_BACKUP_RUBY
-#define SQLITE3_BACKUP_RUBY
-
-#include <sqlite3_ruby.h>
-
-struct _sqlite3BackupRuby {
-  sqlite3_backup *p;
-};
-
-typedef struct _sqlite3BackupRuby sqlite3BackupRuby;
-typedef sqlite3BackupRuby * sqlite3BackupRubyPtr;
-
-void init_sqlite3_backup();
-
-#endif

data/ext/sqlite3/database.c

@@ -1,762 +0,0 @@
-#include <sqlite3_ruby.h>
-
-#define REQUIRE_OPEN_DB(_ctxt) \
-  if(!_ctxt->db) \
-    rb_raise(rb_path2class("SQLite3::Exception"), "cannot use a closed database");
-
-VALUE cSqlite3Database;
-static VALUE sym_utf16, sym_results_as_hash, sym_type_translation;
-
-static void deallocate(void * ctx)
-{
-  sqlite3RubyPtr c = (sqlite3RubyPtr)ctx;
-  sqlite3 * db     = c->db;
-
-  if(db) sqlite3_close(db);
-  xfree(c);
-}
-
-static VALUE allocate(VALUE klass)
-{
-  sqlite3RubyPtr ctx = xcalloc((size_t)1, sizeof(sqlite3Ruby));
-  return Data_Wrap_Struct(klass, NULL, deallocate, ctx);
-}
-
-static char *
-utf16_string_value_ptr(VALUE str)
-{
-  StringValue(str);
-  rb_str_buf_cat(str, "\x00", 1L);
-  return RSTRING_PTR(str);
-}
-
-/* call-seq: SQLite3::Database.new(file, options = {})
- *
- * Create a new Database object that opens the given file. If utf16
- * is +true+, the filename is interpreted as a UTF-16 encoded string.
- *
- * By default, the new database will return result rows as arrays
- * (#results_as_hash) and has type translation disabled (#type_translation=).
- */
-static VALUE initialize(int argc, VALUE *argv, VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  VALUE file;
-  VALUE opts;
-  VALUE zvfs;
-  int mode = SQLITE_OPEN_READWRITE | SQLITE_OPEN_CREATE;
-  int status;
-
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-
-  rb_scan_args(argc, argv, "12", &file, &opts, &zvfs);
-  if(NIL_P(opts)) opts = rb_hash_new();
-
-#ifdef HAVE_RUBY_ENCODING_H
-  if(UTF16_LE_P(file)) {
-    status = sqlite3_open16(utf16_string_value_ptr(file), &ctx->db);
-  } else {
-#endif
-
-    if(Qtrue == rb_hash_aref(opts, sym_utf16)) {
-      status = sqlite3_open16(utf16_string_value_ptr(file), &ctx->db);
-    } else {
-
-#ifdef HAVE_RUBY_ENCODING_H
-      if(!UTF8_P(file)) {
-        file = rb_str_export_to_enc(file, rb_utf8_encoding());
-      }
-#endif
-
-      if (Qtrue == rb_hash_aref(opts, ID2SYM(rb_intern("readonly")))) {
-        mode = SQLITE_OPEN_READONLY;
-      }
-      status = sqlite3_open_v2(
-          StringValuePtr(file),
-          &ctx->db,
-          mode,
-          NIL_P(zvfs) ? NULL : StringValuePtr(zvfs)
-      );
-    }
-
-#ifdef HAVE_RUBY_ENCODING_H
-  }
-#endif
-
-  CHECK(ctx->db, status)
-
-  rb_iv_set(self, "@tracefunc", Qnil);
-  rb_iv_set(self, "@authorizer", Qnil);
-  rb_iv_set(self, "@encoding", Qnil);
-  rb_iv_set(self, "@busy_handler", Qnil);
-  rb_iv_set(self, "@collations", rb_hash_new());
-  rb_iv_set(self, "@functions", rb_hash_new());
-  rb_iv_set(self, "@results_as_hash", rb_hash_aref(opts, sym_results_as_hash));
-  rb_iv_set(self, "@type_translation", rb_hash_aref(opts, sym_type_translation));
-  rb_iv_set(self, "@readonly", mode == SQLITE_OPEN_READONLY ? Qtrue : Qfalse);
-
-  if(rb_block_given_p()) {
-    rb_yield(self);
-    rb_funcall(self, rb_intern("close"), 0);
-  }
-
-  return self;
-}
-
-/* call-seq: db.close
- *
- * Closes this database.
- */
-static VALUE sqlite3_rb_close(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  sqlite3 * db;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-
-  db = ctx->db;
-  CHECK(db, sqlite3_close(ctx->db));
-
-  ctx->db = NULL;
-
-  return self;
-}
-
-/* call-seq: db.closed?
- *
- * Returns +true+ if this database instance has been closed (see #close).
- */
-static VALUE closed_p(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-
-  if(!ctx->db) return Qtrue;
-
-  return Qfalse;
-}
-
-/* call-seq: total_changes
- *
- * Returns the total number of changes made to this database instance
- * since it was opened.
- */
-static VALUE total_changes(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  return INT2NUM((long)sqlite3_total_changes(ctx->db));
-}
-
-static void tracefunc(void * data, const char *sql)
-{
-  VALUE self = (VALUE)data;
-  VALUE thing = rb_iv_get(self, "@tracefunc");
-  rb_funcall(thing, rb_intern("call"), 1, rb_str_new2(sql));
-}
-
-/* call-seq:
- *    trace { |sql| ... }
- *    trace(Class.new { def call sql; end }.new)
- *
- * Installs (or removes) a block that will be invoked for every SQL
- * statement executed. The block receives one parameter: the SQL statement
- * executed. If the block is +nil+, any existing tracer will be uninstalled.
- */
-static VALUE trace(int argc, VALUE *argv, VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  VALUE block;
-
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  rb_scan_args(argc, argv, "01", &block);
-
-  if(NIL_P(block) && rb_block_given_p()) block = rb_block_proc();
-
-  rb_iv_set(self, "@tracefunc", block);
-
-  sqlite3_trace(ctx->db, NIL_P(block) ? NULL : tracefunc, (void *)self);
-
-  return self;
-}
-
-static int rb_sqlite3_busy_handler(void * ctx, int count)
-{
-  VALUE self = (VALUE)(ctx);
-  VALUE handle = rb_iv_get(self, "@busy_handler");
-  VALUE result = rb_funcall(handle, rb_intern("call"), 1, INT2NUM((long)count));
-
-  if(Qfalse == result) return 0;
-
-  return 1;
-}
-
-/* call-seq:
- *    busy_handler { |count| ... }
- *    busy_handler(Class.new { def call count; end }.new)
- *
- * Register a busy handler with this database instance. When a requested
- * resource is busy, this handler will be invoked. If the handler returns
- * +false+, the operation will be aborted; otherwise, the resource will
- * be requested again.
- *
- * The handler will be invoked with the name of the resource that was
- * busy, and the number of times it has been retried.
- *
- * See also the mutually exclusive #busy_timeout.
- */
-static VALUE busy_handler(int argc, VALUE *argv, VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  VALUE block;
-  int status;
-
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  rb_scan_args(argc, argv, "01", &block);
-
-  if(NIL_P(block) && rb_block_given_p()) block = rb_block_proc();
-
-  rb_iv_set(self, "@busy_handler", block);
-
-  status = sqlite3_busy_handler(
-      ctx->db, NIL_P(block) ? NULL : rb_sqlite3_busy_handler, (void *)self);
-
-  CHECK(ctx->db, status);
-
-  return self;
-}
-
-/* call-seq: last_insert_row_id
- *
- * Obtains the unique row ID of the last row to be inserted by this Database
- * instance.
- */
-static VALUE last_insert_row_id(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  return LL2NUM(sqlite3_last_insert_rowid(ctx->db));
-}
-
-static VALUE sqlite3val2rb(sqlite3_value * val)
-{
-  switch(sqlite3_value_type(val)) {
-    case SQLITE_INTEGER:
-      return LL2NUM(sqlite3_value_int64(val));
-      break;
-    case SQLITE_FLOAT:
-      return rb_float_new(sqlite3_value_double(val));
-      break;
-    case SQLITE_TEXT:
-      return rb_tainted_str_new2((const char *)sqlite3_value_text(val));
-      break;
-    case SQLITE_BLOB:
-      return rb_tainted_str_new2((const char *)sqlite3_value_blob(val));
-      break;
-    case SQLITE_NULL:
-      return Qnil;
-      break;
-    default:
-      rb_raise(rb_eRuntimeError, "bad type"); /* FIXME */
-  }
-}
-
-static void set_sqlite3_func_result(sqlite3_context * ctx, VALUE result)
-{
-  switch(TYPE(result)) {
-    case T_NIL:
-      sqlite3_result_null(ctx);
-      break;
-    case T_FIXNUM:
-      sqlite3_result_int64(ctx, (sqlite3_int64)FIX2LONG(result));
-      break;
-    case T_BIGNUM:
-#if SIZEOF_LONG < 8
-      if (RBIGNUM_LEN(result) * SIZEOF_BDIGITS <= 8) {
-          sqlite3_result_int64(ctx, NUM2LL(result));
-          break;
-      }
-#endif
-    case T_FLOAT:
-      sqlite3_result_double(ctx, NUM2DBL(result));
-      break;
-    case T_STRING:
-      sqlite3_result_text(
-          ctx,
-          (const char *)StringValuePtr(result),
-          (int)RSTRING_LEN(result),
-          SQLITE_TRANSIENT
-      );
-      break;
-    default:
-      rb_raise(rb_eRuntimeError, "can't return %s",
-          rb_class2name(CLASS_OF(result)));
-  }
-}
-
-static void rb_sqlite3_func(sqlite3_context * ctx, int argc, sqlite3_value **argv)
-{
-  VALUE callable = (VALUE)sqlite3_user_data(ctx);
-  VALUE * params = NULL;
-  VALUE result;
-  int i;
-
-  if (argc > 0) {
-    params = xcalloc((size_t)argc, sizeof(VALUE *));
-
-    for(i = 0; i < argc; i++) {
-      params[i] = sqlite3val2rb(argv[i]);
-    }
-  }
-
-  result = rb_funcall2(callable, rb_intern("call"), argc, params);
-  xfree(params);
-
-  set_sqlite3_func_result(ctx, result);
-}
-
-#ifndef HAVE_RB_PROC_ARITY
-int rb_proc_arity(VALUE self)
-{
-  return (int)NUM2INT(rb_funcall(self, rb_intern("arity"), 0));
-}
-#endif
-
-/* call-seq: define_function(name) { |args,...| }
- *
- * Define a function named +name+ with +args+.  The arity of the block
- * will be used as the arity for the function defined.
- */
-static VALUE define_function(VALUE self, VALUE name)
-{
-  sqlite3RubyPtr ctx;
-  VALUE block;
-  int status;
-
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  block = rb_block_proc();
-
-  status = sqlite3_create_function(
-    ctx->db,
-    StringValuePtr(name),
-    rb_proc_arity(block),
-    SQLITE_UTF8,
-    (void *)block,
-    rb_sqlite3_func,
-    NULL,
-    NULL
-  );
-
-  CHECK(ctx->db, status);
-
-  rb_hash_aset(rb_iv_get(self, "@functions"), name, block);
-
-  return self;
-}
-
-static int sqlite3_obj_method_arity(VALUE obj, ID id)
-{
-  VALUE method = rb_funcall(obj, rb_intern("method"), 1, ID2SYM(id));
-  VALUE arity  = rb_funcall(method, rb_intern("arity"), 0);
-
-  return (int)NUM2INT(arity);
-}
-
-static void rb_sqlite3_step(sqlite3_context * ctx, int argc, sqlite3_value **argv)
-{
-  VALUE callable = (VALUE)sqlite3_user_data(ctx);
-  VALUE * params = NULL;
-  int i;
-
-  if (argc > 0) {
-    params = xcalloc((size_t)argc, sizeof(VALUE *));
-    for(i = 0; i < argc; i++) {
-      params[i] = sqlite3val2rb(argv[i]);
-    }
-  }
-  rb_funcall2(callable, rb_intern("step"), argc, params);
-  xfree(params);
-}
-
-static void rb_sqlite3_final(sqlite3_context * ctx)
-{
-  VALUE callable = (VALUE)sqlite3_user_data(ctx);
-  VALUE result = rb_funcall(callable, rb_intern("finalize"), 0);
-  set_sqlite3_func_result(ctx, result);
-}
-
-/* call-seq: define_aggregator(name, aggregator)
- *
- * Define an aggregate function named +name+ using the object +aggregator+.
- * +aggregator+ must respond to +step+ and +finalize+.  +step+ will be called
- * with row information and +finalize+ must return the return value for the
- * aggregator function.
- */
-static VALUE define_aggregator(VALUE self, VALUE name, VALUE aggregator)
-{
-  sqlite3RubyPtr ctx;
-  int arity, status;
-
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  arity = sqlite3_obj_method_arity(aggregator, rb_intern("step"));
-
-  status = sqlite3_create_function(
-    ctx->db,
-    StringValuePtr(name),
-    arity,
-    SQLITE_UTF8,
-    (void *)aggregator,
-    NULL,
-    rb_sqlite3_step,
-    rb_sqlite3_final
-  );
-
-  rb_iv_set(self, "@agregator", aggregator);
-
-  CHECK(ctx->db, status);
-
-  return self;
-}
-
-/* call-seq: interrupt
- *
- * Interrupts the currently executing operation, causing it to abort.
- */
-static VALUE interrupt(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  sqlite3_interrupt(ctx->db);
-
-  return self;
-}
-
-/* call-seq: errmsg
- *
- * Return a string describing the last error to have occurred with this
- * database.
- */
-static VALUE errmsg(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  return rb_str_new2(sqlite3_errmsg(ctx->db));
-}
-
-/* call-seq: errcode
- *
- * Return an integer representing the last error to have occurred with this
- * database.
- */
-static VALUE errcode_(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  return INT2NUM((long)sqlite3_errcode(ctx->db));
-}
-
-/* call-seq: complete?(sql)
- *
- * Return +true+ if the string is a valid (ie, parsable) SQL statement, and
- * +false+ otherwise.
- */
-static VALUE complete_p(VALUE UNUSED(self), VALUE sql)
-{
-  if(sqlite3_complete(StringValuePtr(sql)))
-    return Qtrue;
-
-  return Qfalse;
-}
-
-/* call-seq: changes
- *
- * Returns the number of changes made to this database instance by the last
- * operation performed. Note that a "delete from table" without a where
- * clause will not affect this value.
- */
-static VALUE changes(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  return INT2NUM(sqlite3_changes(ctx->db));
-}
-
-static int rb_sqlite3_auth(
-    void *ctx,
-    int _action,
-    const char * _a,
-    const char * _b,
-    const char * _c,
-    const char * _d)
-{
-  VALUE self   = (VALUE)ctx;
-  VALUE action = INT2NUM(_action);
-  VALUE a      = _a ? rb_str_new2(_a) : Qnil;
-  VALUE b      = _b ? rb_str_new2(_b) : Qnil;
-  VALUE c      = _c ? rb_str_new2(_c) : Qnil;
-  VALUE d      = _d ? rb_str_new2(_d) : Qnil;
-  VALUE callback = rb_iv_get(self, "@authorizer");
-  VALUE result = rb_funcall(callback, rb_intern("call"), 5, action, a, b, c, d);
-
-  if(T_FIXNUM == TYPE(result)) return (int)NUM2INT(result);
-  if(Qtrue == result) return SQLITE_OK;
-  if(Qfalse == result) return SQLITE_DENY;
-
-  return SQLITE_IGNORE;
-}
-
-/* call-seq: set_authorizer = auth
- *
- * Set the authorizer for this database.  +auth+ must respond to +call+, and
- * +call+ must take 5 arguments.
- *
- * Installs (or removes) a block that will be invoked for every access
- * to the database. If the block returns 0 (or +true+), the statement
- * is allowed to proceed. Returning 1 or false causes an authorization error to
- * occur, and returning 2 or nil causes the access to be silently denied.
- */
-static VALUE set_authorizer(VALUE self, VALUE authorizer)
-{
-  sqlite3RubyPtr ctx;
-  int status;
-
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  status = sqlite3_set_authorizer(
-      ctx->db, NIL_P(authorizer) ? NULL : rb_sqlite3_auth, (void *)self
-  );
-
-  CHECK(ctx->db, status);
-
-  rb_iv_set(self, "@authorizer", authorizer);
-
-  return self;
-}
-
-/* call-seq: db.busy_timeout = ms
- *
- * Indicates that if a request for a resource terminates because that
- * resource is busy, SQLite should sleep and retry for up to the indicated
- * number of milliseconds. By default, SQLite does not retry
- * busy resources. To restore the default behavior, send 0 as the
- * +ms+ parameter.
- *
- * See also the mutually exclusive #busy_handler.
- */
-static VALUE set_busy_timeout(VALUE self, VALUE timeout)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  CHECK(ctx->db, sqlite3_busy_timeout(ctx->db, (int)NUM2INT(timeout)));
-
-  return self;
-}
-
-int rb_comparator_func(void * ctx, int a_len, const void * a, int b_len, const void * b)
-{
-  VALUE comparator;
-  VALUE a_str;
-  VALUE b_str;
-  VALUE comparison;
-#ifdef HAVE_RUBY_ENCODING_H
-  rb_encoding * internal_encoding;
-
-  internal_encoding = rb_default_internal_encoding();
-#endif
-
-  comparator = (VALUE)ctx;
-  a_str = rb_str_new((const char *)a, a_len);
-  b_str = rb_str_new((const char *)b, b_len);
-
-#ifdef HAVE_RUBY_ENCODING_H
-  rb_enc_associate_index(a_str, rb_utf8_encindex());
-  rb_enc_associate_index(b_str, rb_utf8_encindex());
-
-  if(internal_encoding) {
-    a_str = rb_str_export_to_enc(a_str, internal_encoding);
-    b_str = rb_str_export_to_enc(b_str, internal_encoding);
-  }
-#endif
-
-  comparison = rb_funcall(comparator, rb_intern("compare"), 2, a_str, b_str);
-
-  return NUM2INT(comparison);
-}
-
-/* call-seq: db.collation(name, comparator)
- *
- * Add a collation with name +name+, and a +comparator+ object.  The
- * +comparator+ object should implement a method called "compare" that takes
- * two parameters and returns an integer less than, equal to, or greater than
- * 0.
- */
-static VALUE collation(VALUE self, VALUE name, VALUE comparator)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  CHECK(ctx->db, sqlite3_create_collation_v2(
-        ctx->db,
-        StringValuePtr(name),
-        SQLITE_UTF8,
-        (void *)comparator,
-        NIL_P(comparator) ? NULL : rb_comparator_func,
-        NULL));
-
-  /* Make sure our comparator doesn't get garbage collected. */
-  rb_hash_aset(rb_iv_get(self, "@collations"), name, comparator);
-
-  return self;
-}
-
-/* call-seq: db.load_extension(file)
- *
- * Loads an SQLite extension library from the named file. Extension
- * loading must be enabled using db.enable_load_extension(1) prior
- * to calling this API.
- */
-static VALUE load_extension(VALUE self, VALUE file)
-{
-  sqlite3RubyPtr ctx;
-  int status;
-  char *errMsg;
-  VALUE errexp;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  status = sqlite3_load_extension(ctx->db, RSTRING_PTR(file), 0, &errMsg);
-  if (status != SQLITE_OK)
-  {
-    errexp = rb_exc_new2(rb_eRuntimeError, errMsg);
-    sqlite3_free(errMsg);
-    rb_exc_raise(errexp);
-  }
-
-  return self;
-}
-
-/* call-seq: db.enable_load_extension(onoff)
- *
- * Enable or disable extension loading.
- */
-static VALUE enable_load_extension(VALUE self, VALUE onoff)
-{
-  sqlite3RubyPtr ctx;
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  CHECK(ctx->db, sqlite3_enable_load_extension(ctx->db, (int)NUM2INT(onoff)));
-
-  return self;
-}
-
-#ifdef HAVE_RUBY_ENCODING_H
-static int enc_cb(void * _self, int UNUSED(columns), char **data, char **UNUSED(names))
-{
-  VALUE self = (VALUE)_self;
-
-  int index = rb_enc_find_index(data[0]);
-  rb_encoding * e = rb_enc_from_index(index);
-  rb_iv_set(self, "@encoding", rb_enc_from_encoding(e));
-
-  return 0;
-}
-#else
-static int enc_cb(void * _self, int UNUSED(columns), char **data, char **UNUSED(names))
-{
-  VALUE self = (VALUE)_self;
-
-  rb_iv_set(self, "@encoding", rb_str_new2(data[0]));
-
-  return 0;
-}
-#endif
-
-/* call-seq: db.encoding
- *
- * Fetch the encoding set on this database
- */
-static VALUE db_encoding(VALUE self)
-{
-  sqlite3RubyPtr ctx;
-  VALUE enc;
-
-  Data_Get_Struct(self, sqlite3Ruby, ctx);
-  REQUIRE_OPEN_DB(ctx);
-
-  enc = rb_iv_get(self, "@encoding");
-
-  if(NIL_P(enc)) {
-    sqlite3_exec(ctx->db, "PRAGMA encoding", enc_cb, (void *)self, NULL);
-  }
-
-  return rb_iv_get(self, "@encoding");
-}
-
-void init_sqlite3_database()
-{
-  ID id_utf16, id_results_as_hash, id_type_translation;
-#if 0
-  VALUE mSqlite3 = rb_define_module("SQLite3");
-#endif
-  cSqlite3Database = rb_define_class_under(mSqlite3, "Database", rb_cObject);
-
-  rb_define_alloc_func(cSqlite3Database, allocate);
-  rb_define_method(cSqlite3Database, "initialize", initialize, -1);
-  rb_define_method(cSqlite3Database, "collation", collation, 2);
-  rb_define_method(cSqlite3Database, "close", sqlite3_rb_close, 0);
-  rb_define_method(cSqlite3Database, "closed?", closed_p, 0);
-  rb_define_method(cSqlite3Database, "total_changes", total_changes, 0);
-  rb_define_method(cSqlite3Database, "trace", trace, -1);
-  rb_define_method(cSqlite3Database, "last_insert_row_id", last_insert_row_id, 0);
-  rb_define_method(cSqlite3Database, "define_function", define_function, 1);
-  rb_define_method(cSqlite3Database, "define_aggregator", define_aggregator, 2);
-  rb_define_method(cSqlite3Database, "interrupt", interrupt, 0);
-  rb_define_method(cSqlite3Database, "errmsg", errmsg, 0);
-  rb_define_method(cSqlite3Database, "errcode", errcode_, 0);
-  rb_define_method(cSqlite3Database, "complete?", complete_p, 1);
-  rb_define_method(cSqlite3Database, "changes", changes, 0);
-  rb_define_method(cSqlite3Database, "authorizer=", set_authorizer, 1);
-  rb_define_method(cSqlite3Database, "busy_handler", busy_handler, -1);
-  rb_define_method(cSqlite3Database, "busy_timeout=", set_busy_timeout, 1);
-
-#ifdef HAVE_SQLITE3_LOAD_EXTENSION
-  rb_define_method(cSqlite3Database, "load_extension", load_extension, 1);
-#endif
-
-#ifdef HAVE_SQLITE3_ENABLE_LOAD_EXTENSION
-  rb_define_method(cSqlite3Database, "enable_load_extension", enable_load_extension, 1);
-#endif
-
-  rb_define_method(cSqlite3Database, "encoding", db_encoding, 0);
-
-  id_utf16 = rb_intern("utf16");
-  sym_utf16 = ID2SYM(id_utf16);
-  id_results_as_hash = rb_intern("results_as_hash");
-  sym_results_as_hash = ID2SYM(id_results_as_hash);
-  id_type_translation = rb_intern("type_translation");
-  sym_type_translation = ID2SYM(id_type_translation);
-}