Skip to content
This repository was archived by the owner on Aug 18, 2020. It is now read-only.

export legacy wallets in a friendly way for automatic import in cardano-wallet #4278

Open
wants to merge 11 commits into
base: develop
Choose a base branch
from
Open

export legacy wallets in a friendly way for automatic import in cardano-wallet #4278

Show file tree
Hide file tree
Changes from 1 commit
Commits
Show all changes
11 commits
Select commit Hold shift + click to select a range
f63761e
implement export-wallets for Byron reboot migration
KtorZ Mar 17, 2020
148076e
Return 'null' for 'passphrase_hash' when there's no passphrase set
KtorZ Mar 17, 2020
787e72e
regen nix files
cleverca22 Mar 17, 2020
da6645c
fail when given a non-existing database path
KtorZ Mar 18, 2020
9b53dc1
re-generate nix machinery
KtorZ Mar 18, 2020
1702a9e
actually returns corresponding scrypt hash even for empty passphrases
KtorZ Mar 27, 2020
776a638
returns wallets with no metadata if prv key exists
KtorZ Apr 8, 2020
996a17f
add wallet id (new format) to the exported JSON
KtorZ Apr 8, 2020
6054e7e
re-generate nix machinery
KtorZ Apr 8, 2020
13f5729
make acid-state database optional from the command-line
KtorZ Apr 15, 2020
c1815b7
show in the JSON export whether a passphrase is empty or not
KtorZ Apr 15, 2020
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
1 change: 1 addition & 0 deletions wallet/cardano-wallet.cabal
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -369,6 +369,7 @@ executable export-wallets
, cardano-sl-util
, cardano-wallet
, contravariant
, directory
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Nix files will need regenerating.

, memory
, optparse-applicative
, text
Expand Down
18 changes: 12 additions & 6 deletions wallet/export-wallets/Main.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,4 +1,5 @@
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE TypeApplications #-}

Expand Down Expand Up @@ -29,6 +30,7 @@ import Pos.Infra.InjectFail (mkFInjects)
import Pos.Util.Log.Severity (Severity (..))
import Pos.Util.Trace (Trace (..))
import Pos.Util.UserSecret (readUserSecret)
import System.Directory (doesDirectoryExist)

import qualified Cardano.Wallet.Kernel as Kernel
import qualified Cardano.Wallet.Kernel.Internal as Kernel
Expand All @@ -51,20 +53,24 @@ main :: IO ()
main = do
let preferences = prefs showHelpOnEmpty
Options{pm,dbPath,usPath} <- customExecParser preferences parserInfo
let dbOpts = DatabaseOptions
{ dbPathAcidState = dbPath <> "-acid"
, dbPathMetadata = dbPath <> "-sqlite.sqlite3"
, dbRebuild = False
}
guardDatabase dbOpts
userSecret <- readUserSecret (contramap snd stderrTrace) usPath
bracketLegacyKeystore userSecret $ \ks -> do
let dbMode = UseFilePath $ DatabaseOptions
{ Kernel.dbPathAcidState = dbPath <> "-acid"
, Kernel.dbPathMetadata = dbPath <> "-sqlite.sqlite3"
, Kernel.dbRebuild = False
}
fInjects <- mkFInjects Nothing
bracketPassiveWallet pm dbMode log ks mockNodeStateDef fInjects $ \pw -> do
bracketPassiveWallet pm (UseFilePath dbOpts) log ks mockNodeStateDef fInjects $ \pw -> do
wallets <- extractWallet pw
BL8.putStrLn $ Json.encodePretty (Export <$> wallets)
where
log = const (B8.hPutStrLn stderr . T.encodeUtf8)
stderrTrace = Trace $ Op $ TIO.hPutStrLn stderr
guardDatabase = doesDirectoryExist . dbPathAcidState >=> \case
True -> pure ()
False -> fail "There's no acid-state database matching the given path."

extractWallet
:: Kernel.PassiveWallet
Expand Down