Backend: remove readonly accs migration

Remove readonly accounts migration to native segwit.
nblockchain · Jul 23, 2024 · f3d4f39 · f3d4f39
1 parent 57baa4f
commit f3d4f39
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 36 deletions.
diff --git a/src/GWallet.Backend/Account.fs b/src/GWallet.Backend/Account.fs
@@ -17,13 +17,8 @@ type UnhandledCurrencyServerException(currency: Currency,
 
 module Account =
 
-    let private isInitialized (accounts: seq<IAccount>) = lazy(
+    let private isInitialized (_accounts: seq<IAccount>) = lazy(
         Config.Init()
-
-        let readonlyUtxoAccounts =
-            accounts.Where(fun acc -> acc.Currency.IsUtxo()).OfType<ReadOnlyAccount>()
-
-        UtxoCoin.Account.MigrateReadOnlyAccountsToNativeSegWit readonlyUtxoAccounts
     )
 
     let private GetShowableBalanceAndImminentPaymentInternal (account: IAccount)

diff --git a/src/GWallet.Backend/UtxoCoin/UtxoCoinAccount.fs b/src/GWallet.Backend/UtxoCoin/UtxoCoinAccount.fs
@@ -700,36 +700,6 @@ module Account =
             Config.AddAccount conceptAccountForReadOnlyAccount AccountKind.ReadOnly
             |> ignore<FileRepresentation>
 
-    let internal MigrateReadOnlyAccountsToNativeSegWit (readOnlyUtxoAccounts: seq<ReadOnlyAccount>): unit =
-        let utxoAccountsToMigrate =
-            seq {
-                for utxoAccount in readOnlyUtxoAccounts do
-                    let accountFile = utxoAccount.AccountFile
-                    let prefix =
-                        match (utxoAccount :> IAccount).Currency with
-                        | Currency.BTC ->
-                            BITCOIN_ADDRESS_BECH32_PREFIX
-                        | Currency.LTC ->
-                            LITECOIN_ADDRESS_BECH32_PREFIX
-                        | otherCurrency -> failwith <| SPrintF1 "Missed UTXO currency %A when implementing NativeSegwit migration?" otherCurrency
-                    if not (accountFile.Name.StartsWith prefix) then
-                        yield utxoAccount
-            }
-
-        let utxoPublicKeys =
-            seq {
-                for utxoReadOnlyAccount in utxoAccountsToMigrate do
-                    let accountFile = utxoReadOnlyAccount.AccountFile
-                    let utxoPublicKey = accountFile.Content()
-                    yield utxoPublicKey
-            } |> Set.ofSeq
-
-        for utxoPublicKey in utxoPublicKeys do
-            CreateReadOnlyAccounts utxoPublicKey
-
-        for utxoReadOnlyAccount in utxoAccountsToMigrate do
-            Config.RemoveReadOnlyAccount utxoReadOnlyAccount
-
     let GetSignedTransactionDetails<'T when 'T :> IBlockchainFeeInfo>(rawTransaction: string)
                                                                      (currency: Currency)
                                                                      (readonlyUtxoAccounts: seq<ReadOnlyUtxoAccount>)