clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-01 09:26:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

enhance(dev): scripts can read or write db graphs as full path files

Browse Source 
This allows for easier use of debugging graphs as they are exported by
users as a file. Also DRYed up duplicated helper
This commit is contained in:
Gabriel Horner
2025-05-23 13:56:19 -04:00
parent fcc7316c9f
commit 3fe790d4d7
12 changed files with 90 additions and 163 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
deps/outliner/script/transact.cljs vendored
View File

@@ -1,34 +1,21 @@
(ns transact
"This script generically runs transactions against the queried blocks"
(:require ["os" :as os]
["path" :as node-path]
[clojure.edn :as edn]
[clojure.string :as string]
(:require [clojure.edn :as edn]
[datascript.core :as d]
[logseq.db.frontend.rules :as rules]
[logseq.db.common.sqlite-cli :as sqlite-cli]
[logseq.outliner.db-pipeline :as db-pipeline]
[nbb.core :as nbb]))
(defn- get-dir-and-db-name
"Gets dir and db name for use with open-db! Works for relative and absolute paths and
defaults to ~/logseq/graphs/ when no '/' present in name"
[graph-dir]
(if (string/includes? graph-dir "/")
(let [resolve-path' #(if (node-path/isAbsolute %) %
;; $ORIGINAL_PWD used by bb tasks to correct current dir
(node-path/join (or js/process.env.ORIGINAL_PWD ".") %))]
((juxt node-path/dirname node-path/basename) (resolve-path' graph-dir)))
[(node-path/join (os/homedir) "logseq" "graphs") graph-dir]))
(defn -main [args]
(when (< (count args) 3)
(println "Usage: $0 GRAPH-DIR QUERY TRANSACT-FN")
(js/process.exit 1))
(let [[graph-dir query* transact-fn*] args
dry-run? (contains? (set args) "-n")
[dir db-name] (get-dir-and-db-name graph-dir)
conn (sqlite-cli/open-db! dir db-name)
open-db-args (sqlite-cli/->open-db-args graph-dir)
db-name (if (= 1 (count open-db-args)) (first open-db-args) (second open-db-args))
conn (apply sqlite-cli/open-db! open-db-args)
;; find blocks to update
query (into (edn/read-string query*) [:in '$ '%]) ;; assumes no :in are in queries
transact-fn (edn/read-string transact-fn*)