From 25086ed1e0feae9fecf7cb553683cd98f810b681 Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Tue, 10 Oct 2023 18:41:45 +0200
Subject: [PATCH 01/11] Cache trivial implementation.

---
 .../lib/explorer/celo/sanction_cache.ex       | 23 +++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 apps/explorer/lib/explorer/celo/sanction_cache.ex

diff --git a/apps/explorer/lib/explorer/celo/sanction_cache.ex b/apps/explorer/lib/explorer/celo/sanction_cache.ex
new file mode 100644
index 000000000000..fdf802bb184c
--- /dev/null
+++ b/apps/explorer/lib/explorer/celo/sanction_cache.ex
@@ -0,0 +1,23 @@
+defmodule Explorer.Celo.SanctionCache do
+  @moduledoc "A cache to manage addresses blocked for interaction"
+
+  use GenServer
+
+  @spec start_link(term()) :: GenServer.on_start()
+  def start_link(params \\ %{}) do
+    GenServer.start_link(__MODULE__, params, name: __MODULE__)
+  end
+
+  @impl true
+  def init(params) do
+    state = Map.get(params, :initial_state, %{})
+
+    {:ok, state, {:continue, :update_with_public_list}}
+  end
+
+  @impl true
+  def handle_continue(:update_with_public_list, state) do
+    new_state = Map.put(state, :list, ["0xtestaddresspleaseblockme"])
+    {:noreply, new_state}
+  end
+end
\ No newline at end of file

From 25459141c4f4050aa0a4e9a9a093259ef50e423f Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Tue, 10 Oct 2023 18:46:56 +0200
Subject: [PATCH 02/11] Add cache to web supervision tree.

---
 apps/block_scout_web/lib/block_scout_web/application.ex | 2 ++
 apps/explorer/lib/explorer/celo/sanction_cache.ex       | 9 +++++++++
 2 files changed, 11 insertions(+)

diff --git a/apps/block_scout_web/lib/block_scout_web/application.ex b/apps/block_scout_web/lib/block_scout_web/application.ex
index f156e32504ff..7bf53b53a325 100644
--- a/apps/block_scout_web/lib/block_scout_web/application.ex
+++ b/apps/block_scout_web/lib/block_scout_web/application.ex
@@ -13,6 +13,7 @@ defmodule BlockScoutWeb.Application do
   alias BlockScoutWeb.{Endpoint, RealtimeEventHandler}
 
   alias EthereumJSONRPC.Celo.Instrumentation, as: EthRPC
+  alias Explorer.Celo.SanctionCache
   alias Explorer.Celo.Telemetry.Instrumentation.{Api, Database, FlyPostgres}
   alias Explorer.Celo.Telemetry.MetricsCollector, as: CeloPrometheusCollector
 
@@ -35,6 +36,7 @@ defmodule BlockScoutWeb.Application do
         {RealtimeEventHandler, name: RealtimeEventHandler},
         {BlocksIndexedCounter, name: BlocksIndexedCounter},
         {CampaignBannerCache, name: CampaignBannerCache},
+        {SanctionCache, %{}},
         {InternalTransactionsIndexedCounter, name: InternalTransactionsIndexedCounter}
       ]
       |> cluster_process(Application.get_env(:block_scout_web, :environment))
diff --git a/apps/explorer/lib/explorer/celo/sanction_cache.ex b/apps/explorer/lib/explorer/celo/sanction_cache.ex
index fdf802bb184c..4a278febbee4 100644
--- a/apps/explorer/lib/explorer/celo/sanction_cache.ex
+++ b/apps/explorer/lib/explorer/celo/sanction_cache.ex
@@ -20,4 +20,13 @@ defmodule Explorer.Celo.SanctionCache do
     new_state = Map.put(state, :list, ["0xtestaddresspleaseblockme"])
     {:noreply, new_state}
   end
+
+  @impl true
+  def handle_call(:get_sanction_list, _from, %{list: list} = state) do
+    {:reply, list, state}
+  end
+
+  def get_sanction_list() do
+    GenServer.call(__MODULE__, :get_sanction_list)
+  end
 end
\ No newline at end of file

From 5dd06de76a8f0312205d86f4aaffb8521b5dcce0 Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Thu, 12 Oct 2023 15:15:31 +0200
Subject: [PATCH 03/11] Writing sanctions into html.

---
 .../controllers/smart_contract_controller.ex                | 6 +++++-
 .../templates/address_write_contract/index.html.eex         | 1 +
 .../templates/address_write_proxy/index.html.eex            | 1 +
 .../templates/smart_contract/_functions.html.eex            | 2 +-
 4 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex b/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
index a49e2ec0562f..d5eb3360ad37 100644
--- a/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
+++ b/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
@@ -2,6 +2,7 @@ defmodule BlockScoutWeb.SmartContractController do
   use BlockScoutWeb, :controller
 
   alias BlockScoutWeb.AddressView
+  #alias Explorer.Celo.SanctionCache
   alias Explorer.Chain
   alias Explorer.Chain.SmartContract
   alias Explorer.SmartContract.{Reader, Writer}
@@ -85,6 +86,7 @@ defmodule BlockScoutWeb.SmartContractController do
         implementation_address: implementation_address_hash_string,
         implementation_abi: implementation_abi,
         contract_type: contract_type,
+        sanctions: ["smart_contract_controller.ex","index"],
         action: action
       )
     else
@@ -138,7 +140,9 @@ defmodule BlockScoutWeb.SmartContractController do
         implementation_address: @burn_address,
         implementation_abi: [],
         contract_type: contract_type,
-        action: action
+         sanctions: ["smart_contract_controller.ex","index"],
+
+           action: action
       )
     else
       :error ->
diff --git a/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex b/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex
index 4cb36fc3a73f..aa167be06344 100644
--- a/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex
+++ b/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex
@@ -14,6 +14,7 @@
   %>
 
   <div class="card">
+    <div id="sanctions" data-sanctions="['hello', 'sanctionlist']" hidden ></div>
     <%= render BlockScoutWeb.AddressView, "_tabs.html", address: @address, is_proxy: is_proxy, conn: @conn %>
     <div class="card-misc-container">
       <%= render BlockScoutWeb.SmartContractView, "_connect_container.html" %>
diff --git a/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex b/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex
index 6e84b630f323..2108b9bacb90 100644
--- a/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex
+++ b/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex
@@ -15,6 +15,7 @@
 
   <div class="card">
     <%= render BlockScoutWeb.AddressView, "_tabs.html", address: @address, is_proxy: is_proxy, conn: @conn %>
+    <div id="sanctions" data-sanctions="['hello', 'sanctionlist']" hidden />
     <!-- loaded via AJAX -->
     <div class="card-body" data-smart-contract-functions data-hash="<%= to_string(@address.hash) %>" data-type="<%= @type %>" data-action="<%= @action %>" data-url="<%= smart_contract_path(@conn, :index) %>">
       <div>
diff --git a/apps/block_scout_web/lib/block_scout_web/templates/smart_contract/_functions.html.eex b/apps/block_scout_web/lib/block_scout_web/templates/smart_contract/_functions.html.eex
index 53b0aaaeaea7..50ebe0e374cb 100644
--- a/apps/block_scout_web/lib/block_scout_web/templates/smart_contract/_functions.html.eex
+++ b/apps/block_scout_web/lib/block_scout_web/templates/smart_contract/_functions.html.eex
@@ -57,7 +57,7 @@
                           @contract_abi
                         end
                     end %>
-        <form class="form-inline" data-function-form data-action="<%= if @action == "write", do: :write, else: :read %>" data-type="<%= @contract_type %>" data-url="<%= smart_contract_path(@conn, :show, Address.checksum(@address.hash)) %>" data-contract-address="<%= @address.hash %>" data-contract-abi="<%= function_abi %>" data-implementation-abi="<%= function_abi %>" data-chain-id="<%= Explorer.Chain.Cache.NetVersion.get_version() %>" data-custom-abi="<%= if assigns[:custom_abi], do: true, else: false %>">
+        <form class="form-inline" data-function-form data-action="<%= if @action == "write", do: :write, else: :read %>" data-type="<%= @contract_type %>" data-url="<%= smart_contract_path(@conn, :show, Address.checksum(@address.hash)) %>" data-contract-address="<%= @address.hash %>" data-contract-abi="<%= function_abi %>" data-implementation-abi="<%= function_abi %>" data-chain-id="<%= Explorer.Chain.Cache.NetVersion.get_version() %>" data-sanctions="<%= %>" data-custom-abi="<%= if assigns[:custom_abi], do: true, else: false %>">
           <input type="hidden" name="function_name" value='<%= function["name"] %>' />
           <input type="hidden" name="method_id" value='<%= function["method_id"] %>' />
 

From 5cdc2c85ee995edfff97c71373461d41c7a04215 Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Thu, 12 Oct 2023 17:31:14 +0200
Subject: [PATCH 04/11] Handling addresses in javascript.

---
 .../assets/js/lib/smart_contract/interact.js  | 145 +-----------------
 .../address_write_contract_controller.ex      |   3 +-
 .../address_write_proxy_controller.ex         |   3 +-
 .../address_write_contract/index.html.eex     |   6 +-
 .../address_write_proxy/index.html.eex        |   6 +-
 .../lib/explorer/celo/sanction_cache.ex       |   2 +-
 6 files changed, 19 insertions(+), 146 deletions(-)

diff --git a/apps/block_scout_web/assets/js/lib/smart_contract/interact.js b/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
index a147ecd5d047..4625686542a0 100644
--- a/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
+++ b/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
@@ -95,150 +95,13 @@ export const callMethod = (isWalletEnabled, $functionInputs, explorerChainId, $f
     })
 }
 
-const sanctionedAddresses = [
-  '0x01e2919679362dfbc9ee1644ba9c6da6d6245bb1',
-  '0x03893a7c7463ae47d46bc7f091665f1893656003',
-  '0x05e0b5b40b7b66098c2161a5ee11c5740a3a7c45',
-  '0x07687e702b410fa43f4cb4af7fa097918ffd2730',
-  '0x0836222f2b2b24a3f36f98668ed8f0b38d1a872f',
-  '0x08723392ed15743cc38513c4925f5e6be5c17243',
-  '0x09193888b3f38c82dedfda55259a82c0e7de875e',
-  '0x098b716b8aaf21512996dc57eb0615e2383e2f96',
-  '0x0d5550d52428e7e3175bfc9550207e4ad3859b17',
-  '0x0e3a09dda6b20afbb34ac7cd4a6881493f3e7bf7',
-  '0x12d66f87a04a9e220743712ce6d9bb1b5616b8fc',
-  '0x1356c899d8c9467c7f71c195612f8a395abf2f0a',
-  '0x169ad27a470d064dede56a2d3ff727986b15d52b',
-  '0x178169b423a011fff22b9e3f3abea13414ddd0f1',
-  '0x179f48c78f57a3a78f0608cc9197b8972921d1d2',
-  '0x19aa5fe80d33a56d56c78e82ea5e50e5d80b4dff',
-  '0x1da5821544e25c636c1417ba96ade4cf6d2f9b5a',
-  '0x1e34a77868e19a6647b1f2f47b51ed72dede95dd',
-  '0x22aaa7720ddd5388a3c0a3333430953c68f1849b',
-  '0x23173fe8b96a4ad8d2e17fb83ea5dcccdca1ae52',
-  '0x23773e65ed146a459791799d01336db287f25334',
-  '0x242654336ca2205714071898f67e254eb49acdce',
-  '0x2573bac39ebe2901b4389cd468f2872cf7767faf',
-  '0x26903a5a198d571422b2b4ea08b56a37cbd68c89',
-  '0x2717c5e28cf931547b621a5dddb772ab6a35b701',
-  '0x2f389ce8bd8ff92de3402ffce4691d17fc4f6535',
-  '0x2f50508a8a3d323b91336fa3ea6ae50e55f32185',
-  '0x2fc93484614a34f26f7970cbb94615ba109bb4bf',
-  '0x308ed4b7b49797e1a98d3818bff6fe5385410370',
-  '0x330bdfade01ee9bf63c209ee33102dd334618e0a',
-  '0x35fb6f6db4fb05e6a4ce86f2c93691425626d4b1',
-  '0x38735f03b30fbc022ddd06abed01f0ca823c6a94',
-  '0x39d908dac893cbcb53cc86e0ecc369aa4def1a29',
-  '0x3aac1cc67c2ec5db4ea850957b967ba153ad6279',
-  '0x3cbded43efdaf0fc77b9c55f6fc9988fcc9b757d',
-  '0x3cffd56b47b7b41c56258d9c7731abadc360e073',
-  '0x3e37627deaa754090fbfbb8bd226c1ce66d255e9',
-  '0x3efa30704d2b8bbac821307230376556cf8cc39e',
-  '0x407cceeaa7c95d2fe2250bf9f2c105aa7aafb512',
-  '0x43fa21d92141ba9db43052492e0deee5aa5f0a93',
-  '0x4736dcf1b7a3d580672cce6e7c65cd5cc9cfba9d',
-  '0x47ce0c6ed5b0ce3d3a51fdb1c52dc66a7c3c2936',
-  '0x48549a34ae37b12f6a30566245176994e17c6b4a',
-  '0x4f47bc496083c727c5fbe3ce9cdf2b0f6496270c',
-  '0x527653ea119f3e6a1f5bd18fbf4714081d7b31ce',
-  '0x538ab61e8a9fc1b2f93b3dd9011d662d89be6fe6',
-  '0x53b6936513e738f44fb50d2b9476730c0ab3bfc1',
-  '0x5512d943ed1f7c8a43f3435c85f7ab68b30121b0',
-  '0x57b2b8c82f065de8ef5573f9730fc1449b403c9f',
-  '0x58e8dcc13be9780fc42e8723d8ead4cf46943df2',
-  '0x5a7a51bfb49f190e5a6060a5bc6052ac14a3b59f',
-  '0x5cab7692d4e94096462119ab7bf57319726eed2a',
-  '0x5efda50f22d34f262c29268506c5fa42cb56a1ce',
-  '0x5f48c2a71b2cc96e3f0ccae4e39318ff0dc375b2',
-  '0x5f6c97c6ad7bdd0ae7e0dd4ca33a4ed3fdabd4d7',
-  '0x610b717796ad172b316836ac95a2ffad065ceab4',
-  '0x653477c392c16b0765603074f157314cc4f40c32',
-  '0x67d40ee1a85bf4a4bb7ffae16de985e8427b6b45',
-  '0x6acdfba02d390b97ac2b2d42a63e85293bcc160e',
-  '0x6be0ae71e6c41f2f9d0d1a3b8d0f75e6f6a0b46e',
-  '0x6bf694a291df3fec1f7e69701e3ab6c592435ae7',
-  '0x6f1ca141a28907f78ebaa64fb83a9088b02a8352',
-  '0x722122df12d4e14e13ac3b6895a86e84145b6967',
-  '0x723b78e67497e85279cb204544566f4dc5d2aca0',
-  '0x72a5843cc08275c8171e582972aa4fda8c397b2a',
-  '0x743494b60097a2230018079c02fe21a7b687eaa5',
-  '0x746aebc06d2ae31b71ac51429a19d54e797878e9',
-  '0x756c4628e57f7e7f8a459ec2752968360cf4d1aa',
-  '0x76d85b4c0fc497eecc38902397ac608000a06607',
-  '0x776198ccf446dfa168347089d7338879273172cf',
-  '0x77777feddddffc19ff86db637967013e6c6a116c',
-  '0x797d7ae72ebddcdea2a346c1834e04d1f8df102b',
-  '0x7db418b5d567a4e0e8c59ad71be1fce48f3e6107',
-  '0x7f19720a857f834887fc9a7bc0a0fbe7fc7f8102',
-  '0x7f367cc41522ce07553e823bf3be79a889debe1b',
-  '0x8281aa6795ade17c8973e1aedca380258bc124f9',
-  '0x833481186f16cece3f1eeea1a694c42034c3a0db',
-  '0x84443cfd09a48af6ef360c6976c5392ac5023a1f',
-  '0x8576acc5c05d6ce88f4e49bf65bdf0c62f91353c',
-  '0x8589427373d6d84e98730d7795d8f6f8731fda16',
-  '0x88fd245fedec4a936e700f9173454d1931b4c307',
-  '0x905b63fff465b9ffbf41dea908ceb12478ec7601',
-  '0x910cbd523d972eb0a6f4cae4618ad62622b39dbf',
-  '0x931546d9e66836abf687d2bc64b30407bac8c568',
-  '0x94a1b5cdb22c43faab4abeb5c74999895464ddaf',
-  '0x94be88213a387e992dd87de56950a9aef34b9448',
-  '0x94c92f096437ab9958fc0a37f09348f30389ae79',
-  '0x97b1043abd9e6fc31681635166d430a458d14f9c',
-  '0x9ad122c22b14202b4490edaf288fdb3c7cb3ff5e',
-  '0x9d095b9c373207cbc8bec0a03ad789fdc9dec911',
-  '0x9f4cda013e354b8fc285bf4b9a60460cee7f7ea9',
-  '0xa0e1c89ef1a489c9c7de96311ed5ce5d32c20e4b',
-  '0xa160cdab225685da1d56aa342ad8841c3b53f291',
-  '0xa5c2254e4253490c54cef0a4347fddb8f75a4998',
-  '0xa60c772958a3ed56c1f15dd055ba37ac8e523a0d',
-  '0xa7e5d5a720f06526557c513402f2e6b5fa20b008',
-  '0xaeaac358560e11f52454d997aaff2c5731b6f8a6',
-  '0xaf4c0b70b2ea9fb7487c7cbb37ada259579fe040',
-  '0xaf8d1839c3c67cf571aa74b5c12398d4901147b3',
-  '0xb04e030140b30c27bcdfaafffa98c57d80eda7b4',
-  '0xb1c8094b234dce6e03f10a5b673c1d8c69739a00',
-  '0xb20c66c4de72433f3ce747b58b86830c459ca911',
-  '0xb541fc07bc7619fd4062a54d96268525cbc6ffef',
-  '0xb6f5ec1a0a9cd1526536d3f0426c429529471f40',
-  '0xba214c1c1928a32bffe790263e38b4af9bfcd659',
-  '0xbb93e510bbcd0b7beb5a853875f9ec60275cf498',
-  '0xc455f7fd3e0e12afd51fba5c106909934d8a0e4a',
-  '0xca0840578f57fe71599d29375e16783424023357',
-  '0xcc84179ffd19a1627e79f8648d09e095252bc418',
-  '0xcee71753c9820f063b38fdbe4cfdaf1d3d928a80',
-  '0xd21be7248e0197ee08e0c20d4a96debdac3d20af',
-  '0xd47438c816c9e7f2e2888e060936a499af9582b3',
-  '0xd4b88df4d29f5cedd6857912842cff3b20c8cfa3',
-  '0xd5d6f8d9e784d0e26222ad3834500801a68d027d',
-  '0xd691f27f38b395864ea86cfc7253969b409c362d',
-  '0xd692fd2d0b2fbd2e52cfa5b5b9424bc981c30696',
-  '0xd82ed8786d7c69dc7e052f7a542ab047971e73d2',
-  '0xd882cfc20f52f2599d84b8e8d58c7fb62cfe344b',
-  '0xd8d7de3349ccaa0fde6298fe6d7b7d0d34586193',
-  '0xd90e2f925da726b50c4ed8d0fb90ad053324f31b',
-  '0xd96f2b1c14db8458374d9aca76e26c3d18364307',
-  '0xdcbeffbecce100cce9e4b153c4e15cb885643193',
-  '0xdd4c48c0b24039969fc16d1cdf626eab821d3384',
-  '0xdf231d99ff8b6c6cbf4e9b9a945cbacef9339178',
-  '0xdf3a408c53e5078af6e8fb2a85088d46ee09a61b',
-  '0xe7aa314c77f4233c18c6cc84384a9247c0cf367b',
-  '0xed6e0a7e4ac94d976eebfb82ccf777a3c6bad921',
-  '0xedc5d01286f99a066559f60a585406f3878a033e',
-  '0xf4b067dd14e95bab89be928c07cb22e3c94e0daa',
-  '0xf60dd140cff0706bae9cd734ac3ae76ad9ebc32a',
-  '0xf67721a2d8f736e75a49fdd7fad2e31d8676542a',
-  '0xf7b31119c2682c88d88d455dbb9d5932c65cf1be',
-  '0xfd8610d20aa15b7b2e3be39b396a1bc3516c7144',
-  '0xffbac21a641dcfe4552920138d90f3638b3c9fba',
-  '0x9c2bc757b66f24d60f016b6237f8cdd414a879fa',
-
-  // address for testing
-  '0x0143008e904feea7140c831585025bc174eb2f15'
-]
-
+const sanctionString = document.getElementById("sanctions").getAttribute("data-sanctions")
+const sanctionedAddresses =  JSON.parse(sanctionString)
 const sanctionText = 'The wallet address has been sanctioned by the U.S. Department of the Treasury. All U.S. persons are prohibited from accessing, receiving, accepting, or facilitating any property and interests in property (including use of any technology, software or software patch(es)) of these designated digital wallet addresses. These prohibitions include the making of any contribution or provision of funds, goods, or services by, to, or for the benefit of any blocked person and the receipt of any contribution or provision of funds, goods, or services from any such person and all designated digital asset wallets.'
 
 function isSanctioned (address) {
+  console.log("well hello there")
+  console.log(sanctionedAddresses)
   return address && sanctionedAddresses.includes(address.toLowerCase())
 }
 
diff --git a/apps/block_scout_web/lib/block_scout_web/controllers/address_write_contract_controller.ex b/apps/block_scout_web/lib/block_scout_web/controllers/address_write_contract_controller.ex
index f77c4470d73f..8c06a6fc6af1 100644
--- a/apps/block_scout_web/lib/block_scout_web/controllers/address_write_contract_controller.ex
+++ b/apps/block_scout_web/lib/block_scout_web/controllers/address_write_contract_controller.ex
@@ -36,7 +36,8 @@ defmodule BlockScoutWeb.AddressWriteContractController do
       type: :regular,
       action: :write,
       custom_abi: custom_abi?,
-      exchange_rate: Market.get_exchange_rate(Explorer.coin()) || Token.null()
+      exchange_rate: Market.get_exchange_rate(Explorer.coin()) || Token.null(),
+      sanctions: Explorer.Celo.SanctionCache.get_sanction_list()
     ]
 
     with {:ok, address_hash} <- Chain.string_to_address_hash(address_hash_string),
diff --git a/apps/block_scout_web/lib/block_scout_web/controllers/address_write_proxy_controller.ex b/apps/block_scout_web/lib/block_scout_web/controllers/address_write_proxy_controller.ex
index 523c1c0fdf69..0a3d1dd67e3b 100644
--- a/apps/block_scout_web/lib/block_scout_web/controllers/address_write_proxy_controller.ex
+++ b/apps/block_scout_web/lib/block_scout_web/controllers/address_write_proxy_controller.ex
@@ -37,7 +37,8 @@ defmodule BlockScoutWeb.AddressWriteProxyController do
         exchange_rate: Market.get_exchange_rate(Explorer.coin()) || Token.null(),
         counters_path: address_path(conn, :address_counters, %{"id" => Address.checksum(address_hash)}),
         tags: get_address_tags(address_hash, current_user(conn)),
-        celo_epoch: EpochUtil.get_address_summary(address)
+        celo_epoch: EpochUtil.get_address_summary(address),
+        sanctions: Explorer.Celo.SanctionCache.get_sanction_list()
       )
     else
       _ ->
diff --git a/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex b/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex
index aa167be06344..17991bf3e3ba 100644
--- a/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex
+++ b/apps/block_scout_web/lib/block_scout_web/templates/address_write_contract/index.html.eex
@@ -13,8 +13,12 @@
     celo_epoch: @celo_epoch
   %>
 
+  <%
+    {:ok, sanctions} = Jason.encode(@sanctions)
+  %>
+
   <div class="card">
-    <div id="sanctions" data-sanctions="['hello', 'sanctionlist']" hidden ></div>
+    <div id="sanctions" data-sanctions=<%= sanctions %> hidden ></div>
     <%= render BlockScoutWeb.AddressView, "_tabs.html", address: @address, is_proxy: is_proxy, conn: @conn %>
     <div class="card-misc-container">
       <%= render BlockScoutWeb.SmartContractView, "_connect_container.html" %>
diff --git a/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex b/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex
index 2108b9bacb90..2ff4b34c08f2 100644
--- a/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex
+++ b/apps/block_scout_web/lib/block_scout_web/templates/address_write_proxy/index.html.eex
@@ -13,9 +13,13 @@
     celo_epoch: @celo_epoch
   %>
 
+  <%
+    {:ok, sanctions} = Jason.encode(@sanctions)
+  %>
+
   <div class="card">
     <%= render BlockScoutWeb.AddressView, "_tabs.html", address: @address, is_proxy: is_proxy, conn: @conn %>
-    <div id="sanctions" data-sanctions="['hello', 'sanctionlist']" hidden />
+    <div id="sanctions" data-sanctions=<%= sanctions %> hidden />
     <!-- loaded via AJAX -->
     <div class="card-body" data-smart-contract-functions data-hash="<%= to_string(@address.hash) %>" data-type="<%= @type %>" data-action="<%= @action %>" data-url="<%= smart_contract_path(@conn, :index) %>">
       <div>
diff --git a/apps/explorer/lib/explorer/celo/sanction_cache.ex b/apps/explorer/lib/explorer/celo/sanction_cache.ex
index 4a278febbee4..1a57c2d5f58c 100644
--- a/apps/explorer/lib/explorer/celo/sanction_cache.ex
+++ b/apps/explorer/lib/explorer/celo/sanction_cache.ex
@@ -17,7 +17,7 @@ defmodule Explorer.Celo.SanctionCache do
 
   @impl true
   def handle_continue(:update_with_public_list, state) do
-    new_state = Map.put(state, :list, ["0xtestaddresspleaseblockme"])
+    new_state = Map.put(state, :list, ["0x0143008E904fEea7140c831585025bc174eB2F15", "0xtestaddresspleaseblockme"])
     {:noreply, new_state}
   end
 

From 868da57974bfcf540b736ee4a3b3b6c777d649bd Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Mon, 16 Oct 2023 12:04:01 +0200
Subject: [PATCH 05/11] Fetching sanction list on app startup.

---
 .../lib/explorer/celo/sanction_cache.ex       | 29 +++++++++++++++++--
 config/runtime.exs                            |  4 +++
 2 files changed, 30 insertions(+), 3 deletions(-)

diff --git a/apps/explorer/lib/explorer/celo/sanction_cache.ex b/apps/explorer/lib/explorer/celo/sanction_cache.ex
index 1a57c2d5f58c..2caa2f53696f 100644
--- a/apps/explorer/lib/explorer/celo/sanction_cache.ex
+++ b/apps/explorer/lib/explorer/celo/sanction_cache.ex
@@ -2,6 +2,7 @@ defmodule Explorer.Celo.SanctionCache do
   @moduledoc "A cache to manage addresses blocked for interaction"
 
   use GenServer
+  require Logger
 
   @spec start_link(term()) :: GenServer.on_start()
   def start_link(params \\ %{}) do
@@ -10,15 +11,37 @@ defmodule Explorer.Celo.SanctionCache do
 
   @impl true
   def init(params) do
-    state = Map.get(params, :initial_state, %{})
+    state = Map.get(params, :initial_state, %{list: []})
 
     {:ok, state, {:continue, :update_with_public_list}}
   end
 
   @impl true
   def handle_continue(:update_with_public_list, state) do
-    new_state = Map.put(state, :list, ["0x0143008E904fEea7140c831585025bc174eB2F15", "0xtestaddresspleaseblockme"])
-    {:noreply, new_state}
+    sanctions_url = :explorer
+      |> Application.get_env(:celo_sanctions)
+      |> Keyword.get(:url, "https://celo-org.github.io/compliance/ofac.sanctions.json")
+
+    Logger.info("Fetching sanctioned address list from #{sanctions_url}")
+
+    {:ok, response} = case HTTPoison.get(sanctions_url, [], follow_redirect: true, timeout: 5_000) do
+      {:ok, %HTTPoison.Response{body: body, status_code: 200}} ->
+        {:ok, body}
+
+      _ ->
+        {:error, :error_calling_backend_api}
+    end
+
+    sanction_list = response |> Jason.decode!()
+
+    Logger.info("Retrieved #{length(sanction_list)} sanctioned addresses (md5 #{hash_list(sanction_list)}")
+
+    {:noreply, %{state | list: sanction_list}}
+  end
+
+  @doc "printable md5 hash of list contents to assert changed values"
+  def hash_list(list) do
+    :crypto.hash(:md5, :erlang.term_to_binary(list)) |> Base.encode16()
   end
 
   @impl true
diff --git a/config/runtime.exs b/config/runtime.exs
index e875c0360204..e210e8808cfd 100644
--- a/config/runtime.exs
+++ b/config/runtime.exs
@@ -403,6 +403,10 @@ config :explorer, :token_id_migration,
   concurrency: token_id_migration_concurrency,
   batch_size: token_id_migration_batch_size
 
+
+config :explorer, :celo_sanctions,
+       url: System.get_env("CELO_SANCTIONS_URL", "https://celo-org.github.io/compliance/ofac.sanctions.json")
+
 ###############
 ### Indexer ###
 ###############

From 8df3a72d33d11afd55f4b9bacc31ee2c8998afca Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Mon, 16 Oct 2023 12:42:17 +0200
Subject: [PATCH 06/11] Periodic refresh + debug add address feature.

---
 .../assets/js/lib/smart_contract/interact.js  |  4 +-
 .../lib/explorer/celo/sanction_cache.ex       | 37 +++++++++++++++----
 2 files changed, 30 insertions(+), 11 deletions(-)

diff --git a/apps/block_scout_web/assets/js/lib/smart_contract/interact.js b/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
index 4625686542a0..8f71a20a5aeb 100644
--- a/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
+++ b/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
@@ -96,12 +96,10 @@ export const callMethod = (isWalletEnabled, $functionInputs, explorerChainId, $f
 }
 
 const sanctionString = document.getElementById("sanctions").getAttribute("data-sanctions")
-const sanctionedAddresses =  JSON.parse(sanctionString)
+const sanctionedAddresses =  JSON.parse(sanctionString).map(a => a.toLowerCase())
 const sanctionText = 'The wallet address has been sanctioned by the U.S. Department of the Treasury. All U.S. persons are prohibited from accessing, receiving, accepting, or facilitating any property and interests in property (including use of any technology, software or software patch(es)) of these designated digital wallet addresses. These prohibitions include the making of any contribution or provision of funds, goods, or services by, to, or for the benefit of any blocked person and the receipt of any contribution or provision of funds, goods, or services from any such person and all designated digital asset wallets.'
 
 function isSanctioned (address) {
-  console.log("well hello there")
-  console.log(sanctionedAddresses)
   return address && sanctionedAddresses.includes(address.toLowerCase())
 }
 
diff --git a/apps/explorer/lib/explorer/celo/sanction_cache.ex b/apps/explorer/lib/explorer/celo/sanction_cache.ex
index 2caa2f53696f..104f83ec3e5e 100644
--- a/apps/explorer/lib/explorer/celo/sanction_cache.ex
+++ b/apps/explorer/lib/explorer/celo/sanction_cache.ex
@@ -11,16 +11,24 @@ defmodule Explorer.Celo.SanctionCache do
 
   @impl true
   def init(params) do
-    state = Map.get(params, :initial_state, %{list: []})
+    state = Map.get(params, :initial_state, %{list: [], refresh: :timer.minutes(60)})
 
     {:ok, state, {:continue, :update_with_public_list}}
   end
 
   @impl true
-  def handle_continue(:update_with_public_list, state) do
+  def handle_continue(:update_with_public_list, %{refresh: refresh_time} = state) do
+    sanction_list = fetch_list()
+
+    Process.send_after(self, :refresh, refresh_time)
+
+    {:noreply, %{state | list: sanction_list}}
+  end
+
+  def fetch_list() do
     sanctions_url = :explorer
-      |> Application.get_env(:celo_sanctions)
-      |> Keyword.get(:url, "https://celo-org.github.io/compliance/ofac.sanctions.json")
+                    |> Application.get_env(:celo_sanctions)
+                    |> Keyword.get(:url, "https://celo-org.github.io/compliance/ofac.sanctions.json")
 
     Logger.info("Fetching sanctioned address list from #{sanctions_url}")
 
@@ -28,17 +36,16 @@ defmodule Explorer.Celo.SanctionCache do
       {:ok, %HTTPoison.Response{body: body, status_code: 200}} ->
         {:ok, body}
 
-      _ ->
-        {:error, :error_calling_backend_api}
+      e ->
+        {:error, inspect(e)}
     end
 
     sanction_list = response |> Jason.decode!()
 
     Logger.info("Retrieved #{length(sanction_list)} sanctioned addresses (md5 #{hash_list(sanction_list)}")
 
-    {:noreply, %{state | list: sanction_list}}
+    sanction_list
   end
-
   @doc "printable md5 hash of list contents to assert changed values"
   def hash_list(list) do
     :crypto.hash(:md5, :erlang.term_to_binary(list)) |> Base.encode16()
@@ -49,7 +56,21 @@ defmodule Explorer.Celo.SanctionCache do
     {:reply, list, state}
   end
 
+  @impl true
+  def handle_cast({:add_address, address}, %{list: list} = state) do
+    {:noreply, %{state | list: [address | list]}}
+  end
+
+  @impl true
+  def handle_info(:refresh, state) do
+    {:noreply, state, {:continue, :update_with_public_list}}
+  end
+
   def get_sanction_list() do
     GenServer.call(__MODULE__, :get_sanction_list)
   end
+
+  def add_address(address) do
+    GenServer.cast(__MODULE__, {:add_address, address})
+  end
 end
\ No newline at end of file

From a7071860d7b6488a2f460ddaa42ccf637ab9e76a Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Mon, 16 Oct 2023 12:52:00 +0200
Subject: [PATCH 07/11] Fix warning.

---
 apps/explorer/lib/explorer/celo/sanction_cache.ex | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/apps/explorer/lib/explorer/celo/sanction_cache.ex b/apps/explorer/lib/explorer/celo/sanction_cache.ex
index 104f83ec3e5e..e4e9329af26f 100644
--- a/apps/explorer/lib/explorer/celo/sanction_cache.ex
+++ b/apps/explorer/lib/explorer/celo/sanction_cache.ex
@@ -20,7 +20,7 @@ defmodule Explorer.Celo.SanctionCache do
   def handle_continue(:update_with_public_list, %{refresh: refresh_time} = state) do
     sanction_list = fetch_list()
 
-    Process.send_after(self, :refresh, refresh_time)
+    Process.send_after(self(), :refresh, refresh_time)
 
     {:noreply, %{state | list: sanction_list}}
   end

From e0d13ea41b952568134e9fb98d72815514c9a174 Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Mon, 16 Oct 2023 13:17:33 +0200
Subject: [PATCH 08/11] Credo and format.

---
 .../controllers/smart_contract_controller.ex  |  9 +++----
 .../lib/explorer/celo/sanction_cache.ex       | 27 ++++++++++---------
 config/runtime.exs                            |  3 +--
 3 files changed, 20 insertions(+), 19 deletions(-)

diff --git a/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex b/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
index d5eb3360ad37..356952bef216 100644
--- a/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
+++ b/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
@@ -2,7 +2,7 @@ defmodule BlockScoutWeb.SmartContractController do
   use BlockScoutWeb, :controller
 
   alias BlockScoutWeb.AddressView
-  #alias Explorer.Celo.SanctionCache
+  # alias Explorer.Celo.SanctionCache
   alias Explorer.Chain
   alias Explorer.Chain.SmartContract
   alias Explorer.SmartContract.{Reader, Writer}
@@ -86,7 +86,7 @@ defmodule BlockScoutWeb.SmartContractController do
         implementation_address: implementation_address_hash_string,
         implementation_abi: implementation_abi,
         contract_type: contract_type,
-        sanctions: ["smart_contract_controller.ex","index"],
+        sanctions: ["smart_contract_controller.ex", "index"],
         action: action
       )
     else
@@ -140,9 +140,8 @@ defmodule BlockScoutWeb.SmartContractController do
         implementation_address: @burn_address,
         implementation_abi: [],
         contract_type: contract_type,
-         sanctions: ["smart_contract_controller.ex","index"],
-
-           action: action
+        sanctions: ["smart_contract_controller.ex", "index"],
+        action: action
       )
     else
       :error ->
diff --git a/apps/explorer/lib/explorer/celo/sanction_cache.ex b/apps/explorer/lib/explorer/celo/sanction_cache.ex
index e4e9329af26f..7f1037c4466f 100644
--- a/apps/explorer/lib/explorer/celo/sanction_cache.ex
+++ b/apps/explorer/lib/explorer/celo/sanction_cache.ex
@@ -25,20 +25,22 @@ defmodule Explorer.Celo.SanctionCache do
     {:noreply, %{state | list: sanction_list}}
   end
 
-  def fetch_list() do
-    sanctions_url = :explorer
-                    |> Application.get_env(:celo_sanctions)
-                    |> Keyword.get(:url, "https://celo-org.github.io/compliance/ofac.sanctions.json")
+  def fetch_list do
+    sanctions_url =
+      :explorer
+      |> Application.get_env(:celo_sanctions)
+      |> Keyword.get(:url, "https://celo-org.github.io/compliance/ofac.sanctions.json")
 
     Logger.info("Fetching sanctioned address list from #{sanctions_url}")
 
-    {:ok, response} = case HTTPoison.get(sanctions_url, [], follow_redirect: true, timeout: 5_000) do
-      {:ok, %HTTPoison.Response{body: body, status_code: 200}} ->
-        {:ok, body}
+    {:ok, response} =
+      case HTTPoison.get(sanctions_url, [], follow_redirect: true, timeout: 5_000) do
+        {:ok, %HTTPoison.Response{body: body, status_code: 200}} ->
+          {:ok, body}
 
-      e ->
-        {:error, inspect(e)}
-    end
+        e ->
+          {:error, inspect(e)}
+      end
 
     sanction_list = response |> Jason.decode!()
 
@@ -46,6 +48,7 @@ defmodule Explorer.Celo.SanctionCache do
 
     sanction_list
   end
+
   @doc "printable md5 hash of list contents to assert changed values"
   def hash_list(list) do
     :crypto.hash(:md5, :erlang.term_to_binary(list)) |> Base.encode16()
@@ -66,11 +69,11 @@ defmodule Explorer.Celo.SanctionCache do
     {:noreply, state, {:continue, :update_with_public_list}}
   end
 
-  def get_sanction_list() do
+  def get_sanction_list do
     GenServer.call(__MODULE__, :get_sanction_list)
   end
 
   def add_address(address) do
     GenServer.cast(__MODULE__, {:add_address, address})
   end
-end
\ No newline at end of file
+end
diff --git a/config/runtime.exs b/config/runtime.exs
index e210e8808cfd..e78184ff4195 100644
--- a/config/runtime.exs
+++ b/config/runtime.exs
@@ -403,9 +403,8 @@ config :explorer, :token_id_migration,
   concurrency: token_id_migration_concurrency,
   batch_size: token_id_migration_batch_size
 
-
 config :explorer, :celo_sanctions,
-       url: System.get_env("CELO_SANCTIONS_URL", "https://celo-org.github.io/compliance/ofac.sanctions.json")
+  url: System.get_env("CELO_SANCTIONS_URL", "https://celo-org.github.io/compliance/ofac.sanctions.json")
 
 ###############
 ### Indexer ###

From fa003bca23930139c5859a2e2595f32b6db708a8 Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Mon, 16 Oct 2023 17:48:29 +0200
Subject: [PATCH 09/11] Fix errors.

---
 .../assets/js/lib/smart_contract/interact.js         |  4 ++--
 apps/block_scout_web/priv/gettext/default.pot        | 12 ++++++------
 .../priv/gettext/en/LC_MESSAGES/default.po           | 12 ++++++------
 3 files changed, 14 insertions(+), 14 deletions(-)

diff --git a/apps/block_scout_web/assets/js/lib/smart_contract/interact.js b/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
index 8f71a20a5aeb..1154fb370fe7 100644
--- a/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
+++ b/apps/block_scout_web/assets/js/lib/smart_contract/interact.js
@@ -95,8 +95,8 @@ export const callMethod = (isWalletEnabled, $functionInputs, explorerChainId, $f
     })
 }
 
-const sanctionString = document.getElementById("sanctions").getAttribute("data-sanctions")
-const sanctionedAddresses =  JSON.parse(sanctionString).map(a => a.toLowerCase())
+const sanctionString = document.getElementById('sanctions').getAttribute('data-sanctions')
+const sanctionedAddresses = JSON.parse(sanctionString).map(a => a.toLowerCase())
 const sanctionText = 'The wallet address has been sanctioned by the U.S. Department of the Treasury. All U.S. persons are prohibited from accessing, receiving, accepting, or facilitating any property and interests in property (including use of any technology, software or software patch(es)) of these designated digital wallet addresses. These prohibitions include the making of any contribution or provision of funds, goods, or services by, to, or for the benefit of any blocked person and the receipt of any contribution or provision of funds, goods, or services from any such person and all designated digital asset wallets.'
 
 function isSanctioned (address) {
diff --git a/apps/block_scout_web/priv/gettext/default.pot b/apps/block_scout_web/priv/gettext/default.pot
index 504985574134..0a115d42dfc8 100644
--- a/apps/block_scout_web/priv/gettext/default.pot
+++ b/apps/block_scout_web/priv/gettext/default.pot
@@ -919,7 +919,7 @@ msgid "Current transaction state: Success, Failed (Error), or Pending (In Proces
 msgstr ""
 
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:29
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:27
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:32
 #, elixir-autogen, elixir-format
 msgid "Custom"
 msgstr ""
@@ -933,7 +933,7 @@ msgid "Custom ABI"
 msgstr ""
 
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:34
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:32
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:37
 #, elixir-autogen, elixir-format
 msgid "Custom ABI from account"
 msgstr ""
@@ -1569,9 +1569,9 @@ msgstr ""
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:50
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:58
 #: lib/block_scout_web/templates/address_read_proxy/index.html.eex:21
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:48
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:56
-#: lib/block_scout_web/templates/address_write_proxy/index.html.eex:21
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:53
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:61
+#: lib/block_scout_web/templates/address_write_proxy/index.html.eex:26
 #: lib/block_scout_web/templates/tokens/contract/index.html.eex:17
 #, elixir-autogen, elixir-format
 msgid "Loading..."
@@ -2987,7 +2987,7 @@ msgid "Value"
 msgstr ""
 
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:26
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:24
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:29
 #: lib/block_scout_web/templates/verified_contracts/_tile.html.eex:49
 #: lib/block_scout_web/templates/verified_contracts/index.html.eex:74
 #, elixir-autogen, elixir-format
diff --git a/apps/block_scout_web/priv/gettext/en/LC_MESSAGES/default.po b/apps/block_scout_web/priv/gettext/en/LC_MESSAGES/default.po
index 1b29374f8e38..efed48c6db34 100644
--- a/apps/block_scout_web/priv/gettext/en/LC_MESSAGES/default.po
+++ b/apps/block_scout_web/priv/gettext/en/LC_MESSAGES/default.po
@@ -919,7 +919,7 @@ msgid "Current transaction state: Success, Failed (Error), or Pending (In Proces
 msgstr ""
 
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:29
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:27
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:32
 #, elixir-autogen, elixir-format
 msgid "Custom"
 msgstr ""
@@ -933,7 +933,7 @@ msgid "Custom ABI"
 msgstr ""
 
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:34
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:32
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:37
 #, elixir-autogen, elixir-format
 msgid "Custom ABI from account"
 msgstr ""
@@ -1569,9 +1569,9 @@ msgstr ""
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:50
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:58
 #: lib/block_scout_web/templates/address_read_proxy/index.html.eex:21
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:48
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:56
-#: lib/block_scout_web/templates/address_write_proxy/index.html.eex:21
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:53
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:61
+#: lib/block_scout_web/templates/address_write_proxy/index.html.eex:26
 #: lib/block_scout_web/templates/tokens/contract/index.html.eex:17
 #, elixir-autogen, elixir-format
 msgid "Loading..."
@@ -2987,7 +2987,7 @@ msgid "Value"
 msgstr ""
 
 #: lib/block_scout_web/templates/address_read_contract/index.html.eex:26
-#: lib/block_scout_web/templates/address_write_contract/index.html.eex:24
+#: lib/block_scout_web/templates/address_write_contract/index.html.eex:29
 #: lib/block_scout_web/templates/verified_contracts/_tile.html.eex:49
 #: lib/block_scout_web/templates/verified_contracts/index.html.eex:74
 #, elixir-autogen, elixir-format

From ffff1e5bdfaf3789537648afa1ad42e7d8beb27d Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Mon, 16 Oct 2023 18:47:10 +0200
Subject: [PATCH 10/11] Add metrics for num sanctions.

---
 .../lib/block_scout_web/application.ex           |  3 ++-
 .../lib/block_scout_web/celo/metrics_cron.ex     | 10 ++++++++--
 .../lib/block_scout_web/celo/web_metrics.ex      | 16 ++++++++++++++++
 3 files changed, 26 insertions(+), 3 deletions(-)
 create mode 100644 apps/block_scout_web/lib/block_scout_web/celo/web_metrics.ex

diff --git a/apps/block_scout_web/lib/block_scout_web/application.ex b/apps/block_scout_web/lib/block_scout_web/application.ex
index 7bf53b53a325..718c06f1d73e 100644
--- a/apps/block_scout_web/lib/block_scout_web/application.ex
+++ b/apps/block_scout_web/lib/block_scout_web/application.ex
@@ -9,6 +9,7 @@ defmodule BlockScoutWeb.Application do
 
   alias BlockScoutWeb.{CampaignBannerCache, LoggerBackend}
   alias BlockScoutWeb.Celo.MetricsCron
+  alias BlockScoutWeb.Celo.Telemetry.Instrumentation.Web
   alias BlockScoutWeb.Counters.{BlocksIndexedCounter, InternalTransactionsIndexedCounter}
   alias BlockScoutWeb.{Endpoint, RealtimeEventHandler}
 
@@ -32,7 +33,7 @@ defmodule BlockScoutWeb.Application do
         child_spec(Endpoint, []),
         {Absinthe.Subscription, Endpoint},
         {CeloPrometheusCollector,
-         metrics: [EthRPC.metrics(), Database.metrics(), FlyPostgres.metrics(), Api.metrics()]},
+         metrics: [EthRPC.metrics(), Database.metrics(), FlyPostgres.metrics(), Api.metrics(), Web.metrics()]},
         {RealtimeEventHandler, name: RealtimeEventHandler},
         {BlocksIndexedCounter, name: BlocksIndexedCounter},
         {CampaignBannerCache, name: CampaignBannerCache},
diff --git a/apps/block_scout_web/lib/block_scout_web/celo/metrics_cron.ex b/apps/block_scout_web/lib/block_scout_web/celo/metrics_cron.ex
index 91585b93e14b..0509a0001cc0 100644
--- a/apps/block_scout_web/lib/block_scout_web/celo/metrics_cron.ex
+++ b/apps/block_scout_web/lib/block_scout_web/celo/metrics_cron.ex
@@ -6,7 +6,7 @@ defmodule BlockScoutWeb.Celo.MetricsCron do
 
   alias BlockScoutWeb.Celo.MetricsCron.TaskSupervisor
   alias Explorer.Celo.Metrics.DatabaseMetrics
-  alias Explorer.Celo.Telemetry
+  alias Explorer.Celo.{SanctionCache, Telemetry}
 
   def start_link(_) do
     GenServer.start_link(__MODULE__, :ok, name: __MODULE__)
@@ -28,7 +28,8 @@ defmodule BlockScoutWeb.Celo.MetricsCron do
   end
 
   @metric_operations [
-    :database_stats
+    :database_stats,
+    :sanction_stats
   ]
 
   @impl true
@@ -83,4 +84,9 @@ defmodule BlockScoutWeb.Celo.MetricsCron do
     tables_by_size
     |> Enum.each(fn {name, size} -> Telemetry.event([:db, :table_size], %{size: size}, %{name: name}) end)
   end
+
+  def sanction_stats do
+    num_sanctions = SanctionCache.get_sanction_list() |> length()
+    Telemetry.event([:web, :sanctioned_addresses], %{value: num_sanctions})
+  end
 end
diff --git a/apps/block_scout_web/lib/block_scout_web/celo/web_metrics.ex b/apps/block_scout_web/lib/block_scout_web/celo/web_metrics.ex
new file mode 100644
index 000000000000..b3a6c2c45369
--- /dev/null
+++ b/apps/block_scout_web/lib/block_scout_web/celo/web_metrics.ex
@@ -0,0 +1,16 @@
+defmodule BlockScoutWeb.Celo.Telemetry.Instrumentation.Web do
+  @moduledoc "Custom celo block_scout_web metric definitions"
+
+  alias Explorer.Celo.Telemetry.Instrumentation
+  use Instrumentation
+
+  def metrics do
+    [
+      last_value("num_sanctioned_addresses",
+        event_name: [:blockscout, :web, :sanctioned_addresses],
+        measurement: :value,
+        description: "Total number of sanctioned addresses blocked from UI interaction"
+      )
+    ]
+  end
+end

From 10d7d092b8e6c2c4fb64ca9ee1a096ec0f4454ba Mon Sep 17 00:00:00 2001
From: Donald Hutchison <donald.hutchison@clabs.co>
Date: Tue, 17 Oct 2023 12:51:08 +0200
Subject: [PATCH 11/11] Revert changes to smart_contract_controller.ex.

---
 .../block_scout_web/controllers/smart_contract_controller.ex   | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex b/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
index 356952bef216..a49e2ec0562f 100644
--- a/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
+++ b/apps/block_scout_web/lib/block_scout_web/controllers/smart_contract_controller.ex
@@ -2,7 +2,6 @@ defmodule BlockScoutWeb.SmartContractController do
   use BlockScoutWeb, :controller
 
   alias BlockScoutWeb.AddressView
-  # alias Explorer.Celo.SanctionCache
   alias Explorer.Chain
   alias Explorer.Chain.SmartContract
   alias Explorer.SmartContract.{Reader, Writer}
@@ -86,7 +85,6 @@ defmodule BlockScoutWeb.SmartContractController do
         implementation_address: implementation_address_hash_string,
         implementation_abi: implementation_abi,
         contract_type: contract_type,
-        sanctions: ["smart_contract_controller.ex", "index"],
         action: action
       )
     else
@@ -140,7 +138,6 @@ defmodule BlockScoutWeb.SmartContractController do
         implementation_address: @burn_address,
         implementation_abi: [],
         contract_type: contract_type,
-        sanctions: ["smart_contract_controller.ex", "index"],
         action: action
       )
     else