update to refactored api

refactor specs

spec/database_spec.cr

@@ -27,7 +27,6 @@ describe Database do
     end
   end
 
-  # pending
   it "executes and selects blob" do
     rows = with_db_old(&.execute(%(select X'53514C697465')))
     row = rows[0]
@@ -60,6 +59,7 @@ describe Database do
     end
   end
 
+  # pending
   it "gets column types" do
     Database.new(":memory:") do |db|
       db.execute "create table person (name string, age integer)"

spec/driver_spec.cr

@@ -1,13 +1,13 @@
 require "./spec_helper"
 
-def with_db
-  yield DB.open "sqlite3", {"database": DB_FILENAME}
+def with_db(&block : DB::Database ->)
+  DB.open "sqlite3", {"database": DB_FILENAME}, &block
 ensure
   File.delete(DB_FILENAME)
 end
 
-def with_mem_db
-  yield DB.open "sqlite3", {"database": ":memory:"}
+def with_mem_db(&block : DB::Database ->)
+  DB.open "sqlite3", {"database": ":memory:"}, &block
 end
 
 def sql(s : String)
@@ -18,16 +18,16 @@ def sql(s)
   "#{s}"
 end
 
-def assert_single_read(result_set, value_type, value)
-  result_set.move_next.should be_true
-  result_set.read(value_type).should eq(value)
-  result_set.move_next.should be_false
+def assert_single_read(rs, value_type, value)
+  rs.move_next.should be_true
+  rs.read(value_type).should eq(value)
+  rs.move_next.should be_false
 end
 
-def assert_single_read?(result_set, value_type, value)
-  result_set.move_next.should be_true
-  result_set.read?(value_type).should eq(value)
-  result_set.move_next.should be_false
+def assert_single_read?(rs, value_type, value)
+  rs.move_next.should be_true
+  rs.read?(value_type).should eq(value)
+  rs.move_next.should be_false
 end
 
 describe Driver do
@@ -45,108 +45,154 @@ describe Driver do
   {% for value in [1, 1_i64, "hello", 1.5, 1.5_f32] %}
     it "executes and select {{value.id}}" do
       with_db do |db|
-        result_set = db.exec("select #{sql({{value}})}")
-        assert_single_read result_set, typeof({{value}}), {{value}}
+        db.scalar(typeof({{value}}), "select #{sql({{value}})}").should eq({{value}})
+
+        db.query "select #{sql({{value}})}" do |rs|
+          assert_single_read rs, typeof({{value}}), {{value}}
+        end
       end
     end
 
     it "executes and select {{value.id}} as nillable" do
       with_db do |db|
-        result_set = db.exec("select #{sql({{value}})}")
-        assert_single_read? result_set, typeof({{value}}), {{value}}
+        db.scalar?(typeof({{value}}), "select #{sql({{value}})}").should eq({{value}})
+
+        db.query "select #{sql({{value}})}" do |rs|
+          assert_single_read? rs, typeof({{value}}), {{value}}
+        end
       end
     end
 
     it "executes and select nil as type of {{value.id}}" do
       with_db do |db|
-        result_set = db.exec("select null")
-        assert_single_read? result_set, typeof({{value}}), nil
+        db.scalar?(typeof({{value}}), "select null").should be_nil
+
+        db.query "select null" do |rs|
+          assert_single_read? rs, typeof({{value}}), nil
+        end
       end
     end
 
     it "executes with bind {{value.id}}" do
       with_db do |db|
-        result_set = db.exec(%(select ?), {{value}})
-        assert_single_read result_set, typeof({{value}}), {{value}}
+        db.scalar(typeof({{value}}), %(select ?), {{value}}).should eq({{value}})
       end
     end
 
     it "executes with bind {{value.id}} read as nillable" do
       with_db do |db|
-        result_set = db.exec(%(select ?), {{value}})
-        assert_single_read? result_set, typeof({{value}}), {{value}}
+        db.scalar?(typeof({{value}}), %(select ?), {{value}}).should eq({{value}})
       end
     end
 
     it "executes with bind nil as typeof {{value.id}}" do
       with_db do |db|
-        result_set = db.exec(%(select ?), nil)
-        assert_single_read? result_set, typeof({{value}}), nil
+        db.scalar?(typeof({{value}}), %(select ?), nil).should be_nil
       end
     end
 
     it "executes with bind {{value.id}} as array" do
       with_db do |db|
-        result_set = db.exec(%(select ?), [{{value}}])
-        assert_single_read result_set, typeof({{value}}), {{value}}
+        db.scalar?(typeof({{value}}), %(select ?), [{{value}}]).should eq({{value}})
       end
     end
   {% end %}
 
   it "executes and selects blob" do
     with_db do |db|
-      result_set = db.exec %(select X'53514C697465')
-      result_set.move_next
-      result_set.read(Slice(UInt8)).to_a.should eq([0x53, 0x51, 0x4C, 0x69, 0x74, 0x65])
+      slice = db.scalar(Slice(UInt8), %(select X'53514C697465'))
+      slice.to_a.should eq([0x53, 0x51, 0x4C, 0x69, 0x74, 0x65])
     end
   end
 
   it "executes with bind blob" do
     with_db do |db|
       ary = UInt8[0x53, 0x51, 0x4C, 0x69, 0x74, 0x65]
-      result_set = db.exec %(select cast(? as BLOB)), Slice.new(ary.to_unsafe, ary.size)
-      result_set.move_next
-      result_set.read(Slice(UInt8)).to_a.should eq(ary)
+      slice = db.scalar Slice(UInt8), %(select cast(? as BLOB)), Slice.new(ary.to_unsafe, ary.size)
+      slice.to_a.should eq(ary)
     end
   end
 
   it "executes with named bind using symbol" do
     with_db do |db|
-      result_set = db.exec(%(select :value), {value: "hello"})
-      assert_single_read result_set, String, "hello"
+      db.scalar(String, %(select :value), {value: "hello"}).should eq("hello")
     end
   end
 
   it "executes with named bind using string" do
     with_db do |db|
-      result_set = db.exec(%(select :value), {"value": "hello"})
-      assert_single_read result_set, String, "hello"
+      db.scalar(String, %(select :value), {"value": "hello"}).should eq("hello")
     end
   end
 
   it "gets column count" do
     with_mem_db do |db|
-      db.exec_non_query "create table person (name string, age integer)"
-      db.exec_non_query %(insert into person values ("foo", 10))
+      db.exec "create table person (name string, age integer)"
 
-      run = false
-      db.exec_query_each "select * from person" do |result_set|
-        run = true
-        result_set.column_count.should eq(2)
+      db.query "select * from person" do |rs|
+        rs.column_count.should eq(2)
       end
-      run.should be_true
     end
   end
 
   it "gets column name" do
     with_mem_db do |db|
-      db.exec_non_query "create table person (name string, age integer)"
-      db.exec_non_query %(insert into person values ("foo", 10))
+      db.exec "create table person (name string, age integer)"
 
-      db.exec_query_each("select * from person") do |result_set|
-        result_set.column_name(0).should eq("name")
-        result_set.column_name(1).should eq("age")
+      db.query "select * from person" do |rs|
+        rs.column_name(0).should eq("name")
+        rs.column_name(1).should eq("age")
       end
     end
   end
+
+  # TODO get other value types from table
+  # TODO get many rows from table
+  # TODO get_last_row_id
+  # TODO gets column types
+  # TODO migrate quotes to std
+
+  it "gets values from table" do
+    with_mem_db do |db|
+      db.exec "create table person (name string, age integer)"
+      db.exec %(insert into person values ("foo", 10))
+
+      db.query "select * from person" do |rs|
+        rs.move_next.should be_true
+        rs.read(String).should eq("foo")
+        rs.read(Int32).should eq(10)
+        rs.move_next.should be_false
+      end
+    end
+  end
+
+  it "ensures statements are closed" do
+    begin
+      DB.open "sqlite3", {"database": DB_FILENAME} do |db|
+        db.exec %(create table if not exists a (i int not null, str text not null);)
+        db.exec %(insert into a (i, str) values (23, "bai bai");)
+      end
+
+      2.times do |i|
+        DB.open "sqlite3", {"database": DB_FILENAME} do |db|
+          begin
+            db.query("SELECT i, str FROM a WHERE i = ?", 23) do |rs|
+              rs.move_next
+              break
+            end
+          rescue e : SQLite3::Exception
+            fail("Expected no exception, but got \"#{e.message}\"")
+          end
+
+          begin
+            db.exec("UPDATE a SET i = ? WHERE i = ?", 23, 23)
+          rescue e : SQLite3::Exception
+            fail("Expected no exception, but got \"#{e.message}\"")
+          end
+        end
+      end
+    ensure
+      File.delete(DB_FILENAME)
+    end
+  end
 end

src/sqlite3/connection.cr

@@ -0,0 +1,23 @@
+class SQLite3::Connection < DB::Connection
+  def initialize(options)
+    super
+    filename = options["database"]
+    check LibSQLite3.open_v2(filename, out @db, (LibSQLite3::Flag::READWRITE | LibSQLite3::Flag::CREATE), nil)
+  end
+
+  def prepare(query)
+    Statement2.new(self, query)
+  end
+
+  def perform_close
+    LibSQLite3.close_v2(self)
+  end
+
+  def to_unsafe
+    @db
+  end
+
+  private def check(code)
+    raise Exception.new(self) unless code == 0
+  end
+end

src/sqlite3/driver.cr

@@ -1,21 +1,6 @@
 class SQLite3::Driver < DB::Driver
-  def initialize(options)
-    super
-    filename = options["database"]
-    check LibSQLite3.open_v2(filename, out @db, (LibSQLite3::Flag::READWRITE | LibSQLite3::Flag::CREATE), nil)
-    # @closed = false
-  end
-
-  def prepare(query)
-    Statement2.new(self, query)
-  end
-
-  def to_unsafe
-    @db
-  end
-
-  private def check(code)
-    raise Exception.new(@db) unless code == 0
+  def build_connection
+    SQLite3::Connection.new(options)
   end
 end
 

src/sqlite3/result_set2.cr

@@ -13,7 +13,7 @@ class SQLite3::ResultSet2 < DB::ResultSet
     when LibSQLite3::Code::DONE
       false
     else
-      raise Exception.new(@statement.driver)
+      raise Exception.new(@statement.connection)
     end
   end
 
@@ -65,6 +65,10 @@ class SQLite3::ResultSet2 < DB::ResultSet
     String.new LibSQLite3.column_name(self, index)
   end
 
+  def column_type(index : Int32)
+    raise "not implemented"
+  end
+
   def to_unsafe
     @statement.to_unsafe
   end

src/sqlite3/statement2.cr

@@ -1,10 +1,10 @@
 class SQLite3::Statement2 < DB::Statement
-  def initialize(@driver, sql)
-    check LibSQLite3.prepare_v2(@driver, sql, sql.bytesize + 1, out @stmt, nil)
-    # @closed = false
+  def initialize(connection, sql)
+    super(connection)
+    check LibSQLite3.prepare_v2(@connection, sql, sql.bytesize + 1, out @stmt, nil)
   end
 
-  protected def before_execute
+  protected def begin_parameters
     LibSQLite3.reset(self)
   end
 
@@ -23,7 +23,7 @@ class SQLite3::Statement2 < DB::Statement
     bind_arg(index, value)
   end
 
-  protected def execute
+  protected def perform
     ResultSet2.new(self)
   end
 
@@ -56,7 +56,7 @@ class SQLite3::Statement2 < DB::Statement
   end
 
   private def check(code)
-    raise Exception.new(@driver) unless code == 0
+    raise Exception.new(@connection) unless code == 0
   end
 
   def to_unsafe