Scan multiple rows for determining type in strict mode.

Author: evetion

src/SQLite.jl

@@ -438,14 +438,36 @@ end
 # get julia type for given column of the given statement
 function juliatype(handle, col)
     stored_typeid = C.sqlite3_column_type(handle, col - 1)
+    did_row_scan = false
+    while stored_typeid == C.SQLITE_NULL
+        # Scan forward through the rows until we find a non-NULL value for this column
+        st = C.sqlite3_step(handle)
+        did_row_scan = true
+        if st == C.SQLITE_DONE
+            break
+        end
+        stored_typeid = C.sqlite3_column_type(handle, col - 1)
+        if stored_typeid != C.SQLITE_NULL
+            break
+        end
+    end
     if stored_typeid == C.SQLITE_BLOB
         # blobs are serialized julia types, so just try to deserialize it
+        # when forward scanning we need to use the current step to deserialize
         deser_val = sqlitevalue(Any, handle, col)
         # FIXME deserialized type have priority over declared type, is it fine?
+        if did_row_scan
+            C.sqlite3_reset(handle)
+            C.sqlite3_step(handle)
+        end
         return typeof(deser_val)
     else
         stored_type = juliatype(stored_typeid)
     end
+    if did_row_scan
+        C.sqlite3_reset(handle)
+        C.sqlite3_step(handle)
+    end
     decl_typestr = C.sqlite3_column_decltype(handle, col - 1)
     if decl_typestr != C_NULL
         return juliatype(unsafe_string(decl_typestr), stored_type)

test/runtests.jl

@@ -1067,16 +1067,16 @@ end
     tbl = DBInterface.execute(db, "select x from tmp") |> columntable
     @test isequal(tbl.x, [missing, :a])
 
-    # Symbol in TEXT type doesn't work
-    # when strict and first row is NULL (the serialized bytes are interpreted as a string)
+    # Symbol in TEXT type now works even when strict and first row is NULL,
+    # because juliatype scans multiple rows to find the actual stored type (BLOB)
     tbl =
         DBInterface.execute(
             DBInterface.prepare(db, "select x from tmp"),
             ();
             strict = true,
         ) |> columntable
     @test tbl.x[1] === missing
-    @test tbl.x[2] isa String  # Symbol gets incorrectly deserialized as garbage string
+    @test tbl.x[2] === :a
 
     # Symbol in BLOB type does work strict
     db = SQLite.DB()