BtcLsp.Data.Env

Documentation

data Env

Constructors

Env

Fields

• envSQLPool :: Pool SqlBackend

  General

• envMinTotalExtOutgoingLiquidity :: Liquidity 'Outgoing
• envMinTotalExtIncomingLiquidity :: Liquidity 'Incoming
• envMinTotalOnChainLiquidity :: MSat
• envKatipNS :: Namespace

  Logging

• envKatipCTX :: LogContexts
• envKatipLE :: LogEnv
• envYesodLog :: YesodLog
• envLnd :: LndEnv

  Lnd

• envLndP2PHost :: HostName
• envLndP2PPort :: PortNumber
• envSwapIntoLnMinAmt :: Money 'Usr 'OnChain 'Fund
• envMsatPerByte :: Maybe MSat
• envLndPubKey :: MVar NodePubKey
• envGrpcServer :: GSEnv

  Grpc

• envBtc :: Client

  Bitcoind

Instances

Monad m => MonadReader Env (AppM m)

Defined in BtcLsp.Data.AppM

Methods

ask :: AppM m Env

local :: (Env -> Env) -> AppM m a -> AppM m a

reader :: (Env -> a) -> AppM m a

data RawConfig

Constructors

RawConfig

Fields

• rawConfigLibpqConnStr :: ConnectionString

  General

• rawConfigMinTotalExtOutgoingLiquidity :: Liquidity 'Outgoing
• rawConfigMinTotalExtIncomingLiquidity :: Liquidity 'Incoming
• rawConfigMinTotalOnChainLiquidity :: MSat
• rawConfigLogEnv :: Text

  Logging

• rawConfigLogFormat :: LogFormat
• rawConfigLogVerbosity :: Verbosity
• rawConfigLogSeverity :: Severity
• rawConfigLogSecrets :: SecretVision
• rawConfigLogYesod :: YesodLog
• rawConfigLndEnv :: LndEnv

  Lnd

• rawConfigLndP2PHost :: HostName
• rawConfigLndP2PPort :: PortNumber
• rawConfigMinChanCap :: Money 'Chan 'Ln 'Fund
• rawConfigMsatPerByte :: Maybe MSat
• rawConfigGrpcServerEnv :: GSEnv

  Grpc

• rawConfigBtcEnv :: BitcoindEnv

  Bitcoind

data BitcoindEnv

Constructors

BitcoindEnv

Fields

• bitcoindEnvHost :: Text
• bitcoindEnvUsername :: Text
• bitcoindEnvPassword :: Text

Instances

FromJSON BitcoindEnv

Defined in BtcLsp.Data.Env

Methods

parseJSON :: Value -> Parser BitcoindEnv

parseJSONList :: Value -> Parser [BitcoindEnv]

Generic BitcoindEnv

Defined in BtcLsp.Data.Env

Associated Types

type Rep BitcoindEnv :: Type -> Type

Methods

from :: BitcoindEnv -> Rep BitcoindEnv x

to :: Rep BitcoindEnv x -> BitcoindEnv

type Rep BitcoindEnv

Defined in BtcLsp.Data.Env

type Rep BitcoindEnv = D1 ('MetaData "BitcoindEnv" "BtcLsp.Data.Env" "btc-lsp-0.1.0.0-inplace" 'False) (C1 ('MetaCons "BitcoindEnv" 'PrefixI 'True) (S1 ('MetaSel ('Just "bitcoindEnvHost") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :*: (S1 ('MetaSel ('Just "bitcoindEnvUsername") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :*: S1 ('MetaSel ('Just "bitcoindEnvPassword") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Text))))

readRawConfig :: IO RawConfig

readGCEnv :: IO GCEnv

withEnv :: forall m a. MonadUnliftIO m => RawConfig -> (Env -> KatipContextT m a) -> m a

parseFromJSON :: FromJSON a => String -> Either Error a