chore: release prep

This PR adds the functionality to import a Unified Viewing Key (full or incoming) and to use it to scan the blockchain for transactions. It also adds the functionality to import a seed phrase as a new wallet.

Co-authored-by: Rene V. Vergara <rvergara59@protonmail.com>
Reviewed-on: #119
Co-authored-by: Rene Vergara <rene@vergara.network>
Co-committed-by: Rene Vergara <rene@vergara.network>

CHANGELOG.md

@@ -5,6 +5,12 @@ All notable changes to this project will be documented in this file.
 The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
 and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0.html).
 
+## [0.9.1.0-beta]
+
+### Fixed
+
+- RPC imports
+
 ## [0.9.0.0-beta]
 
 ### Added

app/Server.hs

@@ -77,7 +77,7 @@ main = do
                           zebraPort
                           (zgb_net chainInfo)
                       threadDelay 90000000
-                  putStrLn "Zenith RPC Server 0.9.0.0-beta"
+                  putStrLn "Zenith RPC Server 0.9.1.0-beta"
                   putStrLn "------------------------------"
                   putStrLn $
                     "Connected to " ++

src/Zenith/CLI.hs

@@ -794,7 +794,7 @@ drawUI s = [splashDialog s, helpDialog s, displayDialog s, inputDialog s, ui s]
                   (str
                      " _____          _ _   _     \n|__  /___ _ __ (_) |_| |__\n  / // _ \\ '_ \\| | __| '_ \\\n / /|  __/ | | | | |_| | | |\n/____\\___|_| |_|_|\\__|_| |_|") <=>
                 C.hCenter
-                  (withAttr titleAttr (str "Zcash Wallet v0.9.0.0-beta")) <=>
+                  (withAttr titleAttr (str "Zcash Wallet v0.9.1.0-beta")) <=>
                 C.hCenter (withAttr blinkAttr $ str "Press any key..."))
         else emptyWidget
     capCommand3 :: String -> String -> String -> Widget Name

src/Zenith/GUI.hs

@@ -2954,7 +2954,7 @@ runZenithGUI config = do
         Left _e -> print "Zebra not available"
   where
     params hd =
-      [ appWindowTitle "Zenith - Zcash Full Node Wallet - 0.9.0.0-beta"
+      [ appWindowTitle "Zenith - Zcash Full Node Wallet - 0.9.1.0-beta"
       , appWindowState $ MainWindowNormal (1000, 700)
       , appTheme zenithTheme
       , appFontDef

src/Zenith/RPC.hs

@@ -107,6 +107,7 @@ import Zenith.Types
   , AccountType(..)
   , Config(..)
   , HexStringDB(..)
+  , OrchardSpendingKeyDB(..)
   , PhraseDB(..)
   , PrivacyPolicy(..)
   , ProposedNote(..)
@@ -610,7 +611,7 @@ zenithServer state = getinfo :<|> handleRPC
     getinfo =
       return $
       object
-        [ "version" .= ("0.9.0.0-beta" :: String)
+        [ "version" .= ("0.9.1.0-beta" :: String)
         , "network" .= ("testnet" :: String)
         ]
     handleRPC :: Bool -> RpcCall -> Handler ZenithResponse
@@ -686,7 +687,7 @@ zenithServer state = getinfo :<|> handleRPC
               return $
               InfoResponse
                 (callId req)
-                (ZenithInfo "0.9.0.0-beta" (w_network state) (w_build state))
+                (ZenithInfo "0.9.1.0-beta" (w_network state) (w_build state))
             _anyOtherParams ->
               return $ ErrorResponse (callId req) (-32602) "Invalid params"
         ListReceived ->

src/Zenith/Utils.hs

@@ -42,12 +42,13 @@ import ZcashHaskell.Transparent
 import ZcashHaskell.Types
   ( ExchangeAddress(..)
   , ExchangeAddress(..)
+  , Phrase(..)
   , SaplingAddress(..)
   , TransparentAddress(..)
   , UnifiedAddress(..)
   , ValidAddress(..)
+  , ValidAddress(..)
   , ZcashNet(..)
-  , Phrase(..)
   )
 import ZcashHaskell.Utils (makeZebraCall)
 import Zenith.Types
@@ -383,4 +384,3 @@ scientificToInt sc = fromIntegral $ round $ toRealFloat sc
 -- Convert a ByteString to Phrase
 toPhrase :: BS.ByteString -> Phrase
 toPhrase = Phrase
-

zenith.cabal

@@ -1,6 +1,6 @@
 cabal-version:    3.0
 name:             zenith
-version:          0.9.0.0-beta
+version:          0.9.1.0-beta
 license:          MIT
 license-file:     LICENSE
 author:           Rene Vergara