From 6b377719c10d5ab3343fd5221f99a4a21008e25a Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@dailly.me>
Date: Thu, 14 Mar 2024 08:26:58 +0100
Subject: Initial commit

---
 lib/file_handler/state.mli | 46 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 46 insertions(+)
 create mode 100644 lib/file_handler/state.mli

(limited to 'lib/file_handler/state.mli')

diff --git a/lib/file_handler/state.mli b/lib/file_handler/state.mli
new file mode 100644
index 0000000..f744c33
--- /dev/null
+++ b/lib/file_handler/state.mli
@@ -0,0 +1,46 @@
+type 'a t = {
+  header : 'a option;
+  transaction : bool;
+  insert_stmt : Sqlite3.stmt option;
+  check_key_stmt : Sqlite3.stmt option;
+  row_number : int;
+  sheet_number : int;
+  delayed : 'a list;
+}
+
+type insert_result = {
+  insert_stmt : Sqlite3.stmt option;
+  check_key_stmt : Sqlite3.stmt option;
+}
+
+type ('a, 'b) mapper = {
+  get_row : 'b -> 'a Array.t;
+  get_value : 'a -> ImportCSV.DataType.t;
+  default : 'a;
+}
+
+val insert_row :
+  mapper:(_, 'row) mapper ->
+  ImportAnalyser.Dependency.t ->
+  _ ImportSQL.Db.t ->
+  'row ->
+  _ t ->
+  (insert_result, ImportErrors.xlsError) result
+(** Low level row insertion *)
+
+val run_row :
+  log_error:ImportErrors.t ->
+  mapper:(_, 'row) mapper ->
+  ImportAnalyser.Dependency.t ->
+  _ ImportSQL.Db.t ->
+  'row ->
+  'a t ->
+  'a t
+
+val clear :
+  log_error:ImportErrors.t ->
+  'a ImportSQL.Db.t ->
+  ImportAnalyser.Dependency.t ->
+  ImportConf.Syntax.t ->
+  unit ImportSQL.Db.result
+(** Clean up the table after the insertion, check for the duplicates and external references *)
-- 
cgit v1.2.3