e2e: community names update

https://github.com/status-im/status-go/compare/b744ff43...b710fa3e

.env.e2e

@@ -35,5 +35,3 @@ LOCAL_PAIRING_ENABLED=1
 FAST_CREATE_COMMUNITY_ENABLED=1
 TEST_NETWORKS_ENABLED=1
 SHOW_NOT_IMPLEMENTED_FEATURES=1
-DELETE_MESSAGE_FOR_ME_UNDO_TIME_LIMIT=10000
-DELETE_MESSAGE_UNDO_TIME_LIMIT=10000

ci/tests/Jenkinsfile.e2e-nightly

@@ -36,12 +36,6 @@ pipeline {
     ))
   }
 
-  environment {
-    /* Avoid race conditions with other builds using virtualenv. */
-    VIRTUAL_ENV = "${WORKSPACE_TMP}/venv"
-    PATH = "${VIRTUAL_ENV}/bin:${PATH}"
-  }
-
   stages {
     stage('Fetch') {
       steps { script {
@@ -58,8 +52,7 @@ pipeline {
     stage('Setup') {
       steps { script {
         dir('test/appium') {
-          sh "python3 -m venv ${VIRTUAL_ENV}"
-          sh 'pip3 install -r requirements.txt'
+          sh 'pip3 install --user -r requirements.txt'
         }
       } }
     }

ci/tests/Jenkinsfile.e2e-prs

@@ -54,12 +54,6 @@ pipeline {
     ))
   }
 
-  environment {
-    /* Avoid race conditions with other builds using virtualenv. */
-    VIRTUAL_ENV = "${WORKSPACE_TMP}/venv"
-    PATH = "${VIRTUAL_ENV}/bin:${PATH}"
-  }
-
   stages {
     stage('Prep') {
       steps { script {
@@ -85,8 +79,7 @@ pipeline {
     stage('Setup') {
       steps { script {
         dir('test/appium') {
-          sh "python3 -m venv ${VIRTUAL_ENV}"
-          sh 'pip3 install -r requirements.txt'
+          sh 'pip3 install --user -r requirements.txt'
         }
       } }
     }

ci/tests/Jenkinsfile.e2e-upgrade

@@ -35,11 +35,6 @@ pipeline {
     ))
   }
 
-  environment {
-    /* Avoid race conditions with other builds using virtualenv. */
-    VIRTUAL_ENV = "${WORKSPACE_TMP}/venv"
-    PATH = "${VIRTUAL_ENV}/bin:${PATH}"
-  }
 
   stages {
     stage('Prep') {
@@ -56,8 +51,7 @@ pipeline {
     stage('Setup') {
       steps { script {
         dir('test/appium') {
-          sh "python3 -m venv ${VIRTUAL_ENV}"
-          sh 'pip3 install -r requirements.txt'
+          sh 'pip3 install --user -r requirements.txt'
         }
       } }
     }

doc/troubleshooting.md

@@ -128,19 +128,3 @@ Status-mobile uses `shadow-cljs` for hot reloading changes and uses its own [rel
 
 ### Solution
 Open react native's [In-App Developer Menu](https://reactnative.dev/docs/debugging#accessing-the-in-app-developer-menu) and press "Disable Fast Refresh" or "Disable Hot Reloading"
-
-# App crashing after running `make run-ios`
-
-### Cause
-It's possible that installing XCode from a `.xip` file might cause XCode to act funny
-Since it's not installed from the App Store, Or you might be missing a Rosetta installation.
-
-[Reference/Similar issue](https://github.com/expo/expo-cli/issues/3197)
-
-You might see something like this after running `make run-ios`:
-```
-Underlying error (domain=FBSOpenApplicationServiceErrorDomain, code=1):
-```
-### Solution
-Run `softwareupdate --install-rosetta --agree-to-license`
-to accept XCode's license and install Rosetta.

nix/overlay.nix

@@ -60,30 +60,26 @@ in {
     version = "15.0";
     allowHigher = true;
   };
-  go = super.go_1_20;
+  go = super.go_1_19;
   clang = super.clang_15;
-  buildGoPackage = super.buildGo120Package;
-  buildGoModule = super.buildGo120Module;
-
-  gomobile = super.gomobile.override {
-      # FIXME: No Android SDK packages for aarch64-darwin.
-      withAndroidPkgs = stdenv.system != "aarch64-darwin";
-      androidPkgs = self.androidEnvCustom.compose;
-      buildGoModule = args: super.buildGo120Module ( args // rec {
-        CGO_ENABLED=1;
-        GODEBUG="netdns=cgo";
-        patches = [
-          (self.fetchurl { # https://github.com/golang/mobile/pull/84
-            url = "https://github.com/golang/mobile/commit/f20e966e05b8f7e06bed500fa0da81cf6ebca307.patch";
-            sha256 = "sha256-TZ/Yhe8gMRQUZFAs9G5/cf2b9QGtTHRSObBFD5Pbh7Y=";
-          })
-          (self.fetchurl { # https://github.com/golang/go/issues/58426
-            url = "https://github.com/golang/mobile/commit/406ed3a7b8e44dc32844953647b49696d8847d51.patch";
-            sha256 = "sha256-dqbYukHkQEw8npOkKykOAzMC3ot/Y4DEuh7fE+ptlr8=";
-          })
-        ];
-      });
-    };
+  buildGoPackage = super.buildGo119Package;
+  buildGoModule = super.buildGo119Module;
+  gomobile = (super.gomobile.overrideAttrs (old: {
+    patches = [
+      (self.fetchurl { # https://github.com/golang/mobile/pull/84
+        url = "https://github.com/golang/mobile/commit/f20e966e05b8f7e06bed500fa0da81cf6ebca307.patch";
+        sha256 = "sha256-TZ/Yhe8gMRQUZFAs9G5/cf2b9QGtTHRSObBFD5Pbh7Y=";
+      })
+      (self.fetchurl { # https://github.com/golang/go/issues/58426
+        url = "https://github.com/golang/mobile/commit/406ed3a7b8e44dc32844953647b49696d8847d51.patch";
+        sha256 = "sha256-dqbYukHkQEw8npOkKykOAzMC3ot/Y4DEuh7fE+ptlr8=";
+      })
+    ];
+  })).override {
+    # FIXME: No Android SDK packages for aarch64-darwin.
+    withAndroidPkgs = stdenv.system != "aarch64-darwin";
+    androidPkgs = self.androidEnvCustom.compose;
+  };
 
   # Android environement
   androidEnvCustom = callPackage ./pkgs/android-sdk { };

nix/status-go/mobile/build.nix

@@ -35,8 +35,6 @@ in buildGoPackage {
 
   ANDROID_HOME = optionalString isAndroid androidPkgs.sdk;
 
-  CGO_ENABLED=1;
-
   # Ensure XCode is present for iOS, instead of failing at the end of the build.
   preConfigure = optionalString isIOS enforceXCodeAvailable;
 

package.json

@@ -94,6 +94,7 @@
     "prettier": "^2.8.8",
     "process": "0.11.10",
     "react-test-renderer": "18.1.0",
+    "rn-snoopy": "git+https://github.com/status-im/rn-snoopy.git#refs/tags/v2.0.2-status",
     "shadow-cljs": "2.26.2"
   },
   "binary": {

src/legacy/status_im/communities/core.cljs

@@ -4,7 +4,6 @@
     [legacy.status-im.bottom-sheet.events :as bottom-sheet]
     legacy.status-im.communities.e2e
     [re-frame.core :as re-frame]
-    [status-im.contexts.shell.activity-center.events :as activity-center]
     [status-im.navigation.events :as navigation]
     [taoensso.timbre :as log]
     [utils.re-frame :as rf]))
@@ -23,10 +22,60 @@
           {}
           requests))
 
+(defn- fetch-community-id-input
+  [{:keys [db]}]
+  (:communities/community-id-input db))
+
 (rf/defn handle-response
   [_ response-js]
   {:dispatch [:sanitize-messages-and-process-response response-js]})
 
+(rf/defn invite-users
+  {:events [::invite-people-confirmation-pressed]}
+  [cofx user-pk contacts]
+  (let [community-id (fetch-community-id-input cofx)
+        pks          (if (seq user-pk)
+                       (conj contacts user-pk)
+                       contacts)]
+    (when (seq pks)
+      {:json-rpc/call [{:method      "wakuext_inviteUsersToCommunity"
+                        :params      [{:communityId community-id
+                                       :users       pks}]
+                        :js-response true
+                        :on-success  #(re-frame/dispatch [::people-invited %])
+                        :on-error    #(do
+                                        (log/error "failed to invite-user community" %)
+                                        (re-frame/dispatch [::failed-to-invite-people %]))}]})))
+
+(rf/defn share-community
+  {:events [::share-community-confirmation-pressed]}
+  [cofx user-pk contacts]
+  (let [community-id (fetch-community-id-input cofx)
+        pks          (if (seq user-pk)
+                       (conj contacts user-pk)
+                       contacts)]
+    (when (seq pks)
+      {:json-rpc/call [{:method      "wakuext_shareCommunity"
+                        :params      [{:communityId community-id
+                                       :users       pks}]
+                        :js-response true
+                        :on-success  #(re-frame/dispatch [::people-invited %])
+                        :on-error    #(do
+                                        (log/error "failed to invite-user community" %)
+                                        (re-frame/dispatch [::failed-to-share-community %]))}]})))
+
+(re-frame/reg-event-fx :communities/invite-people-pressed
+ (fn [{:keys [db]} [id]]
+   {:db (assoc db :communities/community-id-input id)
+    :fx [[:dispatch [:hide-bottom-sheet]]
+         [:dispatch [:open-modal :legacy-invite-people-community {:invite? true}]]]}))
+
+(re-frame/reg-event-fx :communities/share-community-pressed
+ (fn [{:keys [db]} [id]]
+   {:db (assoc db :communities/community-id-input id)
+    :fx [[:dispatch [:hide-bottom-sheet]]
+         [:dispatch [:open-modal :legacy-invite-people-community {}]]]}))
+
 (rf/defn people-invited
   {:events [::people-invited]}
   [cofx response-js]
@@ -41,14 +90,6 @@
          [:sanitize-messages-and-process-response response-js]
          [:activity-center.notifications/fetch-unread-count]]}))
 
-(rf/defn member-banned
-  {:events [::member-banned]}
-  [cofx response-js]
-  (rf/merge cofx
-            (bottom-sheet/hide-bottom-sheet-old)
-            (handle-response response-js)
-            (activity-center/notifications-fetch-unread-count)))
-
 (rf/defn member-ban
   {:events [::member-ban]}
   [cofx community-id public-key]

src/legacy/status_im/communities/e2e.cljs

@@ -1,35 +1,257 @@
 (ns legacy.status-im.communities.e2e
-  (:require [taoensso.timbre :as log]
+  (:require [promesa.core :as promesa]
+            [status-im.common.json-rpc.events :as rpc]
+            [status-im.constants :as constants]
+            [taoensso.timbre :as log]
             [utils.re-frame :as rf]))
 
 ;;NOTE: ONLY FOR QA
 
-(rf/defn create-closed-community
-  {:events [:fast-create-community/create-closed-community]}
-  [_]
-  {:json-rpc/call [{:method      "wakuext_createClosedCommunity"
-                    :params      []
-                    :js-response true
-                    :on-success  #(rf/dispatch [:sanitize-messages-and-process-response %])
-                    :on-error    #(log/error "failed to create closed community." {:error %})}]
-   :dispatch      [:hide-bottom-sheet]})
+(def one-stt-in-wei "1000000000000000000")
+(def one-eth-in-wei "1000000000000000000")
+(def ten-stt-in-wei "10000000000000000000")
+
+(def stt-symbol "STT")
+(def eth-symbol "ETH")
+(def null-address "0x0000000000000000000000000000000000000000")
+
+(defn- eth-token-criteria
+  [amount-in-wei]
+  {:contractAddresses {constants/ethereum-sepolia-chain-id null-address
+                       constants/arbitrum-sepolia-chain-id null-address
+                       constants/optimism-sepolia-chain-id null-address}
+   :type              constants/community-token-type-erc20
+   :symbol            "ETH"
+   :name              "Ethereum"
+   :amountInWei       amount-in-wei
+   :decimals          18})
+
+(defn- stt-token-criteria
+  [amount-in-wei]
+  {:contractAddresses {constants/ethereum-sepolia-chain-id constants/sepolia-stt-contract-address}
+   :type              constants/community-token-type-erc20
+   :symbol            "STT"
+   :name              "Status Test Token"
+   :amountInWei       amount-in-wei
+   :decimals          18})
+
+(def token-criteria
+  {stt-symbol stt-token-criteria
+   eth-symbol eth-token-criteria})
+
+(def base-channel-permissions
+  [{:permission-type constants/community-token-permission-can-view-channel
+    :token-symbol    stt-symbol
+    :amount          one-stt-in-wei}
+   {:permission-type constants/community-token-permission-can-view-channel
+    :token-symbol    eth-symbol
+    :amount          one-eth-in-wei}
+   {:permission-type constants/community-token-permission-can-view-and-post-channel
+    :token-symbol    stt-symbol
+    :amount          one-stt-in-wei}
+   {:permission-type constants/community-token-permission-can-view-and-post-channel
+    :token-symbol    eth-symbol
+    :amount          one-eth-in-wei}])
+
+(defn- channel-names->description
+  [channel-names]
+  (map #(hash-map :name        %1
+                  :permissions [%2])
+       channel-names
+       base-channel-permissions))
+
+(def community-descriptions
+  {:open
+   {:community-name      "Open community"
+    :membership          constants/community-permissions-auto-accept
+    :pin-message-allowed false}
+   :closed
+   {:community-name      "Closed community"
+    :membership          constants/community-permissions-manual-accept
+    :pin-message-allowed true
+    :categories          [{:category-name "Pets" :channels #{"Cats" "Dogs"}}
+                          {:category-name "Household" :channels #{"Rules"}}]
+    :channel-list        [{:name "Cats"} {:name "Dogs"} {:name "Rules"}]}
+   :token-gated
+   {:community-name        "Token gated community"
+    :membership            constants/community-permissions-auto-accept
+    :pin-message-allowed   true
+    :community-permissions [{:amount-in-wei   ten-stt-in-wei
+                             :permission-type constants/community-token-permission-become-member
+                             :token-symbol    stt-symbol}]
+    :channel-list          (channel-names->description ["Lions" "Birds" "Trees" "Flowers"])}
+   :snt-admin
+   {:community-name        "SNT Admin Community"
+    :membership            constants/community-permissions-auto-accept
+    :pin-message-allowed   true
+    :community-permissions [{:amount-in-wei   one-stt-in-wei
+                             :permission-type constants/community-token-permission-become-admin
+                             :token-symbol    stt-symbol}]
+    :channel-list          (channel-names->description ["Sounds" "Colors" "Books" "Sports"])}
+   :admin-and-member
+   {:community-name        "Admin and Member"
+    :membership            constants/community-permissions-auto-accept
+    :pin-message-allowed   true
+    :community-permissions [{:amount-in-wei   one-stt-in-wei
+                             :permission-type constants/community-token-permission-become-member
+                             :token-symbol    stt-symbol}
+                            {:amount-in-wei   one-eth-in-wei
+                             :permission-type constants/community-token-permission-become-admin
+                             :token-symbol    eth-symbol}]
+    :channel-list          (channel-names->description ["Party" "Birthday" "Travel" "Cars"])}})
+
+
+(defn- js-messenger-response->community-id
+  [response]
+  (-> response .-communities first .-id))
+
+(defn- js-messenger-response->channel-id
+  [channel-name response]
+  (->> response
+       .-communities
+       first
+       .-chats
+       js->clj
+       vals
+       (some #(when (= channel-name (get % "name")) (get % "id")))))
+
+(defn- channel-token-criteria->request
+  [community-id channel-id {:keys [token-symbol amount]}]
+  (fn []
+    (rpc/call
+     {:method      "wakuext_createCommunityTokenPermissionV2"
+      :js-response true
+      :params      [{:communityID   community-id
+                     :type          constants/community-token-permission-become-member
+                     :chatIds       [channel-id]
+                     :tokenCriteria [((token-criteria token-symbol) amount)]}]})))
+
+(defn- channel-token-criteria->requests
+  [community-id channel-id tokens]
+  (let [keep-fn (partial channel-token-criteria->request community-id channel-id)]
+    (keep keep-fn tokens)))
+
+(defn- create-community-channel!
+  [channel community-id]
+  (->
+    (rpc/call
+     {:method      "wakuext_createCommunityChannel"
+      :js-response true
+      :params      [{:name        (:name channel)
+                     :communityId community-id
+                     :description (:name channel)}]})
+    (.then (fn [response]
+             (if (:permissions channel)
+               (let [channel-id (js-messenger-response->channel-id (:name channel) response)]
+                 (apply
+                  promesa/chain
+                  (promesa/resolved nil)
+                  (channel-token-criteria->requests community-id channel-id (:permissions channel))))
+               response)))
+    (.catch #(log/error "failed to create token gated community channel."
+                        {:error        %
+                         :channel-name (:name channel)}))))
+
+(defn- create-category!
+  [response {:keys [category-name channels]}]
+  (let [community-id (js-messenger-response->community-id response)
+        channel-ids  (map #(js-messenger-response->channel-id % response)
+                          channels)]
+    (rpc/call
+     {:method      "wakuext_createCommunityCategory"
+      :js-response true
+      :params      [{:communityId  community-id
+                     :categoryName category-name
+                     :chatIds      channel-ids}]})))
+
+(defn- create-community!
+  [community-name membership pin-message-allowed]
+  (rpc/call
+   {:method      "wakuext_createCommunity"
+    :js-response true
+    :params      [{:name                         community-name
+                   :description                  community-name
+                   :color                        "#887af9"
+                   :historyArchiveSupportEnabled true
+                   :membership                   membership
+                   :pinMessageAllMembersEnabled  pin-message-allowed}]}))
+
+(defn- create-token-gated-permission!
+  [{:keys [token-symbol permission-type amount-in-wei]} community-id]
+  (rpc/call
+   {:method      "wakuext_createCommunityTokenPermissionV2"
+    :js-response true
+    :params      [{:communityId   community-id
+                   :type          permission-type
+                   :tokenCriteria [((token-criteria token-symbol) amount-in-wei)]}]}))
+
+(def passthrough [identity])
+
+(defn- create-community-from-description
+  [{:keys [community-name
+           membership
+           community-permissions
+           pin-message-allowed
+           categories
+           channel-list]}]
+  (let [create-community-permissions-fn (if (seq community-permissions)
+                                          (map
+                                           (fn [permission]
+                                             (fn [response]
+                                               (create-token-gated-permission!
+                                                permission
+                                                (js-messenger-response->community-id response))))
+                                           community-permissions)
+                                          passthrough)
+        create-channels-fn              (if (seq channel-list)
+                                          (map
+                                           (fn [channel]
+                                             (fn [response]
+                                               (create-community-channel!
+                                                channel
+                                                (js-messenger-response->community-id response))))
+                                           channel-list)
+                                          passthrough)
+        create-categories-fn            (if (seq categories)
+                                          (map
+                                           (fn [category]
+                                             (fn [messenger-response]
+                                               (create-category! messenger-response category)))
+                                           categories)
+                                          passthrough)]
+    (as-> (create-community! community-name membership pin-message-allowed) $
+      (apply promesa/chain $ create-community-permissions-fn)
+      (apply promesa/chain $ create-channels-fn)
+      (apply promesa/chain $ create-categories-fn)
+      (promesa/then $ #(rf/dispatch [:hide-bottom-sheet]))
+      (promesa/catch $ #(log/error "failed to create community e2e" {:error %})))))
 
 (rf/defn create-open-community
-  {:events [:fast-create-community/create-open-community]}
+  {:events [:e2e/create-open-community]}
   [_]
-  {:json-rpc/call [{:method      "wakuext_createOpenCommunity"
-                    :params      []
-                    :js-response true
-                    :on-success  #(rf/dispatch [:sanitize-messages-and-process-response %])
-                    :on-error    #(log/error "failed to create open community." {:error %})}]
-   :dispatch      [:hide-bottom-sheet]})
+  (create-community-from-description (community-descriptions :open))
+  nil)
+
+(rf/defn create-closed-community
+  {:events [:e2e/create-closed-community]}
+  [_]
+  (create-community-from-description (community-descriptions :closed))
+  nil)
 
 (rf/defn create-token-gated-community
-  {:events [:fast-create-community/create-token-gated-community]}
+  {:events [:e2e/create-token-gated-community]}
   [_]
-  {:json-rpc/call [{:method      "wakuext_createTokenGatedCommunity"
-                    :params      []
-                    :js-response true
-                    :on-success  #(rf/dispatch [:sanitize-messages-and-process-response %])
-                    :on-error    #(log/error "failed to create token gated community." {:error %})}]
-   :dispatch      [:hide-bottom-sheet]})
+  (create-community-from-description (community-descriptions :token-gated))
+  nil)
+
+(rf/defn snt-admin-community
+  {:events [:e2e/create-snt-admin-community]}
+  [_]
+  (create-community-from-description (community-descriptions :snt-admin))
+  nil)
+
+(rf/defn admin-and-member-community
+  {:events [:e2e/create-admin-and-member-community]}
+  [_]
+  (create-community-from-description (community-descriptions :admin-and-member))
+  nil)

src/legacy/status_im/ui/screens/browser/views.cljs

@@ -2,6 +2,7 @@
   (:require
     [legacy.status-im.browser.core :as browser]
     [legacy.status-im.browser.webview-ref :as webview-ref]
+    [legacy.status-im.qr-scanner.core :as qr-scanner]
     [legacy.status-im.ui.components.chat-icon.screen :as chat-icon]
     [legacy.status-im.ui.components.colors :as colors]
     [legacy.status-im.ui.components.connectivity.view :as connectivity]
@@ -104,7 +105,9 @@
      (if empty-tab
        [react/touchable-highlight
         {:accessibility-label :universal-qr-scanner
-         :on-press            #(re-frame/dispatch [:open-modal :shell-qr-reader])}
+         :on-press            #(re-frame/dispatch
+                                [::qr-scanner/scan-code
+                                 {:handler ::qr-scanner/on-scan-success}])}
         [icons/icon :main-icons/qr {:color colors/black}]]
        [react/touchable-highlight
         {:on-press            #(re-frame/dispatch

src/legacy/status_im/ui/screens/communities/invite.cljs

@@ -1,15 +1,16 @@
 (ns legacy.status-im.ui.screens.communities.invite
   (:require
     [clojure.string :as string]
+    [legacy.status-im.communities.core :as communities]
     [legacy.status-im.ui.components.chat-icon.screen :as chat-icon.screen]
     [legacy.status-im.ui.components.core :as quo]
     [legacy.status-im.ui.components.list.item :as list.item]
     [legacy.status-im.ui.components.toolbar :as toolbar]
     [legacy.status-im.ui.components.topbar :as topbar]
-    [quo.theme]
     [react-native.core :as rn]
     [reagent.core :as reagent]
     [status-im.constants :as constants]
+    [utils.debounce :as debounce]
     [utils.i18n :as i18n]
     [utils.re-frame :as rf]))
 
@@ -48,35 +49,18 @@
         contacts-selected (reagent/atom #{})
         {:keys [invite?]} (rf/sub [:get-screen-params])]
     (fn []
-      (let [theme (quo.theme/use-theme)
-            contacts-data (rf/sub [:contacts/active])
-            {community-id :id
-             :keys        [permissions
-                           can-manage-users?]}
+      (let [contacts-data (rf/sub [:contacts/active])
+            {:keys [permissions
+                    can-manage-users?]}
             (rf/sub [:communities/edited-community])
             selected @contacts-selected
-            selected-contacts-count (count selected)
             contacts (map (fn [{:keys [public-key] :as contact}]
                             (assoc contact :active (contains? selected public-key)))
                           contacts-data)
             ;; no-membership communities can only be shared
             can-invite? (and can-manage-users?
                              invite?
-                             (not= (:access permissions) constants/community-no-membership-access))
-            on-press-share-community (rn/use-callback
-                                      (fn []
-                                        (rf/dispatch [:communities/share-community-confirmation-pressed
-                                                      selected community-id])
-                                        (rf/dispatch [:navigate-back])
-                                        (rf/dispatch [:toasts/upsert
-                                                      {:type  :positive
-                                                       :theme theme
-                                                       :text  (if (= 1 selected-contacts-count)
-                                                                (i18n/label :t/one-user-was-invited)
-                                                                (i18n/label
-                                                                 :t/n-users-were-invited
-                                                                 {:count selected-contacts-count}))}]))
-                                      [community-id selected selected-contacts-count theme])]
+                             (not= (:access permissions) constants/community-no-membership-access))]
         [:<>
          [topbar/topbar
           {:title  (i18n/label (if can-invite?
@@ -97,8 +81,11 @@
            :center
            [quo/button
             {:disabled            (and (string/blank? @user-pk)
-                                       (zero? selected-contacts-count))
+                                       (zero? (count selected)))
              :accessibility-label :share-community-link
              :type                :secondary
-             :on-press            on-press-share-community}
+             :on-press            #(debounce/throttle-and-dispatch
+                                    [::communities/share-community-confirmation-pressed @user-pk
+                                     selected]
+                                    3000)}
             (i18n/label (if can-invite? :t/invite :t/share))]}]]))))

src/quo/components/avatars/group_avatar/style.cljs

@@ -13,11 +13,3 @@
    :background-color (colors/theme-colors (colors/custom-color customization-color 50)
                                           (colors/custom-color customization-color 60)
                                           theme)})
-
-(defn avatar-identifier
-  [theme]
-  {:text-align :center
-   :font-size  36
-   :color      (colors/theme-colors colors/black
-                                    colors/white
-                                    theme)})

src/quo/components/avatars/group_avatar/view.cljs

@@ -1,9 +1,7 @@
 (ns quo.components.avatars.group-avatar.view
   (:require
-    [clojure.string :as string]
     [quo.components.avatars.group-avatar.style :as style]
     [quo.components.icon :as icon]
-    [quo.components.markdown.text :as text]
     [quo.foundations.colors :as colors]
     [quo.theme :as quo.theme]
     [react-native.core :as rn]
@@ -23,7 +21,7 @@
 
 (defn- view-internal
   [_]
-  (fn [{:keys [size theme customization-color picture icon-name emoji chat-name]
+  (fn [{:keys [size theme customization-color picture icon-name]
         :or   {size                :size-20
                customization-color :blue
                picture             nil
@@ -40,27 +38,8 @@
           {:source picture
            :style  {:width  container-size
                     :height container-size}}]
-         (cond
-           emoji
-           (if (= size :size-80)
-             [rn/text
-              {:style (style/avatar-identifier theme)}
-              emoji]
-             [text/text
-              {:size  :paragraph-1
-               :style (dissoc (style/avatar-identifier theme) :font-size)}
-              emoji])
-           chat-name
-           (if (= size :size-80)
-             [rn/text
-              {:style (style/avatar-identifier theme)}
-              ((comp first string/upper-case) chat-name)]
-             [text/text
-              {:size :paragraph-1}
-              ((comp first string/upper-case) chat-name)])
-           :else
-           [icon/icon icon-name
-            {:size  icon-size
-             :color colors/white-opa-70}]))])))
+         [icon/icon icon-name
+          {:size  icon-size
+           :color colors/white-opa-70}])])))
 
 (def view (quo.theme/with-theme view-internal))

src/quo/components/community/community_detail_token_gating/component_spec.cljs

@@ -1,71 +0,0 @@
-(ns quo.components.community.community-detail-token-gating.component-spec
-  (:require
-    [quo.core :as quo]
-    [test-helpers.component :as h]))
-
-(h/describe "Community Detail Token Gating Component"
-  (h/test "render with member permissions"
-    (h/render
-     [quo/community-detail-token-gating
-      {:permissions [{:role       2
-                      :role-text  "Member"
-                      :satisfied? true
-                      :tokens     [[{:symbol       "ETH"
-                                     :sufficient?  true
-                                     :collectible? false
-                                     :amount       0.8
-                                     :img-src      nil}]
-                                   [{:symbol       "ETH"
-                                     :sufficient?  false
-                                     :collectible? false
-                                     :amount       1
-                                     :img-src      nil}
-                                    {:symbol       "STT"
-                                     :sufficient?  false
-                                     :collectible? false
-                                     :amount       10
-                                     :img-src      nil}]]}]}])
-    (h/is-truthy (h/get-by-translation-text :t/you-eligible-to-join-as {:role "Member"}))
-    (h/is-truthy (h/get-by-text "0.8 ETH"))
-    (h/is-truthy (h/get-by-text "1 ETH"))
-    (h/is-truthy (h/get-by-text "10 STT")))
-
-  (h/test "render with admin permissions"
-    (h/render
-     [quo/community-detail-token-gating
-      {:permissions [{:role       1
-                      :role-text  "Admin"
-                      :satisfied? true
-                      :tokens     [[{:symbol       "ETH"
-                                     :sufficient?  true
-                                     :collectible? false
-                                     :amount       2
-                                     :img-src      nil}]]}]}])
-    (h/is-truthy (h/get-by-translation-text :t/you-eligible-to-join-as {:role "Admin"}))
-    (h/is-truthy (h/get-by-text "2 ETH")))
-
-  (h/test "render with token master permissions"
-    (h/render-with-theme-provider
-     [quo/community-detail-token-gating
-      {:permissions [{:role       5
-                      :role-text  "Token Master"
-                      :satisfied? true
-                      :tokens     [[{:symbol       "TMANI "
-                                     :sufficient?  true
-                                     :collectible? true
-                                     :img-src      {:uri "mock-image"}}]]}]}])
-    (h/is-truthy (h/get-by-translation-text :t/you-eligible-to-join-as {:role "Token Master"}))
-    (h/is-truthy (h/get-by-text "TMANI")))
-
-  (h/test "render with token owner permissions"
-    (h/render-with-theme-provider
-     [quo/community-detail-token-gating
-      {:permissions [{:role       6
-                      :role-text  "Token Owner"
-                      :satisfied? true
-                      :tokens     [[{:symbol       "TOANI"
-                                     :sufficient?  true
-                                     :collectible? true
-                                     :img-src      {:uri "mock-image"}}]]}]}])
-    (h/is-truthy (h/get-by-translation-text :t/you-eligible-to-join-as {:role "Token Owner"}))
-    (h/is-truthy (h/get-by-text "TOANI"))))

src/quo/components/community/community_detail_token_gating/style.cljs

@@ -1,20 +0,0 @@
-(ns quo.components.community.community-detail-token-gating.style)
-
-(def container
-  {:padding-horizontal 20
-   :margin-vertical    -4})
-
-(defn token-row
-  [first?]
-  {:flex-direction :row
-   :margin-top     (if first? 8 4)
-   :row-gap        10
-   :column-gap     8
-   :flex-wrap      :wrap
-   :margin-bottom  16})
-
-(def divider
-  {:padding-left 0
-   :height       28
-   :padding-top  0
-   :align-items  :flex-start})

src/quo/components/community/community_detail_token_gating/view.cljs

@@ -1,74 +0,0 @@
-(ns quo.components.community.community-detail-token-gating.view
-  (:require [clojure.string :as string]
-            [quo.components.community.community-detail-token-gating.style :as style]
-            [quo.components.dividers.divider-label.view :as divider-label]
-            [quo.components.markdown.text :as text]
-            [quo.components.tags.collectible-tag.view :as collectible-tag]
-            [quo.components.tags.token-tag.view :as token-tag]
-            [quo.foundations.colors :as colors]
-            [react-native.core :as rn]
-            [utils.i18n :as i18n]))
-
-(defn- token-view
-  [{:keys [collectible? img-src amount sufficient?] :as token}]
-  (let [token-symbol (:symbol token)]
-    (if collectible?
-      [collectible-tag/view
-       {:collectible-name    token-symbol
-        :size                :size-24
-        :collectible-img-src img-src
-        :options             (when sufficient?
-                               :hold)}]
-      [token-tag/view
-       {:token-symbol  token-symbol
-        :size          :size-24
-        :token-value   amount
-        :token-img-src img-src
-        :options       (when sufficient? :hold)}])))
-
-(defn- tokens-row
-  [{:keys [tokens divider? first?]}]
-  [:<>
-   [rn/view
-    {:style (style/token-row first?)}
-    (map-indexed (fn [token-index token]
-                   ^{:key (str "token-" token-index)}
-                   [token-view token])
-                 tokens)]
-   (when-not divider?
-     [divider-label/view
-      {:container-style style/divider}
-      [text/text
-       {:size  :label
-        :style {:color (colors/theme-colors colors/neutral-50 colors/neutral-40)}}
-       (string/lower-case (i18n/label :t/or))]])])
-
-(defn- role-view
-  [{:keys [role tokens satisfied? role-text]}]
-  (when (seq tokens)
-    ^{:key (str "role-" role)}
-    [:<>
-     [text/text
-      {:size   :paragraph-1
-       :weight :medium
-       :style  {:margin-top 4}}
-      (if satisfied?
-        (i18n/label :t/you-eligible-to-join-as {:role role-text})
-        (i18n/label :t/you-not-eligible-to-join-as {:role role-text}))]
-     [text/text
-      {:size  :paragraph-2
-       :style {:margin-bottom 8}}
-      (i18n/label (if satisfied? :t/you-hodl :t/you-must-hold))]
-
-     (map-indexed (fn [index tokens-item]
-                    ^{:key (str role "-tokens-" index)}
-                    [tokens-row
-                     {:tokens   tokens-item
-                      :first?   (zero? index)
-                      :divider? (= index (dec (count tokens)))}])
-                  tokens)]))
-
-(defn view
-  [{:keys [permissions]}]
-  [rn/view {:style style/container}
-   (map role-view permissions)])

src/quo/components/community/style.cljs

@@ -102,7 +102,7 @@
    :right    8})
 
 (def token-tag-spacing
-  {:padding-top  10
+  {:margin-top   10
    :margin-right 8})
 
 (defn token-row
@@ -117,12 +117,11 @@
 (defn token-row-or-text
   [padding? theme]
   (merge
-   {:padding-top   4
-    :margin-bottom -2
-    :color         (colors/theme-colors
-                    colors/neutral-50
-                    colors/neutral-40
-                    theme)}
+   {:margin-top 4
+    :color      (colors/theme-colors
+                 colors/neutral-50
+                 colors/neutral-40
+                 theme)}
    (when padding?
      {:padding-left 12})))
 

src/quo/components/empty_state/empty_state/styles.cljs

@@ -7,14 +7,8 @@
    :align-items :center})
 
 (def image
-  {:width  72
-   :height 72})
-
-(def image-container
-  {:width           80
-   :height          80
-   :align-items     :center
-   :justify-content :center})
+  {:width  80
+   :height 80})
 
 (def text-container
   {:margin-top  12

src/quo/components/empty_state/empty_state/view.cljs

@@ -15,10 +15,9 @@
   [rn/view {:style (merge styles/container container-style)}
    (if placeholder?
      [rn/view {:style styles/image-placeholder}]
-     [rn/view {:style styles/image-container}
-      [fast-image/fast-image
-       {:style  styles/image
-        :source image}]])
+     [fast-image/fast-image
+      {:style  styles/image
+       :source image}])
    [rn/view {:style styles/text-container}
     [text/text
      {:style           (styles/title blur?)

src/quo/components/inputs/input/style.cljs

@@ -1,8 +1,7 @@
 (ns quo.components.inputs.input.style
   (:require
     [quo.components.markdown.text :as text]
-    [quo.foundations.colors :as colors]
-    [react-native.platform :as platform]))
+    [quo.foundations.colors :as colors]))
 
 (defn variants-colors
   [blur? theme]
@@ -98,12 +97,9 @@
       (assoc base-props
              :text-align-vertical :top
              :line-height         22)
-      (cond-> base-props
-        :always
-        (assoc :height      (if small? 30 38)
-               :line-height nil)
-        platform/ios?
-        (assoc :padding-top (+ padding 2))))))
+      (assoc base-props
+             :height      (if small? 30 38)
+             :line-height nil))))
 
 (defn right-icon-touchable-area
   [small?]

src/quo/components/list_items/user.cljs

@@ -41,24 +41,21 @@
 (defn user
   [{:keys [short-chat-key primary-name secondary-name photo-path online? contact? verified?
            untrustworthy? on-press on-long-press accessory customization-color theme
-           allow-multiple-presses? disabled?]}]
+           allow-multiple-presses?]}]
   [rn/touchable-highlight
    {:style                   container-style
     :underlay-color          (colors/resolve-color customization-color theme 5)
     :allow-multiple-presses? allow-multiple-presses?
     :accessibility-label     :user-list
     :on-press                (when on-press on-press)
-    :on-long-press           (when on-long-press on-long-press)
-    :disabled                disabled?}
+    :on-long-press           (when on-long-press on-long-press)}
    [:<>
     [user-avatar/user-avatar
      {:full-name       primary-name
       :profile-picture photo-path
       :online?         online?
       :size            :small}]
-    [rn/view
-     {:style {:margin-horizontal 8
-              :flex              1}}
+    [rn/view {:style {:margin-horizontal 8 :flex 1}}
      [author/view
       {:primary-name   primary-name
        :secondary-name secondary-name
@@ -72,4 +69,4 @@
          :style {:color (colors/theme-colors colors/neutral-50 colors/neutral-40)}}
         short-chat-key])]
     (when accessory
-      [action-icon accessory customization-color disabled? theme])]])
+      [action-icon accessory customization-color theme])]])

src/quo/components/tags/collectible_tag/schema.cljs

@@ -10,5 +10,5 @@
       [:blur? {:optional true} [:maybe :boolean]]
       [:collectible-img-src :schema.common/image-source]
       [:collectible-name :string]
-      [:collectible-id {:optional true} [:maybe :string]]]]]
+      [:collectible-id :string]]]]
    :any])

src/quo/components/tags/collectible_tag/view.cljs

@@ -41,13 +41,12 @@
          :weight :medium
          :style  (style/label theme)}
         collectible-name]
-       (when collectible-id
-         [text/text
-          {:size        :paragraph-2
-           :weight      :medium
-           :margin-left 5
-           :style       (style/label theme)}
-          collectible-id])]]
+       [text/text
+        {:size        :paragraph-2
+         :weight      :medium
+         :margin-left 5
+         :style       (style/label theme)}
+        collectible-id]]]
      (when options
        [rn/view {:style (style/options-icon size)}
         [icons/icon (if (= options :hold) :i/hold :i/add-token)

src/quo/components/wallet/account_card/schema.cljs

@@ -4,6 +4,7 @@
   [:map
    [:type {:optional true} [:enum :default :watch-only :add-account :empty :missing-keypair]]
    [:customization-color {:optional true} [:maybe :schema.common/customization-color]]
+   [:theme :schema.common/theme]
    [:metrics? {:optional true} [:maybe :boolean]]
    [:on-press {:optional true} [:maybe fn?]]])
 

src/quo/components/wallet/account_card/view.cljs

@@ -11,6 +11,7 @@
     [quo.theme :as quo.theme]
     [react-native.core :as rn]
     [react-native.linear-gradient :as linear-gradient]
+    [reagent.core :as reagent]
     [schema.core :as schema]))
 
 (defn- loading-view
@@ -95,87 +96,87 @@
     :end    {:x 1 :y 0}}])
 
 (defn- user-account
-  [{:keys [name balance percentage-value loading? amount customization-color type emoji metrics?
-           on-press]}]
-  (let [theme                  (quo.theme/use-theme-value)
-        [pressed? set-pressed] (rn/use-state false)
-        on-press-in            (rn/use-callback #(set-pressed true))
-        on-press-out           (rn/use-callback #(set-pressed false))
-        watch-only?            (= :watch-only type)
-        missing-keypair?       (= :missing-keypair type)]
-    (if loading?
-      [loading-view
-       {:customization-color customization-color
-        :type                type
-        :theme               theme
-        :metrics?            metrics?}]
-      [rn/pressable
-       {:on-press-in  on-press-in
-        :on-press-out on-press-out
-        :style        (style/card {:customization-color customization-color
-                                   :type                type
-                                   :theme               theme
-                                   :pressed?            pressed?
-                                   :metrics?            metrics?})
-        :on-press     on-press}
-       (when (and customization-color (and (not watch-only?) (not missing-keypair?)))
-         [customization-colors/overlay
-          {:customization-color customization-color
-           :border-radius       16
-           :theme               theme
-           :pressed?            pressed?}])
-       [rn/view {:style style/profile-container}
-        [rn/view {:style {:padding-bottom 2 :margin-right 2}}
-         [text/text {:style style/emoji} emoji]]
-        [rn/view {:style style/watch-only-container}
-         [text/text
-          {:size            :paragraph-2
-           :weight          :medium
-           :number-of-lines 1
-           :max-width       110
-           :margin-right    4
-           :ellipis-mode    :tail
-           :style           (style/account-name type theme)}
-          name]
-         (when watch-only? [icon/icon :i/reveal {:color colors/neutral-50 :size 12}])
-         (when missing-keypair?
-           [icon/icon :i/alert {:color (properties/alert-icon-color theme) :size 12}])]]
-       [text/text
-        {:size   :heading-2
-         :weight :semi-bold
-         :style  (style/account-value type theme)}
-        balance]
-       (when metrics?
-         [rn/view {:style style/metrics-container}
-          [metrics-percentage type theme percentage-value]
-          (when (not= :empty type)
-            [metrics-info type theme amount])])
-       (when watch-only?
-         [gradient-overview theme customization-color])])))
+  [_]
+  (let [pressed?     (reagent/atom false)
+        on-press-in  #(reset! pressed? true)
+        on-press-out #(reset! pressed? false)]
+    (fn [{:keys [name balance percentage-value loading? amount customization-color type emoji metrics?
+                 theme on-press]}]
+      (let [watch-only?      (= :watch-only type)
+            missing-keypair? (= :missing-keypair type)]
+        (if loading?
+          [loading-view
+           {:customization-color customization-color
+            :type                type
+            :theme               theme
+            :metrics?            metrics?}]
+          [rn/pressable
+           {:on-press-in  on-press-in
+            :on-press-out on-press-out
+            :style        (style/card {:customization-color customization-color
+                                       :type                type
+                                       :theme               theme
+                                       :pressed?            @pressed?
+                                       :metrics?            metrics?})
+            :on-press     on-press}
+           (when (and customization-color (and (not watch-only?) (not missing-keypair?)))
+             [customization-colors/overlay
+              {:customization-color customization-color
+               :border-radius       16
+               :theme               theme
+               :pressed?            @pressed?}])
+           [rn/view {:style style/profile-container}
+            [rn/view {:style {:padding-bottom 2 :margin-right 2}}
+             [text/text {:style style/emoji} emoji]]
+            [rn/view {:style style/watch-only-container}
+             [text/text
+              {:size            :paragraph-2
+               :weight          :medium
+               :number-of-lines 1
+               :max-width       110
+               :margin-right    4
+               :ellipis-mode    :tail
+               :style           (style/account-name type theme)}
+              name]
+             (when watch-only? [icon/icon :i/reveal {:color colors/neutral-50 :size 12}])
+             (when missing-keypair?
+               [icon/icon :i/alert {:color (properties/alert-icon-color theme) :size 12}])]]
+           [text/text
+            {:size   :heading-2
+             :weight :semi-bold
+             :style  (style/account-value type theme)}
+            balance]
+           (when metrics?
+             [rn/view {:style style/metrics-container}
+              [metrics-percentage type theme percentage-value]
+              (when (not= :empty type)
+                [metrics-info type theme amount])])
+           (when watch-only?
+             [gradient-overview theme customization-color])])))))
 
 (defn- add-account-view
-  [{:keys [on-press customization-color metrics?]}]
-  (let [theme                  (quo.theme/use-theme-value)
-        [pressed? set-pressed] (rn/use-state false)
-        on-press-in            (rn/use-callback #(set-pressed true))
-        on-press-out           (rn/use-callback #(set-pressed false))]
-    [rn/pressable
-     {:on-press     on-press
-      :on-press-in  on-press-in
-      :on-press-out on-press-out
-      :style        (style/add-account-container {:theme    theme
-                                                  :metrics? metrics?
-                                                  :pressed? pressed?})}
-     [button/button
-      {:on-press            on-press
-       :type                :primary
-       :size                24
-       :icon                true
-       :accessibility-label :add-account
-       :pressed?            pressed?
-       :icon-only?          true
-       :customization-color customization-color}
-      :i/add]]))
+  [_]
+  (let [pressed? (reagent/atom false)]
+    (fn [{:keys [on-press customization-color theme metrics?]}]
+      [rn/pressable
+       {:on-press     on-press
+        :on-press-in  #(reset! pressed? true)
+        :on-press-out #(reset! pressed? false)
+        :style        (style/add-account-container {:theme    theme
+                                                    :metrics? metrics?
+                                                    :pressed? @pressed?})}
+       [button/button
+        {:type                :primary
+         :size                24
+         :icon                true
+         :accessibility-label :add-account
+         :on-press            on-press
+         :pressed?            @pressed?
+         :on-press-in         #(reset! pressed? true)
+         :on-press-out        #(reset! pressed? false)
+         :customization-color customization-color
+         :icon-only?          true}
+        :i/add]])))
 
 (defn- view-internal
   [{:keys [type] :as props}]
@@ -184,4 +185,6 @@
     :add-account                                   [add-account-view props]
     nil))
 
-(def view (schema/instrument #'view-internal component-schema/?schema))
+(def view
+  (quo.theme/with-theme
+   (schema/instrument #'view-internal component-schema/?schema)))

src/quo/components/wallet/amount_input/schema.cljs

@@ -6,7 +6,9 @@
     [:props
      [:map {:closed true}
       [:status {:optional true} [:maybe [:enum :default :error]]]
-      [:on-change-text {:optional true} [:maybe fn?]]
+      [:theme :schema.common/theme]
+      [:on-inc-press {:optional true} [:maybe fn?]]
+      [:on-dec-press {:optional true} [:maybe fn?]]
       [:container-style {:optional true} [:maybe :map]]
       [:min-value {:optional true} [:maybe :int]]
       [:max-value {:optional true} [:maybe :int]]

src/quo/components/wallet/amount_input/view.cljs

@@ -4,7 +4,7 @@
     [quo.components.markdown.text :as text]
     [quo.components.wallet.amount-input.schema :as amount-input.schema]
     [quo.components.wallet.amount-input.style :as style]
-    [quo.theme]
+    [quo.theme :as quo.theme]
     [react-native.core :as rn]
     [schema.core :as schema]))
 
@@ -21,34 +21,35 @@
    icon])
 
 (defn- view-internal
-  [{:keys [on-inc-press on-dec-press status value min-value max-value
+  [{:keys [on-inc-press on-dec-press theme status value min-value max-value
            container-style]
     :or   {value     0
            min-value 0
            max-value 999999999}}]
-  (let [theme (quo.theme/use-theme-value)]
-    [rn/view
-     {:style (merge style/container container-style)}
-     [amount-button
-      {:theme               theme
-       :accessibility-label :amount-input-dec-button
-       :icon                :i/remove
-       :on-press            on-dec-press
-       :disabled?           (>= min-value value)}]
-     [rn/view {:style style/input-container}
-      [text/text
-       {:number-of-lines     1
-        :accessibility-label :amount-input
-        :weight              :semi-bold
-        :size                :heading-1
-        :align-self          :center
-        :style               (style/input-text theme (or status :default))}
-       value]]
-     [amount-button
-      {:theme               theme
-       :icon                :i/add
-       :accessibility-label :amount-input-inc-button
-       :on-press            on-inc-press
-       :disabled?           (>= value max-value)}]]))
+  [rn/view
+   {:style (merge style/container container-style)}
+   [amount-button
+    {:theme               theme
+     :accessibility-label :amount-input-dec-button
+     :icon                :i/remove
+     :on-press            on-dec-press
+     :disabled?           (>= min-value value)}]
+   [rn/view {:style style/input-container}
+    [text/text
+     {:number-of-lines     1
+      :accessibility-label :amount-input
+      :weight              :semi-bold
+      :size                :heading-1
+      :align-self          :center
+      :style               (style/input-text theme (or status :default))}
+     value]]
+   [amount-button
+    {:theme               theme
+     :icon                :i/add
+     :accessibility-label :amount-input-inc-button
+     :on-press            on-inc-press
+     :disabled?           (>= value max-value)}]])
 
-(def view (schema/instrument #'view-internal amount-input.schema/?schema))
+(def view
+  (quo.theme/with-theme
+   (schema/instrument #'view-internal amount-input.schema/?schema)))

src/quo/components/wallet/keypair/view.cljs

@@ -37,9 +37,8 @@
       :border? true}]))
 
 (defn title-view
-  [{:keys [details action selected? type blur? customization-color on-options-press]}]
-  (let [theme               (quo.theme/use-theme-value)
-        {:keys [full-name]} details]
+  [{:keys [details action selected? type blur? customization-color on-options-press theme]}]
+  (let [{:keys [full-name]} details]
     [rn/view
      {:style               style/title-container
       :accessibility-label :title}
@@ -90,7 +89,7 @@
   [item & _rest]
   [account-list-card/view item])
 
-(defn view
+(defn- view-internal
   [{:keys [accounts action container-style selected? on-press] :as props}]
   [rn/pressable
    {:style    (style/container (merge props
@@ -109,3 +108,5 @@
      :render-fn acc-list-card
      :separator [rn/view {:style {:height 8}}]
      :style     {:padding-horizontal 8}}]])
+
+(def view (quo.theme/with-theme view-internal))

src/quo/components/wallet/network_link/helpers.cljs

@@ -1,23 +0,0 @@
-(ns quo.components.wallet.network-link.helpers)
-
-(def ^:private central-figure-width 63)
-
-(defn calculate-side-lines-path-1x
-  "Calculates the `d` attribute for the side lines based on the SVG width."
-  [width]
-  (let [side-offset (/ (- width central-figure-width) 2)]
-    {:left  (str "M0 57 L" side-offset " 57")
-     :right (str "M" (+ side-offset central-figure-width) " 1 L" width " 1")}))
-
-(defn calculate-transform
-  "Calculates the transform attribute for the central figure based on the SVG width."
-  [width]
-  (let [translate-x (/ (- width central-figure-width) 2)]
-    (str "translate(" translate-x " 0)")))
-
-(defn calculate-side-lines-path-2x
-  "Calculates the `d` attribute for the side lines based on the SVG width."
-  [width]
-  (let [side-offset (/ (- width central-figure-width) 2)]
-    {:left  (str "M0 113 L" side-offset " 113")
-     :right (str "M" (+ side-offset central-figure-width) " 1 L" width " 1")}))

src/quo/components/wallet/network_link/style.cljs

@@ -1,34 +0,0 @@
-(ns quo.components.wallet.network-link.style)
-
-(def left-circle-container
-  {:position :absolute
-   :left     -3})
-
-(def right-circle-container
-  {:position :absolute
-   :right    -3})
-
-(def bottom-left-circle-container
-  {:position :absolute
-   :bottom   -3
-   :left     -3})
-
-(def top-right-circle-container
-  {:position :absolute
-   :top      -3
-   :right    -3})
-
-(def link-linear-container
-  {:flex-direction :row
-   :align-items    :center
-   :height         10})
-
-(def link-1x-container
-  {:flex            1
-   :height          58
-   :justify-content :center})
-
-(def link-2x-container
-  {:flex            1
-   :height          114
-   :justify-content :center})

src/quo/components/wallet/network_link/view.cljs

@@ -1,151 +1,82 @@
 (ns quo.components.wallet.network-link.view
   (:require
-    [oops.core :refer [oget]]
-    [quo.components.wallet.network-link.helpers :as helpers]
     [quo.components.wallet.network-link.schema :as component-schema]
-    [quo.components.wallet.network-link.style :as style]
     [quo.foundations.colors :as colors]
     [quo.theme :as quo.theme]
     [react-native.core :as rn]
     [react-native.svg :as svg]
     [schema.core :as schema]))
 
-(defn- circle
-  [fill stroke]
-  [svg/svg
-   {:height "8"
-    :width  "8"}
-   [svg/circle
-    {:cx          "4"
-     :cy          "4"
-     :r           "3.5"
-     :fill        fill
-     :stroke      stroke
-     :strokeWidth "1"}]])
-
-(defn- line
-  [stroke width]
-  [svg/svg
-   {:height   "10"
-    :width    "100%"
-    :view-box (str "0 0 " width " 10")}
-   [svg/path
-    {:d            (str "M0,5 L" width ",5")
-     :stroke       stroke
-     :stroke-width "1"}]])
-
 (defn link-linear
   [{:keys [source theme]}]
-  (let [[container-width
-         set-container-width] (rn/use-state 100)
-        stroke-color          (colors/resolve-color source theme)
-        fill-color            (colors/theme-colors colors/white colors/neutral-90 theme)
-        on-layout             (rn/use-callback #(set-container-width
-                                                 (oget % :nativeEvent :layout :width)))]
-    [rn/view
-     {:style     style/link-linear-container
-      :on-layout on-layout}
-     [line stroke-color container-width]
-     [rn/view {:style style/left-circle-container}
-      [circle fill-color stroke-color]]
-     [rn/view {:style style/right-circle-container}
-      [circle fill-color stroke-color]]]))
+  [svg/svg {:xmlns "http://www.w3.org/2000/svg" :width "73" :height "10" :fill :none}
+   [svg/path {:stroke (colors/resolve-color source theme) :d "M68 5H5"}]
+   [svg/circle
+    {:cx     "68"
+     :cy     "5"
+     :r      "4"
+     :fill   (colors/theme-colors colors/white colors/neutral-90 theme)
+     :stroke (colors/resolve-color source theme)}]
+   [svg/circle
+    {:cx     "5"
+     :cy     "5"
+     :r      "4"
+     :fill   (colors/theme-colors colors/white colors/neutral-90 theme)
+     :stroke (colors/resolve-color source theme)}]])
 
 (defn link-1x
   [{:keys [source destination theme]}]
-  (let [[container-width
-         set-container-width] (rn/use-state 100)
-        stroke-color          "url(#gradient)"
-        source-color          (colors/resolve-color source theme)
-        destination-color     (colors/resolve-color destination theme)
-        fill-color            (colors/theme-colors colors/white colors/neutral-90 theme)
-        view-box              (str "0 0 " container-width " 58")
-        side-lines-path       (helpers/calculate-side-lines-path-1x container-width)
-        central-transform     (helpers/calculate-transform container-width)
-        on-layout             (rn/use-callback #(set-container-width
-                                                 (oget % :nativeEvent :layout :width)))]
-    [rn/view
-     {:style     style/link-1x-container
-      :on-layout on-layout}
-     [svg/svg
-      {:xmlns    "http://www.w3.org/2000/svg"
-       :height   "100%"
-       :width    "100%"
-       :view-box view-box
-       :fill     :none}
-      [svg/path
-       {:d      (:left side-lines-path)
-        :stroke source-color}]
-      [svg/path
-       {:d
-        "M63 1L53.6356 1C42.5899 1 33.6356 9.9543 33.6356 21L33.6356 37C33.6356 48.0457 24.6813 57 13.6356 57L2.85889e-05 57"
-        :transform central-transform
-        :stroke stroke-color}]
-      [svg/path
-       {:d      (:right side-lines-path)
-        :stroke destination-color}]
-      [svg/defs
-       [svg/linear-gradient
-        {:id             "gradient"
-         :x1             "72.271"
-         :x2             "82.385"
-         :y1             "5"
-         :y2             "34.155"
-         :gradient-units "userSpaceOnUse"}
-        [svg/stop {:stop-color (colors/resolve-color destination theme)}]
-        [svg/stop {:offset "1" :stop-color (colors/resolve-color source theme)}]]]]
-     [rn/view {:style style/bottom-left-circle-container}
-      [circle fill-color source-color]]
-     [rn/view {:style style/top-right-circle-container}
-      [circle fill-color destination-color]]]))
+  [svg/svg {:xmlns "http://www.w3.org/2000/svg" :width "73" :height "66" :fill :none}
+   [svg/path
+    {:stroke "url(#gradient)" :d "M68 5h-9.364c-11.046 0-20 8.954-20 20v16c0 11.046-8.955 20-20 20H5"}]
+   [svg/circle
+    {:cx     "68"
+     :cy     "5"
+     :r      "4"
+     :fill   (colors/theme-colors colors/white colors/neutral-90 theme)
+     :stroke (colors/resolve-color destination theme)}]
+   [svg/circle
+    {:cx     "5"
+     :cy     "61"
+     :r      "4"
+     :fill   (colors/theme-colors colors/white colors/neutral-90 theme)
+     :stroke (colors/resolve-color source theme)}]
+   [svg/defs
+    [svg/linear-gradient
+     {:id "gradient" :x1 "72.271" :x2 "82.385" :y1 "5" :y2 "34.155" :gradientUnits "userSpaceOnUse"}
+     [svg/stop {:stopColor (colors/resolve-color destination theme)}]
+     [svg/stop {:offset "1" :stopColor (colors/resolve-color source theme)}]]]])
 
 (defn link-2x
   [{:keys [source destination theme]}]
-  (let [[container-width
-         set-container-width] (rn/use-state 100)
-        stroke-color          "url(#gradient)"
-        source-color          (colors/resolve-color source theme)
-        destination-color     (colors/resolve-color destination theme)
-        fill-color            (colors/theme-colors colors/white colors/neutral-90 theme)
-        view-box              (str "0 0 " container-width " 114")
-        side-lines-path       (helpers/calculate-side-lines-path-2x container-width)
-        central-transform     (helpers/calculate-transform container-width)
-        on-layout             (rn/use-callback #(set-container-width
-                                                 (oget % :nativeEvent :layout :width)))]
-    [rn/view
-     {:style     style/link-2x-container
-      :on-layout on-layout}
-     [svg/svg
-      {:xmlns    "http://www.w3.org/2000/svg"
-       :height   "100%"
-       :width    "100%"
-       :view-box view-box
-       :fill     :none}
-      [svg/path
-       {:d      (:left side-lines-path)
-        :stroke source-color}]
-      [svg/path
-       {:d
-        "M62.9999 1L53.6356 1C42.5899 1 33.6356 9.9543 33.6356 21L33.6356 93C33.6356 104.046 24.6813 113 13.6356 113L5.71778e-05 113"
-        :transform central-transform
-        :stroke stroke-color}]
-      [svg/path
-       {:d      (:right side-lines-path)
-        :stroke destination-color}]
-      [svg/defs
-       [svg/linear-gradient
-        {:id             "gradient"
-         :x1             "72.2711"
-         :y1             "5.00001"
-         :x2             "102.867"
-         :y2             "49.0993"
-         :gradient-units "userSpaceOnUse"}
-        [svg/stop {:stop-color (colors/resolve-color destination theme)}]
-        [svg/stop {:offset "1" :stop-color (colors/resolve-color source theme)}]]]]
-     [rn/view {:style style/bottom-left-circle-container}
-      [circle fill-color source-color]]
-     [rn/view {:style style/top-right-circle-container}
-      [circle fill-color destination-color]]]))
+  [svg/svg
+   {:width "73" :height "122" :viewBox "0 0 73 122" :fill "none" :xmlns "http://www.w3.org/2000/svg"}
+   [svg/path
+    {:d
+     "M67.9999 5L58.6356 5C47.5899 5 38.6356 13.9543 38.6356 25L38.6356 97C38.6356 108.046 29.6813 117 18.6356 117L5.00006 117"
+     :stroke "url(#gradient)"}]
+   [svg/circle
+    {:cx     "68"
+     :cy     "5"
+     :r      "4"
+     :fill   (colors/theme-colors colors/white colors/neutral-90 theme)
+     :stroke (colors/resolve-color destination theme)}]
+   [svg/circle
+    {:cx     "5"
+     :cy     "117"
+     :r      "4"
+     :fill   (colors/theme-colors colors/white colors/neutral-90 theme)
+     :stroke (colors/resolve-color source theme)}]
+   [svg/defs
+    [svg/linear-gradient
+     {:id            "gradient"
+      :x1            "72.2711"
+      :y1            "5.00001"
+      :x2            "102.867"
+      :y2            "49.0993"
+      :gradientUnits "userSpaceOnUse"}
+     [svg/stop {:stop-color (colors/resolve-color destination theme)}]
+     [svg/stop {:offset "1" :stop-color (colors/resolve-color source theme)}]]]])
 
 (defn- view-internal
   [{:keys [shape container-style] :as props}]

src/quo/components/wallet/network_routing/schema.cljs

@@ -12,5 +12,6 @@
           [:amount :int]
           [:max-amount :int]
           [:network-name [:or :string :keyword]]]]]]
-      [:container-style {:optional true} [:maybe :map]]]]]
+      [:container-style {:optional true} [:maybe :map]]
+      [:theme :schema.common/theme]]]]
    :any])

src/quo/components/wallet/network_routing/style.cljs

@@ -29,13 +29,13 @@
    :background-color (colors/resolve-color network-name nil 10)})
 
 (defn network-bar
-  [{:keys                                           [bar-max-width on-top? bar-division? theme]
+  [{:keys                                           [max-width on-top? bar-division? theme]
     {:keys [network-name translate-x-shared-value]} :bar}
    width-shared-value]
   (reanimated/apply-animations-to-style
    {:width     width-shared-value
     :transform [{:translate-x translate-x-shared-value}]}
-   {:max-width          bar-max-width
+   {:max-width          max-width
     :flex-direction     :row
     :justify-content    :flex-end
     :background-color   (colors/resolve-color network-name nil)

src/quo/components/wallet/network_routing/view.cljs

@@ -8,6 +8,7 @@
     [react-native.core :as rn]
     [react-native.gesture :as gesture]
     [react-native.reanimated :as reanimated]
+    [reagent.core :as reagent]
     [schema.core :as schema]
     [utils.number]))
 
@@ -21,73 +22,60 @@
     (js/clearTimeout (k @timeouts))
     (swap! timeouts assoc k (js/setTimeout exec-fn-and-remove-timeout ms))))
 
-(def get-gesture
-  (memoize
-   (fn
-     [[detecting-gesture? slider-width-shared-value max-amount
-       slider-height-shared-value
-       amount-shared-value amount-on-gesture-start width->amount
-       slider-opacity-shared-value on-new-amount set-detecting-gesture]]
-     (-> (gesture/gesture-pan)
-         (gesture/enabled detecting-gesture?)
-         (gesture/on-begin
-          (fn [_]
-            (animation/increase-slider slider-width-shared-value slider-height-shared-value)
-            (reset! amount-on-gesture-start (reanimated/get-shared-value amount-shared-value))))
-         (gesture/on-update
-          (fn [event]
-            (let [new-amount (-> (oops/oget event "translationX")
-                                 (width->amount)
-                                 (+ @amount-on-gesture-start)
-                                 (utils.number/value-in-range 1 max-amount))]
-              (reanimated/set-shared-value amount-shared-value new-amount))))
-         (gesture/on-finalize
-          (fn [_]
-            (animation/decrease-slider slider-width-shared-value slider-height-shared-value)
-            (animation/hide-slider slider-opacity-shared-value)
-            (on-new-amount (reanimated/get-shared-value amount-shared-value))
-            (add-new-timeout :turn-off-gesture #(set-detecting-gesture false) 20)))))))
+(defn- f-slider
+  [slider-shared-values]
+  [rn/view {:style style/slider-container}
+   [reanimated/view {:style (style/slider slider-shared-values)}]])
 
-(defn network-bar
-  [{:keys       [total-width total-amount on-press on-new-amount allow-press?
-                 bar-idx bar-width bar-max-width]
-    {:keys [amount-shared-value
-            max-amount]
-     :as   bar} :bar
-    :as         props}]
-  (let [[detecting-gesture?
-         set-detecting-gesture]     (rn/use-state false)
-        amount-on-gesture-start     (rn/use-ref-atom 0)
-        slider-width-shared-value   (reanimated/use-shared-value 4)
-        slider-height-shared-value  (reanimated/use-shared-value 32)
-        slider-opacity-shared-value (reanimated/use-shared-value 0)
-        network-bar-shared-value    (reanimated/interpolate amount-shared-value
-                                                            [0 total-amount]
-                                                            [0 total-width])
-        width->amount               #(/ (* % total-amount) total-width)
-        gesture                     (get-gesture
-                                     [detecting-gesture? slider-width-shared-value max-amount
-                                      slider-height-shared-value
-                                      amount-shared-value amount-on-gesture-start width->amount
-                                      slider-opacity-shared-value on-new-amount set-detecting-gesture])
-        on-press                    (rn/use-callback
-                                     (fn []
-                                       (when (and (not detecting-gesture?) allow-press?)
-                                         (on-press bar bar-idx bar-width bar-max-width)
-                                         (set-detecting-gesture true)
-                                         (animation/show-slider slider-opacity-shared-value)))
-                                     [detecting-gesture? allow-press? on-press])]
-    [rn/pressable
-     {:on-press on-press}
-     [reanimated/view
-      {:style               (style/network-bar props network-bar-shared-value)
-       :accessibility-label :network-routing-bar}
-      [gesture/gesture-detector {:gesture gesture}
-       [rn/view {:style style/slider-container}
-        [reanimated/view
-         {:style (style/slider {:width-shared-value   slider-width-shared-value
-                                :height-shared-value  slider-height-shared-value
-                                :opacity-shared-value slider-opacity-shared-value})}]]]]]))
+(defn f-network-bar
+  [_]
+  (let [detecting-gesture?      (reagent/atom false)
+        amount-on-gesture-start (atom 0)]
+    (fn [{:keys                [total-width total-amount on-press on-new-amount allow-press?]
+          {:keys [amount-shared-value
+                  max-amount]} :bar
+          :as                  props}]
+      (let [slider-width-shared-value   (reanimated/use-shared-value 4)
+            slider-height-shared-value  (reanimated/use-shared-value 32)
+            slider-opacity-shared-value (reanimated/use-shared-value 0)
+            network-bar-shared-value    (reanimated/interpolate amount-shared-value
+                                                                [0 total-amount]
+                                                                [0 total-width])
+            width->amount               #(/ (* % total-amount) total-width)]
+        [rn/pressable
+         {:on-press (fn []
+                      (when (and (not @detecting-gesture?) allow-press?)
+                        (on-press)
+                        (reset! detecting-gesture? true)
+                        (animation/show-slider slider-opacity-shared-value)))}
+         [reanimated/view
+          {:style               (style/network-bar props network-bar-shared-value)
+           :accessibility-label :network-routing-bar}
+          [gesture/gesture-detector
+           {:gesture
+            (-> (gesture/gesture-pan)
+                (gesture/enabled @detecting-gesture?)
+                (gesture/on-begin
+                 (fn [_]
+                   (animation/increase-slider slider-width-shared-value slider-height-shared-value)
+                   (reset! amount-on-gesture-start (reanimated/get-shared-value amount-shared-value))))
+                (gesture/on-update
+                 (fn [event]
+                   (let [new-amount (-> (oops/oget event "translationX")
+                                        (width->amount)
+                                        (+ @amount-on-gesture-start)
+                                        (utils.number/value-in-range 1 max-amount))]
+                     (reanimated/set-shared-value amount-shared-value new-amount))))
+                (gesture/on-finalize
+                 (fn [_]
+                   (animation/decrease-slider slider-width-shared-value slider-height-shared-value)
+                   (animation/hide-slider slider-opacity-shared-value)
+                   (on-new-amount (reanimated/get-shared-value amount-shared-value))
+                   (add-new-timeout :turn-off-gesture #(reset! detecting-gesture? false) 20))))}
+           [:f> f-slider
+            {:width-shared-value   slider-width-shared-value
+             :height-shared-value  slider-height-shared-value
+             :opacity-shared-value slider-opacity-shared-value}]]]]))))
 
 (defn- add-bar-shared-values
   [{:keys [amount] :as network}]
@@ -105,113 +93,101 @@
               (interleave (repeat [rn/view {:style (style/dashed-line-line network-name)}])
                           (repeat [rn/view {:style style/dashed-line-space}])))))
 
-(defn- network-routing-bars
-  [{:keys [networks total-width total-amount requesting-data? on-amount-selected]}]
-  (let [[selected-network-idx
-         set-selected-network-idx] (rn/use-state nil)
-        [press-locked?
-         set-press-locked]         (rn/use-state false)
-        lock-press                 (rn/use-callback #(set-press-locked true))
-        unlock-press               (rn/use-callback #(set-press-locked false))
-        reset-state-values         (rn/use-callback #(set-selected-network-idx nil))
-        bar-opacity-shared-value   (reanimated/use-shared-value 0)
-        network-bars               (map add-bar-shared-values networks)
-        amount->width              #(* % (/ total-width total-amount))
-        bars-widths-negative       (map #(-> % get-negative-amount amount->width)
-                                        network-bars)
-        last-bar-idx               (dec (count network-bars))
-        network-bar-on-press       (rn/use-callback
-                                    (fn [bar bar-idx bar-width bar-max-width]
-                                      (when-not selected-network-idx
-                                        (let [[previous-bars
-                                               [_ & next-bars]] (split-at bar-idx network-bars)]
-                                          (animation/move-previous-bars
-                                           {:bars                 previous-bars
-                                            :bars-widths-negative bars-widths-negative})
-                                          (animation/move-pressed-bar
-                                           {:bar                  bar
-                                            :bars-widths-negative bars-widths-negative
-                                            :number-previous-bars bar-idx})
-                                          (animation/move-next-bars
-                                           {:bars                 next-bars
-                                            :bars-widths-negative bars-widths-negative
-                                            :number-previous-bars (inc bar-idx)
-                                            :extra-offset         (max 0 (- bar-max-width bar-width))
-                                            :add-new-timeout      add-new-timeout}))
-                                        (animation/show-max-limit-bar bar-opacity-shared-value)
-                                        (set-selected-network-idx bar-idx)))
-                                    [selected-network-idx bars-widths-negative network-bars])
-        on-new-amount              (rn/use-callback
-                                    (fn [new-amount]
-                                      (animation/hide-max-limit-bar bar-opacity-shared-value)
-                                      (when on-amount-selected
-                                        (on-amount-selected new-amount selected-network-idx)))
-                                    [on-amount-selected selected-network-idx])]
-    (rn/use-effect
-     #(when (and (not requesting-data?) selected-network-idx)
-        (let [bar (nth network-bars selected-network-idx)]
-          (animation/hide-pressed-bar bar amount->width))
-        (animation/update-bar-values-and-reset-animations
-         {:new-network-values networks
-          :network-bars       network-bars
-          :amount->width      amount->width
-          :reset-values-fn    reset-state-values
-          :lock-press-fn      lock-press
-          :unlock-press-fn    unlock-press
-          :add-new-timeout    add-new-timeout}))
-     [requesting-data?])
-    [:<>
-     (doall
-      (for [[bar-idx bar] (map-indexed vector network-bars)
-            :let          [bar-max-width      (amount->width (:max-amount bar))
-                           bar-width          (-> (:amount-shared-value bar)
-                                                  (reanimated/get-shared-value)
-                                                  (amount->width))
-                           hide-division?     (or (= last-bar-idx bar-idx) selected-network-idx)
-                           this-bar-selected? (= selected-network-idx bar-idx)]]
-        ^{:key (str "network-bar-" bar-idx)}
-        [network-bar
-         {:bar           bar
-          :bar-idx       bar-idx
-          :bar-width     bar-width
-          :bar-max-width bar-max-width
-          :total-width   total-width
-          :total-amount  total-amount
-          :bar-division? hide-division?
-          :on-top?       this-bar-selected?
-          :allow-press?  (and (or (not selected-network-idx) this-bar-selected?)
-                              (not requesting-data?)
-                              (not press-locked?))
-          :on-press      network-bar-on-press
-          :on-new-amount on-new-amount}]))
+(defn f-network-routing-bars
+  [_]
+  (let [selected-network-idx (reagent/atom nil)
+        press-locked?        (reagent/atom false)
+        lock-press           #(reset! press-locked? true)
+        unlock-press         #(reset! press-locked? false)
+        reset-state-values   #(reset! selected-network-idx nil)]
+    (fn [{:keys [networks total-width total-amount requesting-data? on-amount-selected]}]
+      (let [bar-opacity-shared-value (reanimated/use-shared-value 0)
+            network-bars             (map add-bar-shared-values networks)
+            amount->width            #(* % (/ total-width total-amount))
+            bars-widths-negative     (map #(-> % get-negative-amount amount->width)
+                                          network-bars)
+            last-bar-idx             (dec (count network-bars))]
+        (rn/use-effect
+         #(when (and (not requesting-data?) @selected-network-idx)
+            (let [bar (nth network-bars @selected-network-idx)]
+              (animation/hide-pressed-bar bar amount->width))
+            (animation/update-bar-values-and-reset-animations
+             {:new-network-values networks
+              :network-bars       network-bars
+              :amount->width      amount->width
+              :reset-values-fn    reset-state-values
+              :lock-press-fn      lock-press
+              :unlock-press-fn    unlock-press
+              :add-new-timeout    add-new-timeout}))
+         [requesting-data?])
+        [:<>
+         (doall
+          (for [[bar-idx bar] (map-indexed vector network-bars)
+                :let          [bar-max-width      (amount->width (:max-amount bar))
+                               bar-width          (-> (:amount-shared-value bar)
+                                                      (reanimated/get-shared-value)
+                                                      (amount->width))
+                               hide-division?     (or (= last-bar-idx bar-idx) @selected-network-idx)
+                               this-bar-selected? (= @selected-network-idx bar-idx)]]
+            ^{:key (str "network-bar-" bar-idx)}
+            [:f> f-network-bar
+             {:bar           bar
+              :max-width     bar-max-width
+              :total-width   total-width
+              :total-amount  total-amount
+              :bar-division? hide-division?
+              :on-top?       this-bar-selected?
+              :allow-press?  (and (or (not @selected-network-idx) this-bar-selected?)
+                                  (not requesting-data?)
+                                  (not @press-locked?))
+              :on-press      (fn []
+                               (when-not @selected-network-idx
+                                 (let [[previous-bars [_ & next-bars]] (split-at bar-idx network-bars)
+                                       number-previous-bars            bar-idx]
+                                   (animation/move-previous-bars
+                                    {:bars                 previous-bars
+                                     :bars-widths-negative bars-widths-negative})
+                                   (animation/move-pressed-bar
+                                    {:bar                  bar
+                                     :bars-widths-negative bars-widths-negative
+                                     :number-previous-bars number-previous-bars})
+                                   (animation/move-next-bars
+                                    {:bars                 next-bars
+                                     :bars-widths-negative bars-widths-negative
+                                     :number-previous-bars (inc number-previous-bars)
+                                     :extra-offset         (max 0 (- bar-max-width bar-width))
+                                     :add-new-timeout      add-new-timeout}))
+                                 (animation/show-max-limit-bar bar-opacity-shared-value)
+                                 (reset! selected-network-idx bar-idx)))
+              :on-new-amount (fn [new-amount]
+                               (animation/hide-max-limit-bar bar-opacity-shared-value)
+                               (when on-amount-selected
+                                 (on-amount-selected new-amount @selected-network-idx)))}]))
 
-     (let [{:keys [max-amount network-name]} (some->> selected-network-idx
-                                                      (nth network-bars))
-           limit-bar-width                   (amount->width max-amount)]
-       [reanimated/view
-        {:style (style/max-limit-bar
-                 {:opacity-shared-value bar-opacity-shared-value
-                  :width                limit-bar-width})}
-        [rn/view {:style (style/max-limit-bar-background network-name)}]
-        [dashed-line network-name]])]))
+         (let [{:keys [max-amount network-name]} (some->> @selected-network-idx
+                                                          (nth network-bars))
+               limit-bar-width                   (amount->width max-amount)]
+           [reanimated/view
+            {:style (style/max-limit-bar
+                     {:opacity-shared-value bar-opacity-shared-value
+                      :width                limit-bar-width})}
+            [rn/view {:style (style/max-limit-bar-background network-name)}]
+            [dashed-line network-name]])]))))
 
 (defn view-internal
-  [{:keys [networks container-style] :as params}]
-  (let [theme             (quo.theme/use-theme-value)
-        [total-width
-         set-total-width] (rn/use-state nil)
-        on-layout         (rn/use-callback #(let [width (oops/oget % "nativeEvent.layout.width")]
-                                              (when (not= width total-width)
-                                                (set-total-width width))))]
-    (rn/use-unmount (fn []
-                      (doseq [[_ living-timeout] @timeouts]
-                        (js/clearTimeout living-timeout))))
+  [{:keys [networks container-style theme] :as params}]
+  (reagent/with-let [total-width (reagent/atom nil)]
     [rn/view
      {:accessibility-label :network-routing
       :style               (style/container container-style theme)
-      :on-layout           on-layout}
-     (when total-width
+      :on-layout           #(reset! total-width (oops/oget % "nativeEvent.layout.width"))}
+     (when @total-width
        ^{:key (str "network-routing-" (count networks))}
-       [network-routing-bars (assoc params :total-width total-width)])]))
+       [:f> f-network-routing-bars (assoc params :total-width @total-width)])]
+    (finally
+     (doseq [[_ living-timeout] @timeouts]
+       (js/clearTimeout living-timeout)))))
 
-(def view (schema/instrument #'view-internal network-routing-schema/?schema))
+(def view
+  (quo.theme/with-theme
+   (schema/instrument #'view-internal network-routing-schema/?schema)))

src/quo/components/wallet/token_input/schema.cljs

@@ -14,5 +14,6 @@
       [:networks {:optional true}
        [:maybe [:sequential [:map [:source [:maybe :schema.common/image-source]]]]]]
       [:customization-color {:optional true} [:maybe :schema.common/customization-color]]
-      [:value {:optional true} [:maybe :string]]]]]
+      [:value {:optional true} [:maybe :string]]
+      [:theme :schema.common/theme]]]]
    :any])

src/quo/components/wallet/token_input/view.cljs

@@ -12,6 +12,7 @@
     [quo.foundations.common :as common]
     [quo.theme :as quo.theme]
     [react-native.core :as rn]
+    [reagent.core :as reagent]
     [schema.core :as schema]))
 
 (defn fiat-format
@@ -74,8 +75,7 @@
    [token-name-text theme text]])
 
 (defn input-section
-  [{:keys [on-change-text value value-internal set-value-internal on-selection-change
-           on-token-press]}]
+  [{:keys [on-change-text value value-atom on-selection-change on-token-press]}]
   (let [input-ref               (atom nil)
         set-ref                 #(reset! input-ref %)
         focus-input             #(when-let [ref ^js @input-ref]
@@ -83,7 +83,7 @@
         controlled-input?       (some? value)
         handle-on-change-text   (fn [v]
                                   (when-not controlled-input?
-                                    (set-value-internal v))
+                                    (reset! value-atom v))
                                   (when on-change-text
                                     (on-change-text v)))
         handle-selection-change (fn [^js e]
@@ -117,43 +117,41 @@
                   :on-selection-change      handle-selection-change
                   :selection                (clj->js selection)}
            controlled-input?       (assoc :value value)
-           (not controlled-input?) (assoc :default-value value-internal))]]
+           (not controlled-input?) (assoc :default-value @value-atom))]]
        [token-label
         {:theme theme
          :text  (if crypto? token currency)
-         :value (if controlled-input? value value-internal)}]])))
+         :value (if controlled-input? value @value-atom)}]])))
 
 (defn- view-internal
-  [{:keys [container-style value on-swap] :as props}]
-  (let [theme                               (quo.theme/use-theme-value)
-        width                               (:width (rn/get-window))
-        [value-internal set-value-internal] (rn/use-state nil)
-        [crypto? set-crypto]                (rn/use-state true)
-        handle-on-swap                      (rn/use-callback
-                                             (fn []
-                                               (set-crypto (not crypto?))
-                                               (when on-swap (on-swap (not crypto?))))
-                                             [crypto? on-swap])]
-    [rn/view {:style (merge (style/main-container width) container-style)}
-     [rn/view {:style style/amount-container}
-      [input-section
-       (assoc props
-              :value-internal     value-internal
-              :set-value-internal set-value-internal
-              :crypto?            crypto?)]
-      [button/button
-       {:icon                true
-        :icon-only?          true
-        :size                32
-        :on-press            handle-on-swap
-        :type                :outline
-        :accessibility-label :reorder}
-       :i/reorder]]
-     [divider-line/view {:container-style (style/divider theme)}]
-     [data-info
-      (assoc props
-             :theme   theme
-             :crypto? crypto?
-             :amount  (or value value-internal))]]))
+  []
+  (let [width      (:width (rn/get-window))
+        value-atom (reagent/atom nil)
+        crypto?    (reagent/atom true)]
+    (fn [{:keys [theme container-style value on-swap] :as props}]
+      (let [handle-on-swap (fn []
+                             (swap! crypto? not)
+                             (when on-swap (on-swap @crypto?)))]
+        [rn/view {:style (merge (style/main-container width) container-style)}
+         [rn/view {:style style/amount-container}
+          [input-section
+           (assoc props
+                  :value-atom value-atom
+                  :crypto?    @crypto?)]
+          [button/button
+           {:icon                true
+            :icon-only?          true
+            :size                32
+            :on-press            handle-on-swap
+            :type                :outline
+            :accessibility-label :reorder}
+           :i/reorder]]
+         [divider-line/view {:container-style (style/divider theme)}]
+         [data-info
+          (assoc props
+                 :crypto? @crypto?
+                 :amount  (or value @value-atom))]]))))
 
-(def view (schema/instrument #'view-internal component-schema/?schema))
+(def view
+  (quo.theme/with-theme
+   (schema/instrument #'view-internal component-schema/?schema)))

src/quo/components/wallet/wallet_activity/schema.cljs

@@ -13,6 +13,7 @@
       [:blur? {:optional true} [:maybe :boolean]]
       [:on-press {:optional true} [:maybe fn?]]
       [:state {:optional true} [:maybe [:= :disabled]]]
+      [:theme :schema.common/theme]
       [:second-tag-prefix {:optional true} [:maybe :keyword]]
       [:third-tag-prefix {:optional true} [:maybe :keyword]]
       [:fourth-tag-prefix {:optional true} [:maybe :keyword]]

src/quo/components/wallet/wallet_activity/view.cljs

@@ -8,6 +8,7 @@
     [quo.theme :as quo.theme]
     [react-native.core :as rn]
     [react-native.hole-view :as hole-view]
+    [reagent.core :as reagent]
     [schema.core :as schema]
     [utils.i18n :as i18n]))
 
@@ -99,37 +100,39 @@
    [context-tag/view (merge props {:size 24 :blur? blur?})]])
 
 (defn- view-internal
-  [{:keys [state blur? first-tag second-tag third-tag fourth-tag on-press
-           second-tag-prefix third-tag-prefix fourth-tag-prefix]
-    :as   props}]
-  (let [theme         (quo.theme/use-theme-value)
-        [pressed?
-         set-pressed] (rn/use-state false)
-        on-press-in   (rn/use-callback #(set-pressed true))
-        on-press-out  (rn/use-callback #(set-pressed false))]
-    [rn/pressable
-     {:style               (style/wallet-activity-container {:pressed? pressed?
-                                                             :theme    theme
-                                                             :blur?    blur?})
-      :accessibility-label :wallet-activity
-      :disabled            (= state :disabled)
-      :on-press            on-press
-      :on-press-in         on-press-in
-      :on-press-out        on-press-out}
-     [rn/view
-      {:style {:flex-direction :row}}
-      [transaction-icon-view props]
-      [rn/view
-       {:style style/content-container}
-       [transaction-header props]
-       [rn/view {:style style/content-line}
-        (when first-tag [prop-tag first-tag blur?])
-        (when second-tag-prefix [prop-text second-tag-prefix theme])
-        (when second-tag [prop-tag second-tag blur?])]
-       [rn/view {:style style/content-line}
-        (when third-tag-prefix [prop-text third-tag-prefix theme])
-        (when third-tag [prop-tag third-tag blur?])
-        (when fourth-tag-prefix [prop-text fourth-tag-prefix theme])
-        (when fourth-tag [prop-tag fourth-tag blur?])]]]]))
+  [_]
+  (let [pressed? (reagent/atom false)]
+    (fn
+      [{:keys [state theme blur?
+               on-press
+               first-tag second-tag third-tag fourth-tag
+               second-tag-prefix third-tag-prefix fourth-tag-prefix]
+        :as   props}]
+      [rn/pressable
+       {:style               (style/wallet-activity-container {:pressed? @pressed?
+                                                               :theme    theme
+                                                               :blur?    blur?})
+        :accessibility-label :wallet-activity
+        :disabled            (= state :disabled)
+        :on-press            on-press
+        :on-press-in         (fn [] (reset! pressed? true))
+        :on-press-out        (fn [] (reset! pressed? false))}
+       [rn/view
+        {:style {:flex-direction :row}}
+        [transaction-icon-view props]
+        [rn/view
+         {:style style/content-container}
+         [transaction-header props]
+         [rn/view {:style style/content-line}
+          (when first-tag [prop-tag first-tag blur?])
+          (when second-tag-prefix [prop-text second-tag-prefix theme])
+          (when second-tag [prop-tag second-tag blur?])]
+         [rn/view {:style style/content-line}
+          (when third-tag-prefix [prop-text third-tag-prefix theme])
+          (when third-tag [prop-tag third-tag blur?])
+          (when fourth-tag-prefix [prop-text fourth-tag-prefix theme])
+          (when fourth-tag [prop-tag fourth-tag blur?])]]]])))
 
-(def view (schema/instrument #'view-internal component-schema/?schema))
+(def view
+  (quo.theme/with-theme
+   (schema/instrument #'view-internal component-schema/?schema)))

src/quo/core.cljs

@@ -32,7 +32,6 @@
     quo.components.community.channel-action.view
     quo.components.community.channel-actions.view
     quo.components.community.community-card-view
-    quo.components.community.community-detail-token-gating.view
     quo.components.community.community-list-view
     quo.components.community.community-stat.view
     quo.components.community.community-view
@@ -225,7 +224,6 @@
 
 ;;;; Community
 (def community-card-view-item quo.components.community.community-card-view/view)
-(def community-detail-token-gating quo.components.community.community-detail-token-gating.view/view)
 (def communities-membership-list-item
   quo.components.community.community-list-view/communities-membership-list-item)
 (def community-stats-column quo.components.community.community-view/community-stats-column)

src/quo/core_spec.cljs

@@ -16,7 +16,6 @@
     quo.components.calendar.calendar.component-spec
     quo.components.calendar.calendar.month-picker.component-spec
     quo.components.colors.color-picker.component-spec
-    quo.components.community.community-detail-token-gating.component-spec
     quo.components.community.community-stat.component-spec
     quo.components.counter.collectible-counter.component-spec
     quo.components.counter.counter.component-spec

src/quo/foundations/resources.cljs

@@ -10,10 +10,7 @@
 (def ui-themed
   {:no-funds
    {:light (js/require "../resources/images/ui2/no-funds-light.png")
-    :dark  (js/require "../resources/images/ui2/no-funds-dark.png")}
-   :no-contacts-to-chat
-   {:light (js/require "../resources/images/ui2/no-contacts-to-chat-light.png")
-    :dark  (js/require "../resources/images/ui2/no-contacts-to-chat-dark.png")}})
+    :dark  (js/require "../resources/images/ui2/no-funds-dark.png")}})
 
 (defn get-themed-image
   [k theme]

src/react_native/core.cljs

@@ -226,3 +226,7 @@
 (defn open-url [link] (.openURL ^js linking link))
 
 (def set-status-bar-style react-native/StatusBar.setBarStyle)
+
+(defn sharing
+  [content]
+  (.share (.-Share ^js react-native) (clj->js content)))

src/react_native/share.cljs

@@ -4,5 +4,9 @@
 
 (defn open
   ([options]
+   (open options #() #()))
+  ([options on-success on-error]
    (-> ^js react-native-share
-       (.open (clj->js options)))))
+       (.open (clj->js options))
+       (.then on-success)
+       (.catch on-error))))

src/status_im/common/contact_list/view.cljs

@@ -12,5 +12,5 @@
 (defn contacts-section-header
   [{:keys [title]}]
   (let [theme (quo.theme/use-theme-value)]
-    [quo/divider-label {:container-style (style/contacts-section-header theme)}
+    [quo/divider-label {:container-style {:background-color (style/contacts-section-header theme)}}
      title]))

src/status_im/common/contact_list_item/view.cljs

@@ -5,7 +5,7 @@
     [utils.re-frame :as rf]))
 
 (defn contact-list-item
-  [{:keys [on-press on-long-press accessory allow-multiple-presses? disabled?]}
+  [{:keys [on-press on-long-press accessory allow-multiple-presses?]}
    {:keys [primary-name secondary-name public-key compressed-key ens-verified added?]}
    theme]
   (let [photo-path          (rf/sub [:chats/photo-path public-key])
@@ -24,5 +24,4 @@
       :contact?                added?
       :on-press                on-press
       :on-long-press           on-long-press
-      :accessory               accessory
-      :disabled?               disabled?}]))
+      :accessory               accessory}]))

src/status_im/common/json_rpc/events.cljs

@@ -2,6 +2,7 @@
   (:require
     [clojure.string :as string]
     [native-module.core :as native-module]
+    [promesa.core :as promesa]
     [re-frame.core :as re-frame]
     [react-native.background-timer :as background-timer]
     [taoensso.timbre :as log]
@@ -30,6 +31,14 @@
                                       updated-delay)))
     on-error))
 
+(defn- handle-rpc-response
+  [callback deferred promise-resolution-fn result]
+  (when callback
+    (if (vector? callback)
+      (rf/dispatch (conj callback result))
+      (callback result)))
+  (promise-resolution-fn deferred result))
+
 (defn call
   "Call private RPC endpoint.
 
@@ -40,15 +49,13 @@
   params: sequence - A positional sequence of zero or more arguments.
 
   on-success/on-error: function/vector (optional) - When a function, it will be
-  called with the transformed response and id (request-id) as the argument.
-  When a vector, it is expected to be a valid re-frame event vector, and the event
-  will be dispatched with the transformed response and id conj'ed at the end.
+  called with the transformed response as the sole argument. When a vector, it
+  is expected to be a valid re-frame event vector, and the event will be
+  dispatched with the transformed response conj'ed at the end.
 
   js-response: boolean - When non-nil, the successful response will not be
   recursively converted to Clojure data structures. Default: nil.
 
-  id: (optional) - id passed while making the RPC call will be returned in response
-
   number-of-retries: integer - The maximum number of retries in case of failure.
   Default: nil.
 
@@ -58,36 +65,28 @@
   Note that on-error is optional, but if not provided, a default implementation
   will be used.
   "
-  [{:keys [method params on-success on-error js-response id] :as arg}]
-  (let [params   (or params [])
+  [{:keys [method params on-success on-error js-response] :as arg}]
+  (let [deferred (promesa/deferred)
+        params   (or params [])
         on-error (or on-error
                      (on-error-retry call arg)
                      #(log/warn :json-rpc/error method :error % :params params))]
     (native-module/call-private-rpc
      (transforms/clj->json {:jsonrpc "2.0"
-                            :id      (or id 1)
+                            :id      1
                             :method  method
                             :params  params})
      (fn [raw-response]
        (if (string/blank? raw-response)
-         (let [error {:message "Blank response"}]
-           (if (vector? on-error)
-             (rf/dispatch (conj on-error error))
-             (on-error error)))
+         (handle-rpc-response on-error deferred promesa/reject! {:message "Blank response"})
          (let [^js response-js (transforms/json->js raw-response)]
            (if-let [error (.-error response-js)]
-             (let [error (transforms/js->clj error)]
-               (if (vector? on-error)
-                 (rf/dispatch (conj on-error error))
-                 (on-error error)))
-             (when on-success
-               (let [result     (if js-response
-                                  (.-result response-js)
-                                  (transforms/js->clj (.-result response-js)))
-                     request-id (.-id response-js)]
-                 (if (vector? on-success)
-                   (rf/dispatch (conj on-success result request-id))
-                   (on-success result request-id)))))))))))
+             (handle-rpc-response on-error deferred promesa/reject! (transforms/js->clj error))
+             (let [result (if js-response
+                            (.-result response-js)
+                            (transforms/js->clj (.-result response-js)))]
+               (handle-rpc-response on-success deferred promesa/resolve! result)))))))
+    deferred))
 
 (re-frame/reg-fx
  :json-rpc/call

src/status_im/common/lightbox/effects.cljs

@@ -3,6 +3,7 @@
             [react-native.cameraroll :as cameraroll]
             [react-native.fs :as fs]
             [react-native.platform :as platform]
+            [react-native.share :as share]
             [utils.re-frame :as rf]))
 
 (def config
@@ -14,12 +15,10 @@
    (blob/fetch uri
                config
                (fn [downloaded-url]
-                 (rf/dispatch [:open-share
-                               {:options    {:url       (str (when platform/android? "file://")
-                                                             downloaded-url)
-                                             :isNewTask true}
-                                :on-success #(fs/unlink downloaded-url)
-                                :on-error   #(fs/unlink downloaded-url)}])))))
+                 (share/open {:url       (str (when platform/android? "file://") downloaded-url)
+                              :isNewTask true}
+                             #(fs/unlink downloaded-url)
+                             #(fs/unlink downloaded-url))))))
 
 (rf/reg-fx :effects.lightbox/save-image-to-gallery
  (fn [[uri on-success]]

src/status_im/common/router.cljs

@@ -100,7 +100,7 @@
       ens?
       (assoc-in [:route-params :ens-name] fragment)
 
-      (and (= handler :community) compressed-key?)
+      (and (or (= handler :community) (= handler :community-chat)) compressed-key?)
       (assoc-in [:route-params :community-id] fragment)
 
       (and equal-end-of-base64url (= handler :community) (:community-data route-params))
@@ -119,13 +119,6 @@
            (re-find constants/regx-starts-with-uuid (:community-data route-params)))
       (assoc-in [:route-params :community-channel-id] (:community-data route-params))
 
-      (and fragment
-           (= handler :community-chat)
-           (:community-data route-params)
-           (string? (:community-data route-params))
-           (not (re-find constants/regx-starts-with-uuid (:community-data route-params))))
-      (assoc-in [:route-params :community-encoded-data?] true)
-
       (and equal-end-of-base64url (= handler :user) (:user-data route-params))
       (update-in [:route-params :user-data] #(str % equal-end-of-base64url))
 
@@ -210,10 +203,6 @@
                            (cb {:type  :private-chat
                                 :error :invalid-chat-id})))))
 
-(defn parse-shared-url
-  [uri]
-  (re-frame/dispatch [:shared-urls/parse-shared-url uri]))
-
 (defn match-community-channel-async
   [{:keys [community-channel-id community-id]} cb]
   (if (validators/valid-compressed-key? community-id)
@@ -318,10 +307,9 @@
       (and (= handler :community-chat) (:community-channel-id route-params) (:community-id route-params))
       (match-community-channel-async route-params cb)
 
-      (and (= handler :community-chat)
-           (:community-encoded-data? route-params)
-           (:community-id route-params))
-      (parse-shared-url uri)
+      (and (= handler :community-chat) (:community-id route-params))
+      (cb {:type         :community
+           :community-id (:community-id route-params)})
 
       ;; NOTE: removed in `match-uri`, might need this in the future
       (= handler :wallet-account)

src/status_im/common/router_test.cljs

@@ -42,14 +42,12 @@
     [:community-chat
      {:community-data
       "G54AAKwObLdpiGjXnckYzRcOSq0QQAS_CURGfqVU42ceGHCObstUIknTTZDOKF3E8y2MSicncpO7fTskXnoACiPKeejvjtLTGWNxUhlT7fyQS7Jrr33UVHluxv_PLjV2ePGw5GQ33innzeK34pInIgUGs5RjdQifMVmURalxxQKwiuoY5zwIjixWWRHqjHM="
-      :community-encoded-data? true
       :community-id "zQ3shYSHp7GoiXaauJMnDcjwU2yNjdzpXLosAWapPS4CFxc11"}]
 
    "status-app://cc/G54AAKwObLdpiGjXnckYzRcOSq0QQAS_CURGfqVU42ceGHCObstUIknTTZDOKF3E8y2MSicncpO7fTskXnoACiPKeejvjtLTGWNxUhlT7fyQS7Jrr33UVHluxv_PLjV2ePGw5GQ33innzeK34pInIgUGs5RjdQifMVmURalxxQKwiuoY5zwIjixWWRHqjHM=#zQ3shYSHp7GoiXaauJMnDcjwU2yNjdzpXLosAWapPS4CFxc11"
     [:community-chat
      {:community-data
       "G54AAKwObLdpiGjXnckYzRcOSq0QQAS_CURGfqVU42ceGHCObstUIknTTZDOKF3E8y2MSicncpO7fTskXnoACiPKeejvjtLTGWNxUhlT7fyQS7Jrr33UVHluxv_PLjV2ePGw5GQ33innzeK34pInIgUGs5RjdQifMVmURalxxQKwiuoY5zwIjixWWRHqjHM="
-      :community-encoded-data? true
       :community-id "zQ3shYSHp7GoiXaauJMnDcjwU2yNjdzpXLosAWapPS4CFxc11"}]
 
    "https://status.app/cc/c432709e-fc73-440d-bb67-cb3a0929dfda#zQ3shZL6dXiFCbDyxnXxwQa9v8QFC2q19subFtyxd7kVszMVo"

src/status_im/common/shared_urls/data_store.cljs

@@ -1,20 +0,0 @@
-(ns status-im.common.shared-urls.data-store
-  (:require
-    [clojure.set :as set]))
-
-(defn <-rpc
-  [{:keys [community channel contact]}]
-  {:community (set/rename-keys
-               community
-               {:communityId  :community-id
-                :displayName  :display-name
-                :membersCount :members-count
-                :tagIndices   :tag-indices})
-   :channel   (set/rename-keys
-               channel
-               {:displayName :display-name
-                :channelUuid :channel-uuid})
-   :contact   (set/rename-keys
-               contact
-               {:displayName :display-name
-                :publicKey   :public-key})})

src/status_im/common/shared_urls/events.cljs

@@ -1,33 +0,0 @@
-(ns status-im.common.shared-urls.events
-  (:require
-    [clojure.string :as string]
-    [re-frame.core :as re-frame]
-    [status-im.common.shared-urls.data-store :as data-store]
-    [taoensso.timbre :as log]
-    [utils.re-frame :as rf]))
-
-(defn parse-shared-url-success
-  [url response]
-  (let [parsed-data (data-store/<-rpc response)
-        cb          #(rf/dispatch [:universal-links/match-value url %])]
-    (cond
-      (:channel parsed-data)
-      (cb {:type         :community-chat
-           :chat-id      (str (get-in parsed-data [:community :community-id])
-                              (get-in parsed-data [:channel :channel-uuid]))
-           :community-id (get-in parsed-data [:community :community-id])})
-
-      (:community parsed-data)
-      (cb {:type :community :community-id (get-in parsed-data [:community :community-id])}))))
-
-(defn parse-shared-url
-  [_ [uri]]
-  (let [url (string/replace uri #"status-app:/" "https://status.app")]
-    {:json-rpc/call
-     [{:method     "wakuext_parseSharedURL"
-       :params     [url]
-       :on-success #(parse-shared-url-success url %)
-       :on-error   (fn [err]
-                     (log/error "failed to parse shared url" {:error err :url url}))}]}))
-
-(re-frame/reg-event-fx :shared-urls/parse-shared-url parse-shared-url)

src/status_im/common/standard_authentication/enter_password/view.cljs

@@ -18,8 +18,8 @@
       [rn/view
        [quo/text
         {:accessibility-label :sync-code-generated
-         :weight              :semi-bold
-         :size                :heading-2
+         :weight              :bold
+         :size                :heading-1
          :style               {:margin-bottom 4}}
         (i18n/label :t/enter-password)]
        [rn/view

src/status_im/common/universal_links.cljs

@@ -116,16 +116,14 @@
     (log/debug "universal-links: no url")))
 
 (rf/defn on-handle
-  {:events [:universal-links/match-value]}
-  [cofx url {:keys [type chat-id community-id] :as data}]
+  {:events [::match-value]}
+  [cofx url {:keys [type chat-id] :as data}]
   (case type
     :group-chat         (handle-group-chat cofx data)
     :private-chat       (handle-private-chat cofx data)
     :community-requests (handle-community-requests cofx data)
-    :community          (communities.events/navigate-to-community-overview cofx [community-id])
-    :community-chat     (communities.events/navigate-to-community-chat cofx
-                                                                       [chat-id :pop-to-root
-                                                                        community-id])
+    :community          (communities.events/navigate-to-serialized-community cofx data)
+    :community-chat     {:dispatch [:communities/navigate-to-community-chat chat-id :pop-to-root]}
     :contact            (handle-view-profile cofx data)
     :browser            (handle-browse cofx data)
     :eip681             (handle-eip681 cofx data)
@@ -138,7 +136,7 @@
   {:router/handle-uri {:chain (chain/chain-keyword db)
                        :chats (:chats db)
                        :uri   url
-                       :cb    #(re-frame/dispatch [:universal-links/match-value url %])}})
+                       :cb    #(re-frame/dispatch [::match-value url %])}})
 
 (rf/defn store-url-for-later
   "Store the url in the db to be processed on login"

src/status_im/config.cljs

@@ -2,7 +2,6 @@
   (:require
     [clojure.string :as string]
     [react-native.config :as react-native-config]
-    [status-im.constants :as constants]
     [utils.ens.core :as utils.ens]
     [utils.ethereum.chain :as chain]))
 
@@ -71,18 +70,6 @@
 ; currently not supported in status-go
 (def enable-remove-profile-picture? false)
 
-(defn env-variable->int
-  [env-var-name default-value]
-  (js/parseInt (get-config env-var-name default-value)))
-
-(def delete-message-for-me-undo-time-limit-ms
-  (env-variable->int :DELETE_MESSAGE_FOR_ME_UNDO_TIME_LIMIT
-                     constants/delete-message-for-me-undo-time-limit-ms))
-
-(def delete-message-undo-time-limit-ms
-  (env-variable->int :DELETE_MESSAGE_UNDO_TIME_LIMIT
-                     constants/delete-message-undo-time-limit-ms))
-
 (def verify-transaction-chain-id (js/parseInt (get-config :VERIFY_TRANSACTION_CHAIN_ID "1")))
 (def verify-transaction-url
   (if (= :mainnet (chain/chain-id->chain-keyword verify-transaction-chain-id))

src/status_im/constants.cljs

@@ -71,6 +71,9 @@
 (def ^:const timeline-chat-type 5)
 (def ^:const community-chat-type 6)
 
+(def ^:const community-permissions-auto-accept 1)
+(def ^:const community-permissions-manual-accept 3)
+
 (def ^:const contact-request-message-state-none 0)
 (def ^:const contact-request-message-state-pending 1)
 (def ^:const contact-request-message-state-accepted 2)
@@ -168,6 +171,8 @@
 (def ^:const community-token-type-erc20 1)
 (def ^:const community-token-type-erc721 2)
 
+(def ^:const sepolia-stt-contract-address "0xe452027cdef746c7cd3db31cb700428b16cd8e51")
+
 ;; Community rules for joining
 (def ^:const community-rule-ens-only "ens-only")
 
@@ -448,8 +453,6 @@
 (def ^:const optimism-short-name "opt")
 (def ^:const arbitrum-short-name "arb1")
 
-(def ^:const default-multichain-address-prefix "eth:opt:arb1:")
-
 (def ^:const mainnet-abbreviated-name "Eth.")
 (def ^:const optimism-abbreviated-name "Opt.")
 (def ^:const arbitrum-abbreviated-name "Arb1.")

src/status_im/contexts/chat/home/new_chat/view.cljs

@@ -101,7 +101,6 @@
         {:keys [primary-name public-key]} (when one-contact-selected?
                                             (rf/sub [:contacts/contact-by-identity
                                                      (first selected-contacts)]))]
-    (rn/use-unmount #(rf/dispatch [:group-chat/clear-contacts]))
     [rn/view {:flex 1}
      [rn/view {:padding-horizontal 20}
       [quo/button

src/status_im/contexts/chat/home/view.cljs

@@ -5,6 +5,7 @@
     [re-frame.core :as re-frame]
     [react-native.core :as rn]
     [react-native.reanimated :as reanimated]
+    [react-native.share :as share]
     [status-im.common.contact-list-item.view :as contact-list-item]
     [status-im.common.contact-list.view :as contact-list]
     [status-im.common.home.actions.view :as actions]
@@ -121,7 +122,7 @@
                            [:show-bottom-sheet {:content chat.actions.view/new-chat}])
     :accessibility-label :new-chat-button}
    :card-props
-   {:on-press    #(rf/dispatch [:open-share {:options {:url profile-link}}])
+   {:on-press    #(share/open {:url profile-link})
     :banner      (resources/get-image :invite-friends)
     :title       (i18n/label :t/invite-friends-to-status)
     :description (i18n/label :t/share-invite-link)}})

src/status_im/contexts/chat/messenger/composer/actions/view.cljs

@@ -41,13 +41,8 @@
 
 (defn f-send-button
   [props state animations window-height images? btn-opacity z-index edit]
-  (let [{:keys [text-value]}        state
-        profile-customization-color (rf/sub [:profile/customization-color])
-        {:keys      [chat-id chat-type]
-         chat-color :color}         (rf/sub [:chats/current-chat-chat-view])
-        contact-customization-color (when (= chat-type constants/one-to-one-chat-type)
-                                      (rf/sub [:contacts/contact-customization-color-by-address
-                                               chat-id]))]
+  (let [{:keys [text-value]} state
+        customization-color  (rf/sub [:profile/customization-color])]
     (rn/use-effect (fn []
                      ;; Handle send button opacity animation and z-index when input content changes
                      (if (or (seq @text-value) images?)
@@ -65,7 +60,7 @@
      [quo/button
       {:icon-only?          true
        :size                32
-       :customization-color (or contact-customization-color chat-color profile-customization-color)
+       :customization-color customization-color
        :accessibility-label :send-message-button
        :on-press            #(send-message props state animations window-height edit)}
       :i/arrow-up]]))

src/status_im/contexts/chat/messenger/menus/pinned_messages/style.cljs

@@ -8,13 +8,13 @@
    :margin-bottom      (when-not community? 12)})
 
 (def community-tag-container
-  {:margin-horizontal 20
-   :margin-top        4
-   :margin-bottom     12})
+  {:margin-horizontal 20 :margin-top 4 :margin-bottom 12})
 
 (def no-pinned-messages-container
   {:justify-content :center
-   :align-items     :center})
+   :align-items     :center
+   :margin          12
+   :margin-bottom   (when platform/android? 12)})
 
 (def list-footer
   {:height (when platform/android? 12)})

src/status_im/contexts/chat/messenger/messages/content/pin/view.cljs

@@ -29,15 +29,11 @@
 
 (defn pinned-message
   [{:keys [from quoted-message timestamp-str]}]
-  (let [[primary-name _]            (rf/sub [:contacts/contact-two-names-by-identity from])
-        one-to-one-chat?            (rf/sub [:chats/current-chat-one-to-one?])
-        current-chat-color          (rf/sub [:chats/current-chat-color])
-        contact-customization-color (rf/sub [:contacts/contact-customization-color-by-address from])]
+  (let [[primary-name _]    (rf/sub [:contacts/contact-two-names-by-identity from])
+        customization-color (rf/sub [:profile/customization-color])]
     [quo/system-message
      {:type                :pinned
       :pinned-by           primary-name
-      :customization-color (if one-to-one-chat?
-                             contact-customization-color
-                             current-chat-color)
+      :customization-color customization-color
       :child               [reply/quoted-message quoted-message false true]
       :timestamp           timestamp-str}]))

src/status_im/contexts/chat/messenger/messages/content/view.cljs

@@ -79,17 +79,16 @@
 
 (defn system-message-contact-request
   [{:keys [chat-id timestamp-str from]} type]
-  (let [[primary-name _]       (rf/sub [:contacts/contact-two-names-by-identity chat-id])
-        {:keys [images]
-         contact-customization-color
-         :customization-color} (rf/sub [:contacts/contact-by-address chat-id])
-        photo-path             (when (seq images) (rf/sub [:chats/photo-path chat-id]))
-        public-key             (rf/sub [:profile/public-key])]
+  (let [[primary-name _]    (rf/sub [:contacts/contact-two-names-by-identity chat-id])
+        contact             (rf/sub [:contacts/contact-by-address chat-id])
+        photo-path          (when (seq (:images contact)) (rf/sub [:chats/photo-path chat-id]))
+        customization-color (rf/sub [:profile/customization-color])
+        public-key          (rf/sub [:profile/public-key])]
     [quo/system-message
      {:type                type
       :timestamp           timestamp-str
       :display-name        primary-name
-      :customization-color contact-customization-color
+      :customization-color customization-color
       :photo-path          photo-path
       :incoming?           (not= public-key from)}]))
 

src/status_im/contexts/chat/messenger/messages/drawers/view.cljs

@@ -7,7 +7,6 @@
     [react-native.gesture :as gesture]
     [reagent.core :as reagent]
     [status-im.common.contact-list-item.view :as contact-list-item]
-    [status-im.config :as config]
     [status-im.constants :as constants]
     [status-im.contexts.chat.messenger.composer.reply.view :as reply]
     [status-im.contexts.chat.messenger.messages.drawers.style :as style]
@@ -141,7 +140,7 @@
                    (rf/dispatch
                     [:hide-bottom-sheet])
                    (rf/dispatch [:chat.ui/delete-message-for-me message-data
-                                 config/delete-message-for-me-undo-time-limit-ms]))
+                                 constants/delete-message-for-me-undo-time-limit-ms]))
 
        :label    (i18n/label :t/delete-for-me)
        :icon     :i/delete
@@ -156,7 +155,7 @@
        :on-press (fn []
                    (rf/dispatch [:hide-bottom-sheet])
                    (rf/dispatch [:chat.ui/delete-message message-data
-                                 config/delete-message-undo-time-limit-ms]))
+                                 constants/delete-message-undo-time-limit-ms]))
        :label    (i18n/label :t/delete-for-everyone)
        :icon     :i/delete
        :id       :delete-for-all}])))

src/status_im/contexts/chat/messenger/messages/list/style.cljs

@@ -1,8 +1,6 @@
 (ns status-im.contexts.chat.messenger.messages.list.style
   (:require
     [quo.foundations.colors :as colors]
-    [quo.foundations.shadows :as shadows]
-    [quo.theme :as quo.theme]
     [react-native.reanimated :as reanimated]
     [status-im.contexts.chat.messenger.messages.constants :as messages.constants]))
 
@@ -25,12 +23,10 @@
   [bottom theme top-margin]
   (reanimated/apply-animations-to-style
    {:bottom bottom}
-   (merge
-    (shadows/get 2 (quo.theme/get-theme) :inverted)
-    {:background-color   (colors/theme-colors colors/white colors/neutral-95 theme)
-     :padding-horizontal 20
-     :border-radius      20
-     :margin-top         top-margin})))
+   {:background-color   (colors/theme-colors colors/white colors/neutral-95 theme)
+    :padding-horizontal 20
+    :border-radius      20
+    :margin-top         top-margin}))
 
 (defn header-image
   [scale top left theme]

src/status_im/contexts/chat/messenger/messages/list/view.cljs

@@ -1,6 +1,5 @@
 (ns status-im.contexts.chat.messenger.messages.list.view
   (:require
-    [clojure.string :as string]
     [legacy.status-im.ui.screens.chat.group :as chat.group]
     [oops.core :as oops]
     [quo.core :as quo]
@@ -113,24 +112,19 @@
     [rn/view {:style {:height height}}]))
 
 (defn list-footer-avatar
-  [{:keys [distance-from-list-top display-name online? profile-picture theme group-chat color
-           emoji chat-type chat-name last-message]}]
-  (let [scale              (reanimated/interpolate
-                            distance-from-list-top
-                            [0 (if (seq last-message) messages.constants/header-container-top-margin 0)]
-                            [1 0.4]
-                            messages.constants/default-extrapolation-option)
-        top                (reanimated/interpolate
-                            distance-from-list-top
-                            [0 (if (seq last-message) messages.constants/header-container-top-margin 0)]
-                            [-44 -12]
-                            messages.constants/default-extrapolation-option)
-        left               (reanimated/interpolate
-                            distance-from-list-top
-                            [0 (if (seq last-message) messages.constants/header-container-top-margin 0)]
-                            [16 -8]
-                            messages.constants/default-extrapolation-option)
-        community-channel? (= chat-type constants/community-chat-type)]
+  [{:keys [distance-from-list-top display-name online? profile-picture theme group-chat color]}]
+  (let [scale (reanimated/interpolate distance-from-list-top
+                                      [0 messages.constants/header-container-top-margin]
+                                      [1 0.4]
+                                      messages.constants/default-extrapolation-option)
+        top   (reanimated/interpolate distance-from-list-top
+                                      [0 messages.constants/header-container-top-margin]
+                                      [-44 -12]
+                                      messages.constants/default-extrapolation-option)
+        left  (reanimated/interpolate distance-from-list-top
+                                      [0 messages.constants/header-container-top-margin]
+                                      [16 -8]
+                                      messages.constants/default-extrapolation-option)]
     [reanimated/view
      {:style (style/header-image scale top left theme)}
      (if group-chat
@@ -138,10 +132,7 @@
         {:customization-color color
          :size                :size-80
          :picture             profile-picture
-         :emoji               (when (and (not (string/blank? emoji))
-                                         community-channel?)
-                                (string/trim emoji))
-         :chat-name           chat-name}]
+         :override-theme      :dark}]
        [quo/user-avatar
         {:full-name       display-name
          :online?         online?
@@ -149,17 +140,15 @@
          :size            :big}])]))
 
 (defn chat-display-name
-  [{:keys [distance-from-list-top display-name contact theme last-message]}]
-  (let [top  (reanimated/interpolate
-              distance-from-list-top
-              [0 (if (seq last-message) messages.constants/header-container-top-margin 0)]
-              [0 -35]
-              messages.constants/default-extrapolation-option)
-        left (reanimated/interpolate
-              distance-from-list-top
-              [0 (if (seq last-message) messages.constants/header-container-top-margin 0)]
-              [0 40]
-              messages.constants/default-extrapolation-option)]
+  [{:keys [distance-from-list-top display-name contact theme]}]
+  (let [top  (reanimated/interpolate distance-from-list-top
+                                     [0 messages.constants/header-container-top-margin]
+                                     [0 -35]
+                                     messages.constants/default-extrapolation-option)
+        left (reanimated/interpolate distance-from-list-top
+                                     [0 messages.constants/header-container-top-margin]
+                                     [0 40]
+                                     messages.constants/default-extrapolation-option)]
     [reanimated/view
      {:style (style/user-name-container top left)}
      [rn/view
@@ -206,55 +195,54 @@
                                                                          muted?)))}]}]))
 
 (defn bio-and-actions
-  [{:keys [distance-from-list-top bio chat-id customization-color last-message description]}]
-  (let [has-bio (seq (or bio description))
+  [{:keys [distance-from-list-top bio chat-id customization-color]}]
+  (let [has-bio (seq bio)
         top     (reanimated/interpolate
                  distance-from-list-top
-                 [0 (if (seq last-message) messages.constants/header-container-top-margin 0)]
+                 [0 messages.constants/header-container-top-margin]
                  [(if has-bio 8 16) (if has-bio -28 -20)]
                  messages.constants/default-extrapolation-option)]
     [reanimated/view
      {:style (style/bio-and-actions top)}
      (when has-bio
-       [quo/text (or bio description)])
+       [quo/text bio])
      [actions chat-id customization-color]]))
 
 (defn footer-component
   [{:keys [chat distance-from-list-top theme customization-color]}]
   (let [{:keys [chat-id chat-name emoji chat-type
-                group-chat color description
-                last-message]} chat
-        display-name           (cond
-                                 (= chat-type constants/one-to-one-chat-type)
-                                 (first (rf/sub [:contacts/contact-two-names-by-identity chat-id]))
-                                 (= chat-type constants/community-chat-type)
-                                 (str "# " chat-name)
-                                 :else (str emoji chat-name))
-        {:keys [bio]}          (rf/sub [:contacts/contact-by-identity chat-id])
-        online?                (rf/sub [:visibility-status-updates/online? chat-id])
-        contact                (when-not group-chat
-                                 (rf/sub [:contacts/contact-by-address chat-id]))
-        photo-path             (rf/sub [:chats/photo-path chat-id])
-        top-margin             (+ (safe-area/get-top)
-                                  messages.constants/top-bar-height
-                                  messages.constants/header-container-top-margin
-                                  32)
-        background-color       (colors/theme-colors
-                                (colors/resolve-color customization-color theme 20)
-                                (colors/resolve-color customization-color theme 40)
-                                theme)
-        bottom                 (reanimated/interpolate
-                                distance-from-list-top
-                                [0 messages.constants/header-container-top-margin]
-                                [32 -4]
-                                messages.constants/default-extrapolation-option)
-        background-opacity     (reanimated/interpolate
-                                distance-from-list-top
-                                [messages.constants/header-container-top-margin
-                                 (+ messages.constants/header-animation-distance
-                                    messages.constants/header-container-top-margin)]
-                                [1 0]
-                                messages.constants/default-extrapolation-option)]
+                group-chat color]} chat
+        display-name               (cond
+                                     (= chat-type constants/one-to-one-chat-type)
+                                     (first (rf/sub [:contacts/contact-two-names-by-identity chat-id]))
+                                     (= chat-type constants/community-chat-type)
+                                     (str (when emoji (str emoji " ")) "# " chat-name)
+                                     :else (str emoji chat-name))
+        {:keys [bio]}              (rf/sub [:contacts/contact-by-identity chat-id])
+        online?                    (rf/sub [:visibility-status-updates/online? chat-id])
+        contact                    (when-not group-chat
+                                     (rf/sub [:contacts/contact-by-address chat-id]))
+        photo-path                 (rf/sub [:chats/photo-path chat-id])
+        top-margin                 (+ (safe-area/get-top)
+                                      messages.constants/top-bar-height
+                                      messages.constants/header-container-top-margin
+                                      32)
+        background-color           (colors/theme-colors
+                                    (colors/resolve-color customization-color theme 20)
+                                    (colors/resolve-color customization-color theme 40)
+                                    theme)
+        bottom                     (reanimated/interpolate
+                                    distance-from-list-top
+                                    [0 messages.constants/header-container-top-margin]
+                                    [32 -4]
+                                    messages.constants/default-extrapolation-option)
+        background-opacity         (reanimated/interpolate
+                                    distance-from-list-top
+                                    [messages.constants/header-container-top-margin
+                                     (+ messages.constants/header-animation-distance
+                                        messages.constants/header-container-top-margin)]
+                                    [1 0]
+                                    messages.constants/default-extrapolation-option)]
     [:<>
      [reanimated/view
       {:style (style/background-container background-color background-opacity top-margin)}]
@@ -266,25 +254,18 @@
         :theme                  theme
         :profile-picture        photo-path
         :group-chat             group-chat
-        :color                  color
-        :emoji                  emoji
-        :chat-type              chat-type
-        :chat-name              chat-name
-        :last-message           last-message}]
+        :color                  color}]
       [chat-display-name
        {:distance-from-list-top distance-from-list-top
         :display-name           display-name
         :theme                  theme
         :contact                contact
-        :group-chat             group-chat
-        :last-message           last-message}]
+        :group-chat             group-chat}]
       [bio-and-actions
        {:distance-from-list-top distance-from-list-top
         :bio                    bio
         :chat-id                chat-id
-        :customization-color    customization-color
-        :description            description
-        :last-message           last-message}]]]))
+        :customization-color    customization-color}]]]))
 
 (defn list-footer
   [props]

src/status_im/contexts/chat/messenger/messages/navigation/view.cljs

@@ -1,6 +1,5 @@
 (ns status-im.contexts.chat.messenger.messages.navigation.view
   (:require
-    [clojure.string :as string]
     [quo.core :as quo]
     [quo.foundations.colors :as colors]
     [re-frame.db]
@@ -29,7 +28,7 @@
                                         [:contacts/contact-two-names-by-identity
                                          chat-id]))
                                 (= chat-type constants/community-chat-type)
-                                (str "# " chat-name)
+                                (str (when emoji (str emoji " ")) "# " chat-name)
                                 :else (str emoji chat-name))
         online?               (when-not group-chat (rf/sub [:visibility-status-updates/online? chat-id]))
         photo-path            (when-not group-chat (rf/sub [:chats/photo-path chat-id]))
@@ -54,10 +53,7 @@
         {:customization-color color
          :size                :size-32
          :picture             photo-path
-         :override-theme      :dark
-         :emoji               (when-not (string/blank? emoji)
-                                (string/trim emoji))
-         :chat-name           chat-name}]
+         :override-theme      :dark}]
        [quo/user-avatar
         {:full-name       display-name
          :online?         online?
@@ -115,29 +111,27 @@
 
 (defn view
   [{:keys [distance-from-list-top chat-screen-layout-calculations-complete?]}]
-  (let [{:keys [chat-id chat-type last-message]
-         :as   chat}               (rf/sub [:chats/current-chat-chat-view])
-        all-loaded?                (reanimated/use-shared-value false)
-        all-loaded-sub             (rf/sub [:chats/all-loaded? chat-id])
-        top-insets                 (safe-area/get-top)
-        top-bar-height             messages.constants/top-bar-height
-        navigation-view-height     (+ top-bar-height top-insets)
-        navigation-buttons-opacity (worklets/navigation-buttons-complete-opacity
-                                    chat-screen-layout-calculations-complete?)
-        reached-threshold?         (messages.worklets/use-messages-scrolled-to-threshold
-                                    distance-from-list-top
-                                    top-bar-height)
-        button-background          (if reached-threshold? :photo :blur)]
+  (let [{:keys [chat-id chat-type] :as chat} (rf/sub [:chats/current-chat-chat-view])
+        all-loaded?                          (reanimated/use-shared-value false)
+        all-loaded-sub                       (rf/sub [:chats/all-loaded? chat-id])
+        top-insets                           (safe-area/get-top)
+        top-bar-height                       messages.constants/top-bar-height
+        navigation-view-height               (+ top-bar-height top-insets)
+        navigation-buttons-opacity           (worklets/navigation-buttons-complete-opacity
+                                              chat-screen-layout-calculations-complete?)
+        reached-threshold?                   (messages.worklets/use-messages-scrolled-to-threshold
+                                              distance-from-list-top
+                                              top-bar-height)
+        button-background                    (if reached-threshold? :photo :blur)]
     (rn/use-effect (fn [] (reanimated/set-shared-value all-loaded? all-loaded-sub))
                    [all-loaded-sub])
     [rn/view
      {:style (style/navigation-view navigation-view-height messages.constants/pinned-banner-height)}
-     (when (seq last-message)
-       [animated-background-and-pinned-banner
-        {:chat-id                chat-id
-         :navigation-view-height navigation-view-height
-         :distance-from-list-top distance-from-list-top
-         :all-loaded?            all-loaded?}])
+     [animated-background-and-pinned-banner
+      {:chat-id                chat-id
+       :navigation-view-height navigation-view-height
+       :distance-from-list-top distance-from-list-top
+       :all-loaded?            all-loaded?}]
      [rn/view {:style (style/header-container top-insets top-bar-height)}
       [reanimated/view {:style (style/button-animation-container navigation-buttons-opacity)}
        [quo/button

src/status_im/contexts/chat/messenger/messages/pin/events.cljs

@@ -130,9 +130,6 @@
   [cofx chat-id]
   (navigation/show-bottom-sheet
    cofx
-   {:padding-bottom-override 21
-    :content                 (fn [] [pinned-messages-menu/view
-                                     {:chat-id                     chat-id
-                                      :disable-message-long-press? (not= :chat
-                                                                         (get-in cofx
-                                                                                 [:db :view-id]))}])}))
+   {:content (fn [] [pinned-messages-menu/view
+                     {:chat-id                     chat-id
+                      :disable-message-long-press? (not= :chat (get-in cofx [:db :view-id]))}])}))

src/status_im/contexts/chat/messenger/photo_selector/album_selector/style.cljs

@@ -31,5 +31,5 @@
 
 (def divider
   {:padding-horizontal 20
-   :margin-top         12
+   :margin-top         16
    :margin-bottom      8})

src/status_im/contexts/chat/messenger/photo_selector/album_selector/view.cljs

@@ -53,8 +53,7 @@
   [{:keys [title]}]
   (when-not (= title no-title)
     [quo/divider-label
-     {:container-style style/divider
-      :tight?          false}
+     {:container-style style/divider}
      title]))
 
 (defn key-fn

src/status_im/contexts/chat/messenger/photo_selector/style.cljs

@@ -7,7 +7,7 @@
   [bottom-inset]
   {:left     0
    :right    0
-   :height   (+ bottom-inset (if platform/ios? 51 85))
+   :height   (+ bottom-inset (if platform/ios? 65 85))
    :position :absolute
    :bottom   0})
 

src/status_im/contexts/communities/actions/addresses_for_permissions/events.cljs

@@ -73,25 +73,19 @@
 
 (defn check-permissions-to-join-for-selection
   [{:keys [db]} [community-id addresses]]
-  (let [request-id (rand-int 10000000)]
-    (if (empty? addresses)
-      ;; When there are no addresses we can't just check permissions, otherwise
-      ;; status-go will consider all possible addresses and the user will see the
-      ;; incorrect highest permission role.
-      {:db (update db :communities/permissions-checks-for-selection dissoc community-id)}
-      {:db (update-in db
-                      [:communities/permissions-checks-for-selection community-id]
-                      assoc
-                      :checking?         true
-                      :latest-request-id request-id)
-       :fx [[:json-rpc/call
-             [{:method     :wakuext_checkPermissionsToJoinCommunity
-               :params     [{:communityId community-id :addresses addresses}]
-               :id         request-id
-               :on-success [:communities/check-permissions-to-join-during-selection-success
-                            community-id]
-               :on-error   [:communities/check-permissions-to-join-during-selection-failure
-                            community-id addresses]}]]]})))
+  (if (empty? addresses)
+    ;; When there are no addresses we can't just check permissions, otherwise
+    ;; status-go will consider all possible addresses and the user will see the
+    ;; incorrect highest permission role.
+    {:db (update db :communities/permissions-checks-for-selection dissoc community-id)}
+    {:db (assoc-in db [:communities/permissions-checks-for-selection community-id :checking?] true)
+     :fx [[:json-rpc/call
+           [{:method     :wakuext_checkPermissionsToJoinCommunity
+             :params     [{:communityId community-id :addresses addresses}]
+             :on-success [:communities/check-permissions-to-join-during-selection-success
+                          community-id]
+             :on-error   [:communities/check-permissions-to-join-during-selection-failure
+                          community-id addresses]}]]]}))
 
 ;; This event should be used to check permissions temporarily because it won't
 ;; mutate the state `:communities/permissions-check` (used by many other
@@ -100,14 +94,12 @@
  check-permissions-to-join-for-selection)
 
 (rf/reg-event-fx :communities/check-permissions-to-join-during-selection-success
- (fn [{:keys [db]} [community-id result request-id]]
-   (when (= (get-in db [:communities/permissions-checks-for-selection community-id :latest-request-id])
-            request-id)
-     {:db (assoc-in db
-           [:communities/permissions-checks-for-selection community-id]
-           {:checking?                  false
-            :based-on-client-selection? true
-            :check                      result})})))
+ (fn [{:keys [db]} [community-id result]]
+   {:db (assoc-in db
+         [:communities/permissions-checks-for-selection community-id]
+         {:checking?                  false
+          :based-on-client-selection? true
+          :check                      result})}))
 
 (rf/reg-event-fx :communities/check-permissions-to-join-during-selection-failure
  (fn [_ [community-id addresses error]]

src/status_im/contexts/communities/actions/home_plus/view.cljs

@@ -7,15 +7,22 @@
   []
   [quo/action-drawer
    [[{:icon                :i/communities
-      :accessibility-label :create-closed-community
-      :label               "Create closed community (only for testing)"
-      :on-press            #(rf/dispatch [:fast-create-community/create-closed-community])}
-     {:icon                :i/communities
       :accessibility-label :create-open-community
-      :label               "Create open community (only for testing)"
-      :on-press            #(rf/dispatch [:fast-create-community/create-open-community])}
+      :label               "Create Open community (only for testing)"
+      :on-press            #(rf/dispatch [:e2e/create-open-community])}
+     {:icon                :i/communities
+      :accessibility-label :create-closed-community
+      :label               "Create Closed community (only for testing)"
+      :on-press            #(rf/dispatch [:e2e/create-closed-community])}
+     {:icon                :i/communities
+      :accessibility-label :create-admin-and-member-community
+      :label               "Create Admin and Member community (only for testing)"
+      :on-press            #(rf/dispatch [:e2e/create-admin-and-member-community])}
+     {:icon                :i/communities
+      :accessibility-label :create-snt-admin-community
+      :label               "Create SNT Admin community (only for testing)"
+      :on-press            #(rf/dispatch [:e2e/create-snt-admin-community])}
      {:icon                :i/communities
       :accessibility-label :create-token-gated-community
-      :label               "Create token-gated community (only for testing)"
-      :on-press            #(rf/dispatch
-                             [:fast-create-community/create-token-gated-community])}]]])
+      :label               "Create Token Gated community (only for testing)"
+      :on-press            #(rf/dispatch [:e2e/create-token-gated-community])}]]])

src/status_im/contexts/communities/actions/invite_contacts/style.cljs

@@ -1,48 +0,0 @@
-(ns status-im.contexts.communities.actions.invite-contacts.style
-  (:require
-    [quo.foundations.colors :as colors]
-    [react-native.safe-area :as safe-area]))
-
-(def contact-selection-heading
-  {:flex-direction  :row
-   :justify-content :space-between
-   :align-items     :flex-end
-   :margin-top      24
-   :margin-bottom   16})
-
-(def chat-button
-  {:position :absolute
-   :bottom   (safe-area/get-bottom)
-   :left     20
-   :right    20})
-
-(defn no-contacts
-  []
-  {:margin-bottom   (+ 96 (safe-area/get-bottom))
-   :flex            1
-   :justify-content :center
-   :align-items     :center})
-
-(def context-tag
-  {:align-self    :flex-start
-   :margin-top    -8
-   :margin-bottom 12})
-
-(def no-contacts-text
-  {:margin-bottom 2
-   :margin-top    12})
-
-(def no-contacts-button-container
-  {:margin-top    20
-   :margin-bottom 12})
-
-(defn section-list-container-style
-  [theme]
-  {:padding-bottom   70
-   :background-color (colors/theme-colors colors/white
-                                          colors/neutral-95
-                                          theme)})
-
-(defn invite-to-community-text
-  [theme]
-  {:color (colors/theme-colors colors/neutral-100 colors/white theme)})

src/status_im/contexts/communities/actions/invite_contacts/view.cljs

@@ -1,141 +0,0 @@
-(ns status-im.contexts.communities.actions.invite-contacts.view
-  (:require
-    [quo.core :as quo]
-    [quo.foundations.resources :as resources]
-    [quo.theme]
-    [react-native.core :as rn]
-    [react-native.gesture :as gesture]
-    [react-native.share :as share]
-    [status-im.common.contact-list-item.view :as contact-list-item]
-    [status-im.common.contact-list.view :as contact-list]
-    [status-im.contexts.communities.actions.invite-contacts.style :as style]
-    [utils.i18n :as i18n]
-    [utils.re-frame :as rf]))
-
-(defn- no-contacts-view
-  [{:keys [theme id]}]
-  (let [customization-color             (rf/sub [:profile/customization-color])
-        {:keys [universal-profile-url]} (rf/sub [:profile/profile])
-        on-press-share-community        (rn/use-callback
-                                         #(rf/dispatch [:communities/share-community-url-with-data
-                                                        id]))
-        on-press-share-profile          (rn/use-callback #(share/open {:url universal-profile-url})
-                                                         [universal-profile-url])]
-    [rn/view
-     {:style (style/no-contacts)}
-     [rn/image {:source (resources/get-themed-image :no-contacts-to-chat theme)}]
-     [quo/text
-      {:weight :semi-bold
-       :size   :paragraph-1
-       :style  style/no-contacts-text}
-      (i18n/label :t/you-have-no-contacts)]
-     [quo/text
-      {:weight :regular
-       :size   :paragraph-2}
-      (i18n/label :t/dont-yell-at-me)]
-     [quo/button
-      {:customization-color customization-color
-       :theme               theme
-       :type                :primary
-       :size                32
-       :container-style     style/no-contacts-button-container
-       :on-press            on-press-share-community}
-      (i18n/label :t/send-community-link)]
-     [quo/button
-      {:customization-color customization-color
-       :theme               theme
-       :type                :grey
-       :size                32
-       :on-press            on-press-share-profile}
-      (i18n/label :t/invite-friends-to-status)]]))
-
-(defn- contact-item
-  [{:keys [public-key]
-    :as   item}]
-  (let [user-selected?         (rf/sub [:is-contact-selected? public-key])
-        {:keys [id]}           (rf/sub [:get-screen-params])
-        community-members-keys (set (keys (rf/sub [:communities/community-members id])))
-        community-member?      (boolean (community-members-keys public-key))
-        on-toggle              (fn []
-                                 (when-not community-member?
-                                   (if user-selected?
-                                     (rf/dispatch [:deselect-contact public-key])
-                                     (rf/dispatch [:select-contact public-key]))))]
-    [contact-list-item/contact-list-item
-     {:on-press                on-toggle
-      :allow-multiple-presses? true
-      :accessory               {:type      :checkbox
-                                :disabled? community-member?
-                                :checked?  (or community-member? user-selected?)
-                                :on-check  on-toggle}
-      :disabled?               community-member?}
-     item]))
-
-(defn view-internal
-  [{:keys [theme]}]
-  (fn []
-    (rn/use-unmount #(rf/dispatch [:group-chat/clear-contacts]))
-    (let [customization-color     (rf/sub [:profile/customization-color])
-          {:keys [id]}            (rf/sub [:get-screen-params])
-          contacts                (rf/sub [:contacts/filtered-active-sections])
-          selected                (rf/sub [:group/selected-contacts])
-          {:keys [name images]}   (rf/sub [:communities/community id])
-          selected-contacts-count (count selected)
-          on-press                (fn []
-                                    (rf/dispatch [:communities/share-community-confirmation-pressed
-                                                  selected id])
-                                    (rf/dispatch [:navigate-back])
-                                    (rf/dispatch [:toasts/upsert
-                                                  {:type  :positive
-                                                   :theme theme
-                                                   :text  (if (= 1 selected-contacts-count)
-                                                            (i18n/label :t/one-user-was-invited)
-                                                            (i18n/label
-                                                             :t/n-users-were-invited
-                                                             {:count selected-contacts-count}))}]))
-          {window-height :height} (rn/get-window)]
-      [rn/view {:style {:flex 1}}
-       [rn/view {:style {:padding-horizontal 20}}
-        [quo/button
-         {:type       :grey
-          :size       32
-          :icon-only? true
-          :on-press   #(rf/dispatch [:navigate-back])}
-         :i/close]
-        [rn/view {:style style/contact-selection-heading}
-         [quo/text
-          {:weight :semi-bold
-           :size   :heading-1
-           :style  (style/invite-to-community-text theme)}
-          (i18n/label :t/invite-to-community)]]
-        [quo/context-tag
-         {:type            :community
-          :size            24
-          :community-logo  (:thumbnail images)
-          :community-name  name
-          :container-style style/context-tag}]]
-       (if (empty? contacts)
-         [no-contacts-view
-          {:theme theme
-           :id    id}]
-         [:<>
-          [gesture/section-list
-           {:key-fn                         :public-key
-            :sticky-section-headers-enabled true
-            :sections                       contacts
-            :render-section-header-fn       contact-list/contacts-section-header
-            :content-container-style        (style/section-list-container-style theme)
-            :render-fn                      contact-item
-            :style                          {:height window-height}}]
-          (when (pos? selected-contacts-count)
-            [quo/button
-             {:type                :primary
-              :accessibility-label :next-button
-              :customization-color customization-color
-              :container-style     style/chat-button
-              :on-press            on-press}
-             (if (= 1 selected-contacts-count)
-               (i18n/label :t/invite-1-user)
-               (i18n/label :t/invite-n-users {:count selected-contacts-count}))])])])))
-
-(def view (quo.theme/with-theme view-internal))

src/status_im/contexts/communities/actions/permissions_sheet/style.cljs

@@ -0,0 +1,5 @@
+(ns status-im.contexts.communities.actions.permissions-sheet.style)
+
+(def container
+  {:flex               1
+   :padding-horizontal 20})

src/status_im/contexts/communities/actions/permissions_sheet/view.cljs

@@ -1,12 +1,38 @@
 (ns status-im.contexts.communities.actions.permissions-sheet.view
   (:require
     [quo.core :as quo]
+    [react-native.core :as rn]
     [react-native.gesture :as gesture]
+    [status-im.contexts.communities.actions.permissions-sheet.style :as style]
+    [status-im.contexts.communities.utils :as communities.utils]
+    [utils.i18n :as i18n]
     [utils.re-frame :as rf]))
 
+(defn- role-text
+  [role]
+  (i18n/label
+   (communities.utils/role->translation-key role
+                                            :t/token-master)))
+
+(defn- permission-view
+  [{:keys [tokens role satisfied?]}]
+  (when (seq tokens)
+    ^{:key role}
+    [rn/view {:style {:margin-bottom 20}}
+     [quo/text {:weight :medium}
+      (if satisfied?
+        (i18n/label :t/you-eligible-to-join-as {:role (role-text role)})
+        (i18n/label :t/you-not-eligible-to-join-as {:role (role-text role)}))]
+     [quo/text {:size :paragraph-2 :style {:padding-bottom 8}}
+      (if satisfied?
+        (i18n/label :t/you-hodl)
+        (i18n/label :t/you-must-hold))]
+     [quo/token-requirement-list
+      {:tokens          tokens
+       :container-style {:padding-horizontal 20}}]]))
+
 (defn view
   [id]
   (let [permissions (rf/sub [:community/token-permissions id])]
-    [gesture/scroll-view
-     [quo/community-detail-token-gating {:permissions permissions}]
-    ]))
+    [gesture/scroll-view {:style style/container}
+     (map permission-view permissions)]))

src/status_im/contexts/communities/events.cljs

@@ -1,8 +1,11 @@
 (ns status-im.contexts.communities.events
   (:require
     [clojure.string :as string]
+    [legacy.status-im.data-store.chats :as data-store.chats]
     [legacy.status-im.data-store.communities :as data-store.communities]
     [legacy.status-im.mailserver.core :as mailserver]
+    [react-native.platform :as platform]
+    [react-native.share :as share]
     [schema.core :as schema]
     [status-im.constants :as constants]
     [status-im.contexts.chat.messenger.messages.link-preview.events :as link-preview.events]
@@ -11,9 +14,9 @@
     status-im.contexts.communities.actions.airdrop-addresses.events
     status-im.contexts.communities.actions.community-options.events
     status-im.contexts.communities.actions.leave.events
-    [status-im.contexts.communities.utils :as utils]
     [status-im.navigation.events :as navigation]
     [taoensso.timbre :as log]
+    [utils.i18n :as i18n]
     [utils.re-frame :as rf]))
 
 (defn handle-community
@@ -149,83 +152,43 @@
                      :on-success #(rf/dispatch [:communities/fetched-collapsed-categories-success %])
                      :on-error   #(log/error "failed to fetch collapsed community categories" %)}]}))
 
-(defn update-previous-permission-addresses
-  [{:keys [db]} [community-id]]
-  (when community-id
-    (let [accounts                      (utils/sorted-non-watch-only-accounts db)
-          selected-permission-addresses (get-in db
-                                                [:communities community-id
-                                                 :selected-permission-addresses])
-          selected-accounts             (filter #(contains? selected-permission-addresses (:address %))
-                                                accounts)
-          current-airdrop-address       (get-in db [:communities community-id :airdrop-address])
-          share-all-addresses?          (get-in db [:communities community-id :share-all-addresses?])]
-      {:db (update-in db
-                      [:communities community-id]
-                      assoc
-                      :previous-share-all-addresses? share-all-addresses?
-                      :previous-permission-addresses selected-permission-addresses
-                      :airdrop-address               (if (contains? selected-permission-addresses
-                                                                    current-airdrop-address)
-                                                       current-airdrop-address
-                                                       (:address (first selected-accounts))))})))
+(rf/reg-event-fx :communities/get-community-channel-share-data
+ (fn [_ [chat-id on-success]]
+   (let [{:keys [community-id channel-id]} (data-store.chats/decode-chat-id chat-id)]
+     {:json-rpc/call
+      [{:method     "wakuext_shareCommunityChannelURLWithData"
+        :params     [{:CommunityID community-id :ChannelID channel-id}]
+        :on-success on-success
+        :on-error   (fn [err]
+                      (log/error "failed to retrieve community channel url with data"
+                                 {:error   err
+                                  :chat-id chat-id
+                                  :event   :communities/get-community-channel-share-data}))}]})))
 
-(rf/reg-event-fx :communities/update-previous-permission-addresses
- update-previous-permission-addresses)
+(rf/reg-event-fx :communities/share-community-channel-url-with-data
+ (fn [_ [chat-id]]
+   (let [title      (i18n/label :t/channel-on-status)
+         on-success (fn [url]
+                      (share/open
+                       (if platform/ios?
+                         {:activityItemSources [{:placeholderItem {:type    "text"
+                                                                   :content title}
+                                                 :item            {:default {:type    "url"
+                                                                             :content url}}
+                                                 :linkMetadata    {:title title}}]}
+                         {:title     title
+                          :subject   title
+                          :message   url
+                          :url       url
+                          :isNewTask true})))]
+     {:fx [[:dispatch [:communities/get-community-channel-share-data chat-id on-success]]]})))
 
-(defn toggle-selected-permission-address
-  [{:keys [db]} [address community-id]]
-  (let [selected-permission-addresses
-        (get-in db [:communities community-id :selected-permission-addresses])
-        updated-selected-permission-addresses
-        (if (contains? selected-permission-addresses address)
-          (disj selected-permission-addresses address)
-          (conj selected-permission-addresses address))]
-    {:db (assoc-in db
-          [:communities community-id :selected-permission-addresses]
-          updated-selected-permission-addresses)
-     :fx [(when community-id
-            [:dispatch
-             [:communities/check-permissions-to-join-community community-id
-              updated-selected-permission-addresses :based-on-client-selection]])]}))
-
-(rf/reg-event-fx :communities/toggle-selected-permission-address
- toggle-selected-permission-address)
-
-(defn toggle-share-all-addresses
-  [{:keys [db]} [community-id]]
-  (let [share-all-addresses?      (get-in db [:communities community-id :share-all-addresses?])
-        next-share-all-addresses? (not share-all-addresses?)
-        accounts                  (utils/sorted-non-watch-only-accounts db)
-        addresses                 (set (map :address accounts))]
-    {:db (update-in db
-                    [:communities community-id]
-                    assoc
-                    :share-all-addresses?          next-share-all-addresses?
-                    :selected-permission-addresses addresses)
-     :fx [(when (and community-id next-share-all-addresses?)
-            [:dispatch
-             [:communities/check-permissions-to-join-community community-id
-              addresses :based-on-client-selection]])]}))
-
-(rf/reg-event-fx :communities/toggle-share-all-addresses
- toggle-share-all-addresses)
-
-(rf/reg-event-fx :communities/reset-selected-permission-addresses
- (fn [{:keys [db]} [community-id]]
-   (when community-id
-     {:db (update-in db
-                     [:communities community-id]
-                     assoc
-                     :selected-permission-addresses
-                     (get-in db [:communities community-id :previous-permission-addresses])
-                     :share-all-addresses?
-                     (get-in db [:communities community-id :previous-share-all-addresses?]))
-      :fx [[:dispatch [:communities/check-permissions-to-join-community community-id]]]})))
-
-(rf/reg-event-fx :communities/set-airdrop-address
- (fn [{:keys [db]} [address community-id]]
-   {:db (assoc-in db [:communities community-id :airdrop-address] address)}))
+(rf/reg-event-fx :communities/share-community-channel-url-qr-code
+ (fn [_ [chat-id]]
+   (let [on-success #(rf/dispatch [:open-modal :share-community-channel
+                                   {:chat-id chat-id
+                                    :url     %}])]
+     {:fx [[:dispatch [:communities/get-community-channel-share-data chat-id on-success]]]})))
 
 (defn community-fetched
   [{:keys [db]} [community-id community]]
@@ -325,8 +288,8 @@
 
 (rf/reg-event-fx :chat.ui/spectate-community spectate-community)
 
-(defn navigate-to-serialized-community
-  [community-id]
+(rf/defn navigate-to-serialized-community
+  [_ {:keys [community-id]}]
   {:serialization/deserialize-and-compress-key
    {:serialized-key community-id
     :on-success     #(rf/dispatch [:communities/navigate-to-community-overview %])
@@ -334,30 +297,27 @@
                                  :error        %
                                  :community-id community-id})}})
 
-(rf/defn navigate-to-community-overview
-  [{:keys [db] :as cofx} [community-id]]
-  (let [current-view-id (:view-id db)]
-    (if (string/starts-with? community-id constants/serialization-key)
-      (navigate-to-serialized-community community-id)
-      (rf/merge
-       cofx
-       {:fx [[:dispatch
-              [:communities/fetch-community
-               {:community-id           community-id
-                :update-last-opened-at? true}]]
-             [:dispatch [:navigate-to :community-overview community-id]]
-             (when (get-in db [:communities community-id :joined])
-               [:dispatch
-                [:activity-center.notifications/dismiss-community-overview community-id]])]}
-       (when-not (or (= current-view-id :shell) (= current-view-id :communities-stack))
-         (navigation/pop-to-root :shell-stack))))))
+(rf/reg-event-fx :communities/navigate-to-community-overview
+ (fn [{:keys [db] :as cofx} [deserialized-key]]
+   (let [current-view-id (:view-id db)]
+     (if (string/starts-with? deserialized-key constants/serialization-key)
+       (navigate-to-serialized-community cofx deserialized-key)
+       (rf/merge
+        cofx
+        {:fx [[:dispatch
+               [:communities/fetch-community
+                {:community-id           deserialized-key
+                 :update-last-opened-at? true}]]
+              [:dispatch [:navigate-to :community-overview deserialized-key]]
+              (when (get-in db [:communities deserialized-key :joined])
+                [:dispatch
+                 [:activity-center.notifications/dismiss-community-overview deserialized-key]])]}
+        (when-not (or (= current-view-id :shell) (= current-view-id :communities-stack))
+          (navigation/pop-to-root :shell-stack)))))))
 
-(rf/reg-event-fx :communities/navigate-to-community-overview navigate-to-community-overview)
-
-(defn navigate-to-community-chat
-  [{:keys [db]} [chat-id pop-to-root? community-id]]
-  (let [community-id (or community-id (get-in db [:chats chat-id :community-id]))]
-    (merge
+(rf/reg-event-fx :communities/navigate-to-community-chat
+ (fn [{:keys [db]} [chat-id pop-to-root?]]
+   (let [{:keys [community-id]} (get-in db [:chats chat-id])]
      {:fx [(when community-id
              [:dispatch
               [:communities/fetch-community
@@ -365,11 +325,7 @@
                 :update-last-opened-at? true}]])
            (if pop-to-root?
              [:dispatch [:chat/pop-to-root-and-navigate-to-chat chat-id]]
-             [:dispatch [:chat/navigate-to-chat chat-id]])]}
-     (when-not (get-in db [:chats chat-id :community-id])
-       {:db (assoc-in db [:chats chat-id :community-id] community-id)}))))
-
-(rf/reg-event-fx :communities/navigate-to-community-chat navigate-to-community-chat)
+             [:dispatch [:chat/navigate-to-chat chat-id]])]})))
 
 (defn get-revealed-accounts
   [{:keys [db]} [community-id on-success]]

src/status_im/contexts/communities/overview/style.cljs

@@ -11,7 +11,7 @@
 (def community-tag-container
   {:padding-horizontal screen-horizontal-padding
    :margin-horizontal  (- screen-horizontal-padding)
-   :margin-bottom      16})
+   :margin-bottom      20})
 
 (def community-content-container
   {:padding-horizontal screen-horizontal-padding})
@@ -64,5 +64,4 @@
   {:border-radius 16
    :border-color  (colors/theme-colors colors/neutral-20 colors/neutral-80)
    :border-width  1
-   :padding-top   10
-   :margin-bottom 106})
+   :padding-top   10})

src/status_im/contexts/communities/overview/view.cljs

@@ -38,9 +38,8 @@
    {:keys [name emoji muted? id mentions-count unread-messages? on-press locked? color] :as chat}]
   (let [sheet-content      [actions/chat-actions
                             (assoc chat
-                                   :community-id community-id
-                                   :chat-type    constants/community-chat-type
-                                   :chat-id      (str community-id id))
+                                   :chat-type constants/community-chat-type
+                                   :chat-id   (str community-id id))
                             false]
         notification       (cond
                              muted?               :mute
@@ -162,7 +161,7 @@
            (i18n/label :t/you-eligible-to-join-as {:role highest-role-text})
            (i18n/label :t/you-not-eligible-to-join))]
         [info-button]]
-       [quo/text {:style {:padding-horizontal 12 :padding-bottom 6} :size :paragraph-2}
+       [quo/text {:style {:padding-horizontal 12 :padding-bottom 18} :size :paragraph-2}
         (if can-request-access?
           (i18n/label :t/you-hodl)
           (i18n/label :t/you-must-hold))]
@@ -176,7 +175,7 @@
                                 #(rf/dispatch [:open-modal :community-requests-to-join {:id id}]))
          :accessibility-label :join-community-button
          :customization-color color
-         :container-style     {:margin-horizontal 12 :margin-top 8 :margin-bottom 12}
+         :container-style     {:margin-horizontal 12 :margin-top 12 :margin-bottom 12}
          :disabled?           (not can-request-access?)
          :icon-left           (if can-request-access? :i/unlocked :i/locked)}
         (i18n/label :t/request-to-join)]])))

src/status_im/contexts/communities/sharing/events.cljs

@@ -1,101 +0,0 @@
-(ns status-im.contexts.communities.sharing.events
-  (:require [legacy.status-im.data-store.chats :as data-store.chats]
-            [react-native.platform :as platform]
-            [react-native.share :as share]
-            [taoensso.timbre :as log]
-            [utils.i18n :as i18n]
-            [utils.re-frame :as rf]))
-
-(rf/reg-event-fx :communities/invite-people-pressed
- (fn [{:keys [db]} [id]]
-   {:db (assoc db :communities/community-id-input id)
-    :fx [[:dispatch [:hide-bottom-sheet]]
-         [:dispatch [:open-modal :invite-people-community {:id id}]]]}))
-
-(rf/reg-event-fx :communities/share-community-pressed
- (fn [{:keys [db]} [id]]
-   {:db (assoc db :communities/community-id-input id)
-    :fx [[:dispatch [:hide-bottom-sheet]]
-         [:dispatch [:open-modal :legacy-invite-people-community {:id id}]]]}))
-
-(rf/reg-event-fx :communities/share-community-confirmation-pressed
- (fn [_ [users-public-keys community-id]]
-   {:fx [[:json-rpc/call
-          [{:method      "wakuext_shareCommunity"
-            :params      [{:communityId community-id
-                           :users       users-public-keys}]
-            :js-response true
-            :on-success  [:sanitize-messages-and-process-response]
-            :on-error    (fn [err]
-                           (log/error {:message      "failed to share community"
-                                       :community-id community-id
-                                       :err          err}))}]]]}))
-
-(rf/reg-event-fx :communities/share-community-channel-url-qr-code
- (fn [_ [chat-id]]
-   (let [on-success #(rf/dispatch [:open-modal :share-community-channel
-                                   {:chat-id chat-id
-                                    :url     %}])]
-     {:fx [[:dispatch [:communities/get-community-channel-share-data chat-id on-success]]]})))
-
-(rf/reg-event-fx :communities/share-community-channel-url-with-data
- (fn [_ [chat-id]]
-   (let [title      (i18n/label :t/channel-on-status)
-         on-success (fn [url]
-                      (rf/dispatch [:open-share
-                                    {:options (if platform/ios?
-                                                {:activityItemSources
-                                                 [{:placeholderItem {:type    :text
-                                                                     :content title}
-                                                   :item            {:default {:type    :url
-                                                                               :content url}}
-                                                   :linkMetadata    {:title title}}]}
-                                                {:title     title
-                                                 :subject   title
-                                                 :message   url
-                                                 :url       url
-                                                 :isNewTask true})}]))]
-     {:fx [[:dispatch [:communities/get-community-channel-share-data chat-id on-success]]]})))
-
-(rf/reg-event-fx :communities/get-community-channel-share-data
- (fn [_ [chat-id on-success]]
-   (let [{:keys [community-id channel-id]} (data-store.chats/decode-chat-id chat-id)]
-     {:json-rpc/call
-      [{:method     "wakuext_shareCommunityChannelURLWithData"
-        :params     [{:CommunityID community-id :ChannelID channel-id}]
-        :on-success on-success
-        :on-error   (fn [err]
-                      (log/error "failed to retrieve community channel url with data"
-                                 {:error   err
-                                  :chat-id chat-id
-                                  :event   :communities/get-community-channel-share-data}))}]})))
-
-(rf/reg-event-fx :communities/get-community-share-data
- (fn [_ [community-id on-success]]
-   {:json-rpc/call
-    [{:method     "wakuext_shareCommunityURLWithData"
-      :params     [community-id]
-      :on-success on-success
-      :on-error   (fn [err]
-                    (log/error "failed to retrieve community url with data"
-                               {:error        err
-                                :community-id community-id
-                                :event        :communities/get-community-share-data}))}]}))
-
-(rf/reg-event-fx :communities/share-community-channel-url-with-data
- (fn [_ [chat-id]]
-   (let [title      (i18n/label :t/channel-on-status)
-         on-success (fn [url]
-                      (share/open
-                       (if platform/ios?
-                         {:activityItemSources [{:placeholderItem {:type    "text"
-                                                                   :content title}
-                                                 :item            {:default {:type    "url"
-                                                                             :content url}}
-                                                 :linkMetadata    {:title title}}]}
-                         {:title     title
-                          :subject   title
-                          :message   url
-                          :url       url
-                          :isNewTask true})))]
-     {:fx [[:dispatch [:communities/get-community-channel-share-data chat-id on-success]]]})))

src/status_im/contexts/onboarding/new_to_status/view.cljs

@@ -49,13 +49,12 @@
                                  [:screen/onboarding.enter-seed-phrase
                                   :screen/onboarding.new-to-status]])}]
       [rn/view {:style style/space-between-suboptions}]
-      (when config/show-not-implemented-features?
-        [quo/small-option-card
-         {:variant  :icon
-          :title    (i18n/label :t/use-keycard)
-          :subtitle (i18n/label :t/use-keycard-subtitle)
-          :image    (resources/get-image :use-keycard)
-          :on-press #(js/alert "TODO: to be implemented")}])]]))
+      [quo/small-option-card
+       {:variant  :icon
+        :title    (i18n/label :t/use-keycard)
+        :subtitle (i18n/label :t/use-keycard-subtitle)
+        :image    (resources/get-image :use-keycard)
+        :on-press #(js/alert "TODO: to be implemented")}]]]))
 
 (defn getting-started-doc
   []

src/status_im/contexts/preview/quo/community/community_detail_token_gating.cljs

@@ -1,68 +0,0 @@
-(ns status-im.contexts.preview.quo.community.community-detail-token-gating
-  (:require [quo.core :as quo]
-            [reagent.core :as reagent]
-            [status-im.common.resources :as resources]
-            [status-im.contexts.preview.quo.preview :as preview]))
-
-(def descriptor
-  [{:key     :role
-    :type    :select
-    :options [{:key :one-role}
-              {:key :two-roles}
-              {:key :three-roles}
-              {:key :four-roles}]}])
-
-(def roles
-  {:member
-   {:role 2
-    :role-text "Member"
-    :satisfied? true
-    :tokens
-    [[{:symbol "ETH" :sufficient? true :collectible? false :loading? false :amount 0.8 :img-src nil}]
-     [{:symbol "ETH" :sufficient? false :collectible? false :loading? false :amount 1 :img-src nil}
-      {:symbol "STT" :sufficient? false :collectible? false :loading? false :amount 10 :img-src nil}]]}
-   :admin
-   {:role 1
-    :role-text "Admin"
-    :satisfied? true
-    :tokens
-    [[{:symbol "ETH" :sufficient? true :collectible? false :loading? false :amount 2 :img-src nil}]]}
-   :token-master
-   {:role 5
-    :role-text "Token Master"
-    :satisfied? true
-    :tokens
-    [[{:symbol       "TMANI"
-       :sufficient?  true
-       :collectible? true
-       :loading?     false
-       :amount       nil
-       :img-src      (resources/mock-images :collectible1)}]]}
-   :token-owner
-   {:role 6
-    :role-text "Token Owner"
-    :satisfied? true
-    :tokens
-    [[{:symbol       "TOANI"
-       :sufficient?  true
-       :collectible? true
-       :loading?     false
-       :amount       nil
-       :img-src      (resources/mock-images :collectible)}]]}})
-
-(def permissions
-  {:one-role    [(:member roles)]
-   :two-roles   [(:admin roles) (:member roles)]
-   :three-roles [(:token-master roles) (:admin roles) (:member roles)]
-   :four-roles  [(:token-owner roles) (:token-master roles) (:admin roles) (:member roles)]})
-
-(defn view
-  []
-  (let [state (reagent/atom {:role :one-role})]
-    (fn []
-      [preview/preview-container
-       {:state                 state
-        :descriptor            descriptor
-        :blur?                 (:blur? @state)
-        :show-blur-background? true}
-       [quo/community-detail-token-gating {:permissions ((:role @state) permissions)}]])))

src/status_im/contexts/preview/quo/main.cljs

@@ -39,8 +39,6 @@
      channel-actions]
     [status-im.contexts.preview.quo.community.community-card-view :as
      community-card]
-    [status-im.contexts.preview.quo.community.community-detail-token-gating :as
-     community-detail-token-gating]
     [status-im.contexts.preview.quo.community.community-membership-list-view
      :as community-membership-list-view]
     [status-im.contexts.preview.quo.community.community-stat :as community-stat]
@@ -262,8 +260,6 @@
                         :component color/view}]
    :community         [{:name      :community-card-view
                         :component community-card/view}
-                       {:name      :community-detail-token-gating
-                        :component community-detail-token-gating/view}
                        {:name      :community-membership-list-view
                         :component community-membership-list-view/view}
                        {:name      :community-stat

src/status_im/contexts/preview/quo/wallet/network_link.cljs

@@ -1,7 +1,6 @@
 (ns status-im.contexts.preview.quo.wallet.network-link
   (:require
     [quo.core :as quo]
-    [react-native.core :as rn]
     [reagent.core :as reagent]
     [status-im.contexts.preview.quo.preview :as preview]))
 
@@ -24,21 +23,17 @@
     :options networks}
    {:key     :destination
     :type    :select
-    :options networks}
-   {:key  :width
-    :type :number}])
+    :options networks}])
 
 (defn view
   []
   (let [state (reagent/atom {:shape       :linear
                              :source      :ethereum
-                             :destination :optimism
-                             :width       63})]
+                             :destination :optimism})]
     (fn []
       [preview/preview-container
        {:state                     state
         :descriptor                descriptor
         :component-container-style {:padding-top 40
                                     :align-items :center}}
-       [rn/view {:style {:width (max (:width @state) 63)}}
-        [quo/network-link @state]]])))
+       [quo/network-link @state]])))

src/status_im/contexts/profile/contact/actions/view.cljs

@@ -48,8 +48,7 @@
                             (fn []
                               (rf/dispatch [:universal-links/generate-profile-url
                                             {:public-key public-key
-                                             :on-success #(rf/dispatch [:open-share
-                                                                        {:options {:message %}}])}]))
+                                             :on-success #(rn/sharing {:message %})}]))
                             [public-key])
         on-remove-contact  (rn/use-callback
                             (fn []

src/status_im/contexts/profile/contact/share/view.cljs

@@ -1,5 +1,6 @@
 (ns status-im.contexts.profile.contact.share.view
-  (:require [quo.core :as quo]
+  (:require [legacy.status-im.ui.components.list-selection :as list-selection]
+            [quo.core :as quo]
             [react-native.core :as rn]
             [react-native.safe-area :as safe-area]
             [status-im.common.qr-codes.view :as qr-codes]
@@ -18,8 +19,7 @@
         abbreviated-url (rn/use-memo (fn []
                                        (address/get-abbreviated-profile-url universal-profile-url))
                                      [universal-profile-url])
-        on-share-press  (rn/use-callback #(rf/dispatch [:open-share
-                                                        {:options {:message universal-profile-url}}])
+        on-share-press  (rn/use-callback #(list-selection/open-share {:message universal-profile-url})
                                          [universal-profile-url])
         on-copy-press   (rn/use-callback (fn []
                                            (rf/dispatch [:share/copy-text-and-show-toast

src/status_im/contexts/profile/settings/list_items.cljs

@@ -34,7 +34,7 @@
     (when config/show-not-implemented-features?
       {:title       (i18n/label :t/dapps)
        :on-press    not-implemented/alert
-       :image-props :i/dapps
+       :image-props :i/placeholder
        :image       :icon
        :blur?       true
        :action      :arrow})

src/status_im/contexts/profile/settings/view.cljs

@@ -5,6 +5,7 @@
             [react-native.core :as rn]
             [react-native.reanimated :as reanimated]
             [react-native.safe-area :as safe-area]
+            [status-im.common.not-implemented :as not-implemented]
             [status-im.contexts.profile.settings.header.view :as settings.header]
             [status-im.contexts.profile.settings.list-items :as settings.items]
             [status-im.contexts.profile.settings.style :as style]
@@ -18,7 +19,7 @@
   [rf/delay-render
    [quo/category
     {:list-type       :settings
-     :container-style {:padding-bottom 12}
+     :container-style {:padding-bottom 0}
      :blur?           true
      :data            data}]])
 
@@ -61,10 +62,7 @@
         :on-press   #(rf/dispatch [:navigate-back])
         :right-side [{:icon-name :i/qr-code
                       :on-press  #(debounce/throttle-and-dispatch [:open-modal :share-shell] 1000)}
-                     {:icon-name :i/share
-                      :on-press  #(rf/dispatch [:open-share
-                                                {:options {:message (:universal-profile-url
-                                                                     profile)}}])}]}]]
+                     {:icon-name :i/share :on-press not-implemented/alert}]}]]
      [rn/flat-list
       {:key                             :list
        :header                          [settings.header/view {:scroll-y scroll-y}]

src/status_im/contexts/shell/jump_to/view.cljs

@@ -22,15 +22,13 @@
 
 (defn floating-button
   [shared-values]
-  (let [current-screen-id (rf/sub [:view-id])]
-    (when-not (= current-screen-id :settings)
-      [quo/floating-shell-button
-       {:jump-to {:on-press            #(animation/close-home-stack true)
-                  :label               (i18n/label :t/jump-to)
-                  :customization-color (rf/sub [:profile/customization-color])}}
-       {:position :absolute
-        :bottom   (utils/bottom-tabs-container-height)}
-       (:home-stack-opacity shared-values)])))
+  [quo/floating-shell-button
+   {:jump-to {:on-press            #(animation/close-home-stack true)
+              :label               (i18n/label :t/jump-to)
+              :customization-color (rf/sub [:profile/customization-color])}}
+   {:position :absolute
+    :bottom   (utils/bottom-tabs-container-height)}
+   (:home-stack-opacity shared-values)])
 
 (defn f-shell-stack
   []

src/status_im/contexts/shell/qr_reader/view.cljs

@@ -71,10 +71,13 @@
 (defn on-qr-code-scanned
   [scanned-text]
   (cond
-    (or
-     (text-for-url-path? scanned-text router/community-with-data-path)
-     (text-for-url-path? scanned-text router/channel-path))
-    (debounce/debounce-and-dispatch [:universal-links/handle-url scanned-text] 300)
+    (text-for-url-path? scanned-text router/community-with-data-path)
+    ;; TODO: https://github.com/status-im/status-mobile/issues/18743
+    nil
+
+    (text-for-url-path? scanned-text router/channel-path)
+    ;; TODO: https://github.com/status-im/status-mobile/issues/18743
+    nil
 
     (text-for-url-path? scanned-text router/user-with-data-path)
     (let [address (extract-id scanned-text)]

src/status_im/contexts/shell/share/profile/view.cljs

@@ -1,6 +1,7 @@
 (ns status-im.contexts.shell.share.profile.view
   (:require
     [clojure.string :as string]
+    [legacy.status-im.ui.components.list-selection :as list-selection]
     [quo.core :as quo]
     [quo.foundations.colors :as colors]
     [react-native.core :as rn]
@@ -29,7 +30,7 @@
         :width               (- window-width (* style/screen-padding 2))
         :qr-data             universal-profile-url
         :qr-data-label-shown abbreviated-url
-        :on-share-press      #(rf/dispatch [:open-share {:options {:message universal-profile-url}}])
+        :on-share-press      #(list-selection/open-share {:message universal-profile-url})
         :on-text-press       #(rf/dispatch [:share/copy-text-and-show-toast
                                             {:text-to-copy      universal-profile-url
                                              :post-copy-message (i18n/label :t/link-to-profile-copied)}])

src/status_im/contexts/shell/share/wallet/view.cljs

@@ -4,6 +4,7 @@
     [quo.core :as quo]
     [react-native.core :as rn]
     [react-native.platform :as platform]
+    [react-native.share :as share]
     [reagent.core :as reagent]
     [status-im.constants :as constants]
     [status-im.contexts.shell.share.style :as style]
@@ -19,18 +20,18 @@
 
 (defn- share-action
   [address share-title]
-  (rf/dispatch [:open-share
-                {:options (if platform/ios?
-                            {:activityItemSources [{:placeholderItem {:type    :text
-                                                                      :content address}
-                                                    :item            {:default {:type :text
-                                                                                :content
-                                                                                address}}
-                                                    :linkMetadata    {:title share-title}}]}
-                            {:title     share-title
-                             :subject   share-title
-                             :message   address
-                             :isNewTask true})}]))
+  (share/open
+   (if platform/ios?
+     {:activityItemSources [{:placeholderItem {:type    "text"
+                                               :content address}
+                             :item            {:default {:type "text"
+                                                         :content
+                                                         address}}
+                             :linkMetadata    {:title share-title}}]}
+     {:title     share-title
+      :subject   share-title
+      :message   address
+      :isNewTask true})))
 
 (defn- open-preferences
   [selected-networks account]

src/status_im/contexts/wallet/account/share_address/view.cljs

@@ -4,6 +4,7 @@
     [react-native.core :as rn]
     [react-native.platform :as platform]
     [react-native.safe-area :as safe-area]
+    [react-native.share :as share]
     [reagent.core :as reagent]
     [status-im.constants :as constants]
     [status-im.contexts.wallet.account.share-address.style :as style]
@@ -17,18 +18,18 @@
 
 (defn- share-action
   [address share-title]
-  (rf/dispatch [:open-share
-                {:options (if platform/ios?
-                            {:activityItemSources [{:placeholderItem {:type    :text
-                                                                      :content address}
-                                                    :item            {:default {:type :text
-                                                                                :content
-                                                                                address}}
-                                                    :linkMetadata    {:title share-title}}]}
-                            {:title     share-title
-                             :subject   share-title
-                             :message   address
-                             :isNewTask true})}]))
+  (share/open
+   (if platform/ios?
+     {:activityItemSources [{:placeholderItem {:type    "text"
+                                               :content address}
+                             :item            {:default {:type "text"
+                                                         :content
+                                                         address}}
+                             :linkMetadata    {:title share-title}}]}
+     {:title     share-title
+      :subject   share-title
+      :message   address
+      :isNewTask true})))
 
 (defn- open-preferences
   [selected-networks]

src/status_im/contexts/wallet/account/view.cljs

@@ -6,10 +6,20 @@
     [status-im.contexts.wallet.account.style :as style]
     [status-im.contexts.wallet.account.tabs.view :as tabs]
     [status-im.contexts.wallet.common.account-switcher.view :as account-switcher]
-    [status-im.contexts.wallet.sheets.buy-token.view :as buy-token]
+    [status-im.contexts.wallet.common.temp :as temp]
     [utils.i18n :as i18n]
     [utils.re-frame :as rf]))
 
+(defn buy-drawer
+  []
+  [:<>
+   [quo/drawer-top {:title (i18n/label :t/buy-tokens)}]
+   [rn/flat-list
+    {:data      temp/buy-tokens-list
+     :style     {:padding-horizontal 8
+                 :padding-bottom     8}
+     :render-fn quo/settings-item}]])
+
 (def first-tab-id :assets)
 
 (defn tabs-data
@@ -45,7 +55,7 @@
                                               :flow-id     :wallet-flow}]))
              :receive-action #(rf/dispatch [:open-modal :screen/wallet.share-address {:status :receive}])
              :buy-action     #(rf/dispatch [:show-bottom-sheet
-                                            {:content buy-token/view}])
+                                            {:content buy-drawer}])
              :bridge-action  #(rf/dispatch [:wallet/start-bridge])}])
          [quo/tabs
           {:style            style/tabs

src/status_im/contexts/wallet/add_account/create_account/view.cljs

@@ -47,7 +47,7 @@
       :image             :icon
       :image-props       :i/derivated-path
       :action            :button
-      :action-props      {:on-press    #(if (ff/enabled? ::ff/wallet.edit-derivation-path)
+      :action-props      {:on-press    #(if (ff/enabled? :ff/wallet.edit-derivation-path)
                                           (rf/dispatch [:standard-auth/authorize
                                                         {:on-auth-success   on-auth-success
                                                          :auth-button-label (i18n/label :t/continue)}])

src/status_im/contexts/wallet/bridge/bridge_to/view.cljs

@@ -50,8 +50,7 @@
      [account-switcher/view
       {:on-press            #(rf/dispatch [:navigate-back])
        :icon-name           :i/arrow-left
-       :accessibility-label :top-bar
-       :switcher-type       :select-account}]
+       :accessibility-label :top-bar}]
      [quo/page-top {:title bridge-to-title}]
      [rn/view style/content-container
       [bridge-token-component (assoc mainnet :network-name :t/mainnet) account-token]]

src/status_im/contexts/wallet/bridge/input_amount/view.cljs

@@ -15,7 +15,6 @@
      :button-one-label  (i18n/label :t/confirm-bridge)
      :button-one-props  {:icon-left :i/bridge}
      :on-navigate-back  (fn []
-                          (rf/dispatch [:wallet/clean-disabled-from-networks])
                           (rf/dispatch [:navigate-back]))}]])
 
 (def view (quo.theme/with-theme view-internal))

src/status_im/contexts/wallet/bridge/select_asset/view.cljs

@@ -16,8 +16,7 @@
       [rn/view {:style {:flex 1}}
        [account-switcher/view
         {:on-press            #(rf/dispatch [:navigate-back])
-         :accessibility-label :top-bar
-         :switcher-type       :select-account}]
+         :accessibility-label :top-bar}]
        [quo/page-top {:title (i18n/label :t/bridge)}]
        [quo/input
         {:container-style style/input-container