Merge remote-tracking branch 'origin/stable'

# Conflicts:
#	.github/workflows/CI.yml
#	snap/snapcraft.yaml
#	src/GWallet.Backend/Properties/CommonAssemblyInfo.fs
#	src/GWallet.Backend/servers.json

src/GWallet.Backend/Caching.fs

@@ -15,6 +15,21 @@ type CachedNetworkData =
         Balances: Map<Currency,Map<PublicAddress,CachedValue<decimal>>>;
         OutgoingTransactions: Map<Currency,Map<PublicAddress,Map<string,CachedValue<decimal>>>>;
     }
+    member self.GetLeastOldDate() =
+        let allDates =
+            seq {
+                for KeyValue(_currency, (_price, date)) in self.UsdPrice do
+                    yield date
+                for KeyValue(_currency, addressesToBalancesMap) in self.Balances do
+                    for KeyValue(_addr, (_price, date)) in addressesToBalancesMap do
+                        yield date
+                for KeyValue(_currency, addressesToTxsMap) in self.OutgoingTransactions do
+                    for KeyValue(_addr, txHashToAmountsMap) in addressesToTxsMap do
+                        for KeyValue(_txHash, (_amount, date)) in txHashToAmountsMap do
+                            yield date
+            }
+        Seq.sort allDates |> Seq.rev |> Seq.tryHead
+
     static member Empty =
         {
             UsdPrice = Map.empty

src/GWallet.Backend/Server.fs

@@ -127,6 +127,9 @@ module ServerRegistry =
             // there was a mistake when adding this server to geewallet's JSON: it was added in the ETC currency instead of ETH
             (currency = Currency.ETC && server.ServerInfo.NetworkPath.Contains "ethrpc.mewapi.io")
 
+            // there was a typo when adding this server to geewallet's JSON, see commit 69d90fd2fc22a1f3dd9ef8793f0cd42e3b540df1
+            || (currency = Currency.ETC && server.ServerInfo.NetworkPath.Contains "ethercluster.comx/")
+
         let currency,servers = cs
         Seq.filter (fun server -> not (isBlackListed currency server)) servers
 

src/GWallet.Backend/servers.json

@@ -3953,7 +3953,7 @@
       },
       {
         "ServerInfo": {
-          "NetworkPath": "www.ethercluster.comx/etc",
+          "NetworkPath": "ethercluster.com/etc",
           "ConnectionType": {
             "Encrypted": true,
             "Protocol": {

src/GWallet.Frontend.Console/Program.fs

@@ -421,6 +421,20 @@ let rec CheckArchivedAccountsAreEmpty(): bool =
     not (archivedAccountsInNeedOfAction.Any())
 
 
+let DateSanityCheck() =
+    let currentDate = DateTime.Now
+    match Caching.Instance.GetLastCachedData().GetLeastOldDate() with
+    | None -> ()
+    | Some date ->
+        if date > currentDate then
+            Console.Error.WriteLine(
+                sprintf "WARNING: detected current system date is %s, which suggests that either it's wrong or the cache data was generated in a moment with wrong future date(s) such as %s"
+                    (currentDate |> Formatting.ShowSaneDate)
+                    (date |> Formatting.ShowSaneDate)
+            )
+            Console.Error.Write "NOTE: it is recommended to fix this situation (by setting the current system date, or deleting the cache data folder), or the prices/rates might not update properly"
+            UserInteraction.PressAnyKeyToContinue()
+
 let rec ProgramMainLoop() =
     let activeAccounts = Account.GetAllActiveAccounts()
     let hotAccounts =
@@ -450,6 +464,8 @@ let NormalStartWithNoParameters () =
 
     let exitCode =
         try
+            DateSanityCheck()
+
             ProgramMainLoop ()
             0
         with