diff --git a/src/main/frontend/common/crypt.cljs b/src/main/frontend/common/crypt.cljs index bbc19ab460..935a4966de 100644 --- a/src/main/frontend/common/crypt.cljs +++ b/src/main/frontend/common/crypt.cljs @@ -53,6 +53,7 @@ (defn keys-state diff --git a/src/main/frontend/worker/rtc/crypt.cljs b/src/main/frontend/worker/rtc/crypt.cljs index 105a846f1f..18d3bec5b2 100644 --- a/src/main/frontend/worker/rtc/crypt.cljs +++ b/src/main/frontend/worker/rtc/crypt.cljs @@ -43,7 +43,8 @@ (defn task--upload-user-rsa-key-pair "Uploads the user's RSA key pair to the server." - [get-ws-create-task user-uuid public-key encrypted-private-key] + [get-ws-create-task user-uuid public-key encrypted-private-key & {:keys [force-reset] + :or {force-reset false}}] (m/sp (let [exported-public-key-str (ldb/write-transit-str (c.m/js key-pair))) - key-pair))))))))) + (clj->js + {:public-key public-key + :encrypted-private-key encrypted-private-key}))) + {:public-key (m/? (task--import-public-key public-key)) + :encrypted-private-key (ldb/read-transit-str encrypted-private-key)}))))))))) (defn task--fetch-graph-aes-key "Fetches the AES key for a graph, from indexeddb or server. @@ -93,9 +104,9 @@ (throw (ex-info (:ex-message response) (assoc (:ex-data response) :type :rtc.exception/fetch-graph-aes-key-error))) (let [{:keys [encrypted-aes-key]} response] - (when encrypted-aes-key - (let [aes-key (c.m/