[#19946] feat: integrate generate key pair export connection

modules/react-native-status/android/src/main/java/im/status/ethereum/module/NetworkManager.kt

@@ -75,4 +75,12 @@ class NetworkManager(private val reactContext: ReactApplicationContext) : ReactC
         utils.executeRunnableStatusGoMethod({ Statusgo.recover(rpcParams) }, callback)
     }
 
+    @ReactMethod
+    fun getConnectionStringForExportingKeypairsKeystores(configJSON: String, callback: Callback) {
+        val jsonConfig = JSONObject(configJSON)
+        utils.executeRunnableStatusGoMethod(
+                { Statusgo.getConnectionStringForExportingKeypairsKeystores(jsonConfig.toString()) },
+                callback)
+    }
+
 }

modules/react-native-status/ios/RCTStatus/NetworkManager.m

@@ -106,4 +106,16 @@ @implementation NetworkManager
     callback(@[result]);
 }
 
+RCT_EXPORT_METHOD(getConnectionStringForExportingKeypairsKeystores:(NSString *)configJSON
+        callback:(RCTResponseSenderBlock)callback) {
+
+    NSData *configData = [configJSON dataUsingEncoding:NSUTF8StringEncoding];
+    NSError *error;
+    NSMutableDictionary *configDict = [NSJSONSerialization JSONObjectWithData:configData options:NSJSONReadingMutableContainers error:&error];
+    NSString *modifiedConfigJSON = [Utils jsonStringWithPrettyPrint:NO fromDictionary:configDict];
+
+    NSString *result = StatusgoGetConnectionStringForExportingKeypairsKeystores(modifiedConfigJSON);
+    callback(@[result]);
+}
+
 @end

src/native_module/core.cljs

@@ -601,3 +601,11 @@
   (.createAccountFromMnemonicAndDeriveAccountsForPaths ^js (account-manager)
                                                        (types/clj->json mnemonic)
                                                        #(callback (types/json->clj %))))
+
+(defn get-connection-string-for-exporting-keypairs-keystores
+  "Generates connection string form status-go for the purpose of exporting keypairs and keystores on sender side"
+  [config-json callback]
+  (log/info "[native-module] Fetching Export Keypairs Connection String"
+            {:fn          :get-connection-string-for-exporting-keypairs-keystores
+             :config-json config-json})
+  (.getConnectionStringForExportingKeypairsKeystores ^js (network) config-json callback))

src/status_im/contexts/settings/wallet/events.cljs

@@ -1,8 +1,12 @@
 (ns status-im.contexts.settings.wallet.events
   (:require
+    [clojure.string :as string]
+    [native-module.core :as native-module]
+    [status-im.contexts.syncing.utils :as sync-utils]
     [taoensso.timbre :as log]
     [utils.i18n :as i18n]
-    [utils.re-frame :as rf]))
+    [utils.re-frame :as rf]
+    [utils.security.core :as security]))
 
 (rf/reg-event-fx
  :wallet/rename-keypair-success
@@ -30,3 +34,26 @@
            :on-error   #(log/info "failed to rename keypair " %)}]]]})
 
 (rf/reg-event-fx :wallet/rename-keypair rename-keypair)
+
+(defn key-pair-export-connection-string
+  [{:keys [db]} [{:keys [sha3-pwd keypair-key-uid callback]}]]
+  (let [error             (get-in db [:profile/login :error])
+        handle-connection (fn [response]
+                            (println response)
+                            (when (sync-utils/valid-connection-string? response)
+                              (callback response)
+                              (rf/dispatch [:hide-bottom-sheet])))]
+    (when-not (and error (string/blank? error))
+      (let [key-uid    (get-in db [:profile/profile :key-uid])
+            config-map (.stringify js/JSON
+                                   (clj->js {:senderConfig {:loggedInKeyUid key-uid
+                                                            :keystorePath (native-module/keystore-dir)
+                                                            :keypairsToExport [keypair-key-uid]
+                                                            :password (security/safe-unmask-data
+                                                                       sha3-pwd)}
+                                             :serverConfig {:timeout 0}}))]
+        (native-module/get-connection-string-for-exporting-keypairs-keystores
+         config-map
+         handle-connection)))))
+
+(rf/reg-event-fx :wallet/get-key-pair-export-connection key-pair-export-connection-string)

src/status_im/contexts/settings/wallet/keypairs_and_accounts/actions/view.cljs

@@ -13,15 +13,18 @@
 
 (defn view
   [props data]
-  [:<>
-   [quo/drawer-top props]
-   [quo/action-drawer
-    (when (= (:type props) :keypair)
-      [[{:icon                :i/qr-code
-         :accessibility-label :show-key-pr-qr
-         :label               (i18n/label :t/show-encrypted-qr-of-key-pairs)
-         :on-press            #(on-show-qr data)}]
-       [{:icon                :i/edit
-         :accessibility-label :rename-key-pair
-         :label               (i18n/label :t/rename-key-pair)
-         :on-press            #(on-rename-request data)}]])]])
+  (let [has-paired-device (rf/sub [:pairing/has-paired-devices])]
+    (println has-paired-device)
+    [:<>
+     [quo/drawer-top props]
+     [quo/action-drawer
+      [(when has-paired-device
+         [{:icon                :i/qr-code
+           :accessibility-label :show-key-pr-qr
+           :label               (i18n/label :t/show-encrypted-qr-of-key-pairs)
+           :on-press            #(on-show-qr data)}])
+       (when (= (:type props) :keypair)
+         [{:icon                :i/edit
+           :accessibility-label :rename-key-pair
+           :label               (i18n/label :t/rename-key-pair)
+           :on-press            #(on-rename-request data)}])]]]))

src/status_im/contexts/settings/wallet/keypairs_and_accounts/encrypted_qr/view.cljs

@@ -17,16 +17,21 @@
 
 (defn view
   []
-  (let [{:keys [customization-color]} (rf/sub [:profile/profile-with-image])
+  (let [{:keys [key-uid]}             (rf/sub [:get-screen-params])
+        {:keys [customization-color]} (rf/sub [:profile/profile-with-image])
         [code set-code]               (rn/use-state nil)
         validate-and-set-code         (rn/use-callback (fn [connection-string]
                                                          (when (sync-utils/valid-connection-string?
                                                                 connection-string)
                                                            (set-code connection-string))))
         cleanup-clock                 (rn/use-callback #(set-code nil))
-        on-auth-success               (fn [entered-password]
-                                        (rf/dispatch [:syncing/get-connection-string entered-password
-                                                      validate-and-set-code]))]
+        on-auth-success               (rn/use-callback (fn [entered-password]
+                                                         (rf/dispatch
+                                                          [:wallet/get-key-pair-export-connection
+                                                           {:sha3-pwd        entered-password
+                                                            :keypair-key-uid key-uid
+                                                            :callback        validate-and-set-code}]))
+                                                       [key-uid])]
     [rn/view {:style (style/container-main)}
      [rn/scroll-view
       [quo/page-nav

src/status_im/subs/pairing.cljs

@@ -28,3 +28,9 @@
  :<- [:syncing]
  (fn [syncing]
    (:pairing-status syncing)))
+
+(re-frame/reg-sub
+ :pairing/has-paired-devices
+ :<- [:pairing/enabled-installations]
+ (fn [installations]
+   (> (count installations) 1)))