From 0b26f16422310fca98cfe36945b904f5aff3ffaa Mon Sep 17 00:00:00 2001
From: Tienson Qin <tiensonqin@gmail.com>
Date: Mon, 11 May 2026 16:15:22 +0800
Subject: [PATCH] fix: can't export client ops db on web

---
 src/main/frontend/worker/db_core.cljs        |  3 +-
 src/test/frontend/worker/db_worker_test.cljs | 32 ++++++++++++++++++++
 2 files changed, 34 insertions(+), 1 deletion(-)

diff --git a/src/main/frontend/worker/db_core.cljs b/src/main/frontend/worker/db_core.cljs
index 587882b319..c2b9d54481 100644
--- a/src/main/frontend/worker/db_core.cljs
+++ b/src/main/frontend/worker/db_core.cljs
@@ -905,7 +905,8 @@
                       (str "/" client-ops-repo-path)
                       (str "client-ops" repo-path)
                       (str "/client-ops" repo-path)
-                      (str "client-ops-" repo-path)]]
+                      (str "client-ops-" repo-path)
+                      (str "/client-ops-" repo-path)]]
     (p/let [payload (<export-db-file-with-paths repo export-paths)]
       (when payload
         (worker-util/uint8array-to-base64string payload)))))
diff --git a/src/test/frontend/worker/db_worker_test.cljs b/src/test/frontend/worker/db_worker_test.cljs
index 8cd076d6d2..13d4d323af 100644
--- a/src/test/frontend/worker/db_worker_test.cljs
+++ b/src/test/frontend/worker/db_worker_test.cljs
@@ -678,6 +678,38 @@
                           (is false (str error))
                           (done))))))))))
 
+(deftest thread-api-export-client-ops-db-base64-supports-normalized-browser-client-ops-path-test
+  (async done
+    (restoring-worker-state
+     (fn []
+       (let [export-client-ops-db-base64 (@thread-api/*thread-apis :thread-api/export-client-ops-db-base64)
+             export-calls (atom [])
+             expected-data (js/Uint8Array. #js [4 5 6])
+             expected-buffer (.-buffer expected-data)
+             fake-pool #js {}
+             platform' (assoc-in (build-test-platform)
+                                 [:storage :export-file]
+                                 (fn [_pool path]
+                                   (swap! export-calls conj path)
+                                   (if (= "/client-ops-/db.sqlite" path)
+                                     (p/resolved expected-buffer)
+                                     (p/rejected (ex-info "missing path" {:path path})))))]
+         (platform/set-platform! platform')
+         (reset! worker-state/*opfs-pools {test-repo fake-pool})
+         (with-redefs [worker-state/get-sqlite-conn (fn [_repo which-db]
+                                                      (when (= :client-ops which-db)
+                                                        #js {:exec (fn [_sql] nil)}))]
+           (-> (export-client-ops-db-base64 test-repo)
+               (p/then (fn [result]
+                         (is (contains? (set @export-calls) "/client-ops-/db.sqlite"))
+                         (is (string? result))
+                         (is (= [4 5 6]
+                                (vec (js/Uint8Array. (.from js/Buffer result "base64")))))
+                         (done)))
+               (p/catch (fn [error]
+                          (is false (str error))
+                          (done))))))))))
+
 (deftest thread-api-db-core-registers-all-thread-apis-test
   (let [missing (->> expected-db-core-thread-apis
                      (remove #(contains? @thread-api/*thread-apis %))