Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-11 07:11:32 -05:00
Code Issues Activity

✨ Improve db/pool initialization and reusability

Browse source
This commit is contained in:
Andrey Antukh 2023-02-06 12:23:39 +01:00
parent 41d34de9e1
commit 3cf4a3facc
1 changed files with 17 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

27
backend/src/app/db.clj
View file

@ -59,8 +59,8 @@
(s/def ::read-only? ::us/boolean)
(s/def ::pool-options
(s/keys :req [::uri]
:opt [::name
(s/keys :opt [::uri
::name
::min-size
::max-size
::connection-timeout
@ -89,15 +89,16 @@
(defmethod ig/init-key ::pool
[_ {:keys [::uri ::read-only?] :as cfg}]
(l/info :hint "initialize connection pool"
:name (d/name (::name cfg))
:uri uri
:read-only read-only?
:with-credentials (and (contains? cfg ::username)
(contains? cfg ::password))
:min-size (::min-size cfg)
(when uri
(l/info :hint "initialize connection pool"
:name (d/name (::name cfg))
:uri uri
:read-only read-only?
:with-credentials (and (contains? cfg ::username)
(contains? cfg ::password))
:min-size (::min-size cfg)
:max-size (::max-size cfg))
(create-pool cfg))
(create-pool cfg)))
(defmethod ig/halt-key! ::pool
[_ pool]
@ -144,6 +145,7 @@
[v]
(instance? javax.sql.DataSource v))
(s/def ::conn some?)
(s/def ::pool pool?)
(s/def ::nilable-pool (s/nilable ::pool))
(s/def ::conn-or-pool some?)
@ -430,6 +432,11 @@
(.setType "jsonb")
(.setValue (json/encode-str data)))))
(defn get-update-count
[result]
(:next.jdbc/update-count result))
;; --- Locks
(def ^:private siphash-state