clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-06-01 19:01:22 +00:00
Code Issues Packages Projects Releases Wiki Activity

refactor(fs): re-impl rename for nfs

Browse Source
This commit is contained in:
Andelf
2023-03-15 13:24:05 +08:00
parent d7fc1d785e
commit e4c37b7089
1 changed files with 19 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
src/main/frontend/fs/nfs.cljs
View File

@@ -173,7 +173,6 @@
(defrecord ^:large-vars/cleanup-todo Nfs []
protocol/Fs
(mkdir! [_this dir]
(prn ::mkdir dir)
(let [dir (fs2-path/path-normalize dir)
parent-dir (fs2-path/parent dir)
@@ -210,9 +209,7 @@
(unlink! [this repo fpath _opts]
(let [repo-dir (config/get-repo-dir repo)
filename (fs2-path/filename fpath)
;; [dir basename] (util/get-dir-and-basename path)
handle-path (str "handle/" fpath)
recycle-dir (fs2-path/path-join repo-dir config/app-name config/recycle-dir)]
(->
@@ -231,7 +228,6 @@
parent-dir (fs2-path/parent fpath)
parent-handle (get-nfs-file-handle (str "handle/" parent-dir))
_ (when parent-handle
(.removeEntry ^js parent-handle filename))]
(idb/remove-item! handle-path)
@@ -272,13 +268,12 @@
(not (contains? #{"excalidraw" "edn" "css"} ext))
(not (string/includes? path "/.recycle/")))
(state/pub-event! [:file/not-matched-from-disk path disk-content content])
(do ;; actually writing
(p/let [_ (verify-permission repo true)
_ (utils/writeFile file-handle content)
file (.getFile file-handle)]
(when file
(db/set-file-content! repo path content)
(nfs-saved-handler repo path file))))))
(p/let [_ (verify-permission repo true)
_ (utils/writeFile file-handle content)
file (.getFile file-handle)]
(when file
(db/set-file-content! repo path content)
(nfs-saved-handler repo path file)))))
;; file no-exist, write via parent dir handle
(p/let [basename (fs2-path/filename fpath)
parent-dir (fs2-path/parent fpath)
@@ -304,30 +299,29 @@
false)
(state/pub-event! [:file/alter repo path text]))))
;; TODO: create parent directory and write
(js/console.error "file not exists in cache")))))))
;; TODO(andelf): Create parent directory and write
;; Normally directory are created layer by layer. So it's safe to leave this unimplemented.
(js/console.error "TODO: can not create directory hierarchy")))))))
(rename! [this repo old-path new-path]
(p/let [parts (->> (string/split new-path "/")
(remove string/blank?))
dir (str "/" (first parts))
new-path (->> (rest parts)
util/string-join-path)
handle (idb/get-item (str "handle" old-path))
file (.getFile handle)
content (.text file)
_ (protocol/write-file! this repo dir new-path content nil)]
(protocol/unlink! this repo old-path nil)))
(p/let [repo-dir (config/get-repo-dir repo)
old-rpath (fs2-path/relative-path repo old-path)
new-rpath (fs2-path/relative-path repo new-path)
old-content (protocol/read-file this repo old-rpath nil)
_ (protocol/write-file! this repo repo-dir new-rpath old-content nil)
_ (protocol/unlink! this repo old-path nil)]))
(stat [_this fpath]
(prn ::stat fpath)
(if-let [file (get-nfs-file-handle (str "handle/" fpath))]
(p/let [file (.getFile file)]
(if-let [handle (get-nfs-file-handle (str "handle/" fpath))]
(p/let [file (.getFile handle)]
(let [get-attr #(gobj/get file %)]
{:last-modified-at (get-attr "lastModified")
:size (get-attr "size")
:path fpath
:type (get-attr "type")}))
(p/rejected "File not exists")))
(open-dir [_this _dir]
(p/let [files (utils/openDirectory #js {:recursive true
:mode "readwrite"}