clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-27 23:54:55 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat!: File Sync (#5355)

Browse Source 
- file sync for electron/ios/android
- age encryption of both file content and file path
- massive UI enhancement
- corresponding CI tasks

Co-authored-by: llcc <lzhes43@gmail.com>
Co-authored-by: rcmerci <rcmerci@gmail.com>
Co-authored-by: Tienson Qin <tiensonqin@gmail.com>
Co-authored-by: Andelf <andelf@gmail.com>
Co-authored-by: Gabriel Horner <gabriel@logseq.com>
This commit is contained in:
Charlie
2022-09-01 00:31:49 +08:00
committed by GitHub
parent 252fec4dd6
commit 01d879c18e
111 changed files with 6507 additions and 1950 deletions
Download Patch File Download Diff File Expand all files Collapse all files

117
src/main/frontend/handler/user.cljs
View File

@@ -7,6 +7,7 @@
[cljs-time.core :as t]
[cljs-time.coerce :as tc]
[cljs-http.client :as http]
[lambdaisland.glogi :as log]
[cljs.core.async :as async :refer [go go-loop <! timeout]]))
(defn set-preferred-format!
@@ -26,15 +27,15 @@
(defn- parse-jwt [jwt]
(some-> jwt
(string/split ".")
(second)
(js/atob)
(js/JSON.parse)
second
js/atob
js/JSON.parse
(js->clj :keywordize-keys true)))
(defn- expired? [parsed-jwt]
(some->
(* 1000 (:exp parsed-jwt))
(tc/from-long)
tc/from-long
(t/before? (t/now))))
(defn- almost-expired?
@@ -42,62 +43,66 @@
[parsed-jwt]
(some->
(* 1000 (:exp parsed-jwt))
(tc/from-long)
tc/from-long
(t/before? (-> 1 t/hours t/from-now))))
(defn email []
(some->
(state/get-auth-id-token)
(parse-jwt)
(:email)))
parse-jwt
:email))
(defn user-uuid []
(some->
(state/get-auth-id-token)
(parse-jwt)
(:sub)))
parse-jwt
:sub))
(defn logged-in? []
(boolean
(some->
(state/get-auth-id-token)
(parse-jwt)
(expired?)
(not))))
parse-jwt
expired?
not)))
(defn- clear-tokens []
(defn- set-token-to-localstorage!
([id-token access-token]
(log/info :debug "set-token-to-localstorage!")
(js/localStorage.setItem "id-token" id-token)
(js/localStorage.setItem "access-token" access-token))
([id-token access-token refresh-token]
(log/info :debug "set-token-to-localstorage!")
(js/localStorage.setItem "id-token" id-token)
(js/localStorage.setItem "access-token" access-token)
(js/localStorage.setItem "refresh-token" refresh-token)))
(defn- clear-tokens
[]
(state/set-auth-id-token nil)
(state/set-auth-access-token nil)
(state/set-auth-refresh-token nil))
(state/set-auth-refresh-token nil)
(set-token-to-localstorage! "" "" ""))
(defn- set-tokens!
([id-token access-token]
(state/set-auth-id-token id-token)
(state/set-auth-access-token access-token))
(state/set-auth-access-token access-token)
(set-token-to-localstorage! id-token access-token))
([id-token access-token refresh-token]
(state/set-auth-id-token id-token)
(state/set-auth-access-token access-token)
(state/set-auth-refresh-token refresh-token)))
(state/set-auth-refresh-token refresh-token)
(set-token-to-localstorage! id-token access-token refresh-token)))
(defn login-callback [code]
(go
(let [resp (<! (http/get (str "https://" config/API-DOMAIN "/auth_callback?code=" code)
{:with-credentials? false}))]
(if (= 200 (:status resp))
(-> resp
:body
(as-> $ (set-tokens! (:id_token $) (:access_token $) (:refresh_token $))))
(debug/pprint "login-callback" resp)))))
(defn logout []
(clear-tokens))
(defn refresh-id-token&access-token
(defn <refresh-id-token&access-token
"refresh id-token and access-token, if refresh_token expired, clear all tokens
return true if success, else false"
[]
(when-let [refresh-token (state/get-auth-refresh-token)]
(go
(go
(when-let [refresh-token (state/get-auth-refresh-token)]
(let [resp (<! (http/get (str "https://" config/API-DOMAIN "/auth_refresh_token?refresh_token=" refresh-token)
{:with-credentials? false}))]
(if (= 400 (:status resp))
@@ -113,6 +118,44 @@
(as-> $ (set-tokens! (:id_token $) (:access_token $))))
true))))))
(defn restore-tokens-from-localstorage
"restore id-token, access-token, refresh-token from localstorage,
and refresh id-token&access-token if necessary.
return nil when tokens are not available."
[]
(println "restore-tokens-from-localstorage")
(let [id-token (js/localStorage.getItem "id-token")
access-token (js/localStorage.getItem "access-token")
refresh-token (js/localStorage.getItem "refresh-token")]
(when refresh-token
(set-tokens! id-token access-token refresh-token)
(when-not (or (nil? id-token) (nil? access-token)
(-> id-token parse-jwt almost-expired?)
(-> access-token parse-jwt almost-expired?))
(go
;; id-token or access-token expired
(<! (<refresh-id-token&access-token))
;; refresh remote graph list by pub login event
(when (user-uuid) (state/pub-event! [:user/login])))))))
(defn login-callback [code]
(state/set-state! [:ui/loading? :login] true)
(go
(let [resp (<! (http/get (str "https://" config/API-DOMAIN "/auth_callback?code=" code)
{:with-credentials? false}))]
(if (= 200 (:status resp))
(-> resp
:body
(as-> $ (set-tokens! (:id_token $) (:access_token $) (:refresh_token $)))
(#(state/pub-event! [:user/login])))
(debug/pprint "login-callback" resp)))))
(defn logout []
(clear-tokens)
(state/pub-event! [:user/logout]))
;;; refresh tokens loop
(def stop-refresh false)
(defn refresh-tokens-loop []
@@ -124,6 +167,16 @@
(when (or (nil? id-token)
(-> id-token (parse-jwt) (almost-expired?)))
(debug/pprint (str "refresh tokens... " (tc/to-string(t/now))))
(refresh-id-token&access-token))))
(<! (<refresh-id-token&access-token)))))
(when-not stop-refresh
(recur))))
(defn alpha-user?
[]
(or config/dev?
(contains? (state/user-groups) "alpha-tester")))
(comment
(defn beta-user?
[]
(contains? (state/user-groups) "beta-tester")))