Show schema version details on migrations failure

Simplifies debugging of migration failures, specifically in cases when
more than one migration is applied.

src/status_im/data_store/realm/core.cljs

@@ -133,15 +133,25 @@
   (when realm
     (.close realm)))
 
+(defonce schema-migration-log (atom {}))
+
+(defn migration-log [k v]
+  (swap! schema-migration-log assoc k v))
+
 (defn- migrate-schemas
   "Apply migrations in sequence and open database with the last schema"
   [file-name schemas encryption-key current-version]
+  (reset! schema-migration-log {})
+  (migration-log :initial-version current-version)
+  (migration-log :current-version current-version)
+  (migration-log :last-version (:schemaVersion (last schemas)))
   (log/info "migrate schemas" current-version)
   (when (pos? current-version)
     (doseq [schema schemas
-            :when (> (:schemaVersion schema) current-version)
-            :let [migrated-realm (open-realm schema file-name encryption-key)]]
-      (close migrated-realm)))
+            :when (> (:schemaVersion schema) current-version)]
+      (migration-log :current-version current-version)
+      (let [migrated-realm (open-realm schema file-name encryption-key)]
+        (close migrated-realm))))
   (open-realm (last schemas) file-name encryption-key))
 
 (defn keccak512-array [key]
@@ -258,7 +268,8 @@
          (on-success)
          (catch :default e
            (on-error {:message (str e)
-                      :error   :migrations-failed})))))))
+                      :error   :migrations-failed
+                      :details @schema-migration-log})))))))
 
 (declare realm-obj->clj)
 

src/status_im/init/core.cljs

@@ -108,7 +108,7 @@
 
 (fx/defn handle-change-account-error
   [{:keys [db]} error]
-  (let [{:keys [error message]}
+  (let [{:keys [error message details]}
         (if (map? error)
           error
           {:message (str error)})
@@ -120,8 +120,10 @@
        {:title               (i18n/label :migrations-failed-title)
         :content             (i18n/label
                               :migrations-failed-content
-                              {:message                         message
-                               :erase-accounts-data-button-text erase-button-text})
+                              (merge
+                               {:message                         message
+                                :erase-accounts-data-button-text erase-button-text}
+                               details))
         :confirm-button-text erase-button-text
         :on-cancel           #(re-frame/dispatch [:init.ui/data-reset-cancelled ""])
         :on-accept           #(re-frame/dispatch [:init.ui/account-data-reset-accepted address])}}

translations/en.json

@@ -790,6 +790,6 @@
     "to-see-this-message": "To see this message,",
     "install-the-extension": "install the extension",
     "migrations-failed-title": "Migration failed",
-    "migrations-failed-content": "{{message}}\n\nPlease let us know about this problem at #status public chat. If you press \"Cancel\" button, nothing will happen. If you press \"{{erase-accounts-data-button-text}}\" button, account's db will be removed and you will be able to unlock account. All account's data will be lost.",
+    "migrations-failed-content": "{{message}}\nschema version: initial {{initial-version}}, current {{current-version}}, last {{last-version}}\n\nPlease let us know about this problem at #status public chat. If you press \"Cancel\" button, nothing will happen. If you press \"{{erase-accounts-data-button-text}}\" button, account's db will be removed and you will be able to unlock account. All account's data will be lost.",
     "migrations-erase-accounts-data-button": "Erase account's db"
 }