Datomic local

Author: danielsz

CHANGELOG.org

@@ -1,7 +1,7 @@
 * Changes 
 ** 0.5.5-SNAPSHOT
 - Init-fn for Mariadb component.
-- Support for EclipseStore, persistable atom component
+- Support for Datomic local. Init-fn takes the Datomic connection as argument.
 ** 0.5.4
 - Support for multiple API handlers, which are siloed handlers with their own prefix, middleware and dependencies.
 ** 0.5.3

src/system/components/datomic_local.clj

@@ -0,0 +1,18 @@
+(ns system.components.datomic-local
+  (:require [com.stuartsierra.component :as component]
+            [datomic.client.api :as d]))
+
+(defrecord DatomicLocal [cfg db init-fn]
+  component/Lifecycle
+  (start [component]
+    (let [client (d/client cfg)
+          _ (d/create-database client db)
+          conn (d/connect client db)]
+      (when init-fn
+        (init-fn conn))
+      (assoc component :client client :conn conn)))
+  (stop [component]
+    (dissoc component :client :conn)))
+
+(defn new-datomic-local [& {:keys [cfg db init-fn]}]
+  (map->DatomicLocal {:cfg cfg :db db :init-fn init-fn}))