{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.InvoiceGrpc (
Invoices(..), AddHoldInvoiceRequest(), AddHoldInvoiceResp(),
CancelInvoiceMsg(), CancelInvoiceResp(), SettleInvoiceMsg(),
SettleInvoiceResp(), SubscribeSingleInvoiceRequest()
) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
import qualified Proto.LndGrpc
data AddHoldInvoiceRequest
= AddHoldInvoiceRequest'_constructor {_AddHoldInvoiceRequest'memo :: !Data.Text.Text,
_AddHoldInvoiceRequest'hash :: !Data.ByteString.ByteString,
_AddHoldInvoiceRequest'value :: !Data.Int.Int64,
_AddHoldInvoiceRequest'valueMsat :: !Data.Int.Int64,
_AddHoldInvoiceRequest'descriptionHash :: !Data.ByteString.ByteString,
_AddHoldInvoiceRequest'expiry :: !Data.Int.Int64,
_AddHoldInvoiceRequest'fallbackAddr :: !Data.Text.Text,
_AddHoldInvoiceRequest'cltvExpiry :: !Data.Word.Word64,
_AddHoldInvoiceRequest'routeHints :: !(Data.Vector.Vector Proto.LndGrpc.RouteHint),
_AddHoldInvoiceRequest'private :: !Prelude.Bool,
_AddHoldInvoiceRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Prelude.Eq, Prelude.Ord)
instance Prelude.Show AddHoldInvoiceRequest where
showsPrec _ __x __s
= Prelude.showChar
'{'
(Prelude.showString
(Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s))
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "memo" Data.Text.Text where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'memo
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'memo = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "hash" Data.ByteString.ByteString where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'hash
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'hash = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "value" Data.Int.Int64 where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'value
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'value = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "valueMsat" Data.Int.Int64 where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'valueMsat
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'valueMsat = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "descriptionHash" Data.ByteString.ByteString where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'descriptionHash
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'descriptionHash = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "expiry" Data.Int.Int64 where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'expiry
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'expiry = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "fallbackAddr" Data.Text.Text where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'fallbackAddr
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'fallbackAddr = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "cltvExpiry" Data.Word.Word64 where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'cltvExpiry
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'cltvExpiry = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "routeHints" [Proto.LndGrpc.RouteHint] where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'routeHints
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'routeHints = y__}))
(Lens.Family2.Unchecked.lens
Data.Vector.Generic.toList
(\ _ y__ -> Data.Vector.Generic.fromList y__))
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "vec'routeHints" (Data.Vector.Vector Proto.LndGrpc.RouteHint) where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'routeHints
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'routeHints = y__}))
Prelude.id
instance Data.ProtoLens.Field.HasField AddHoldInvoiceRequest "private" Prelude.Bool where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'private
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'private = y__}))
Prelude.id
instance Data.ProtoLens.Message AddHoldInvoiceRequest where
messageName _ = Data.Text.pack "invoicesrpc.AddHoldInvoiceRequest"
packedMessageDescriptor _
= "\n\
\\NAKAddHoldInvoiceRequest\DC2\DC2\n\
\\EOTmemo\CAN\SOH \SOH(\tR\EOTmemo\DC2\DC2\n\
\\EOThash\CAN\STX \SOH(\fR\EOThash\DC2\DC4\n\
\\ENQvalue\CAN\ETX \SOH(\ETXR\ENQvalue\DC2\GS\n\
\\n\
\value_msat\CAN\n\
\ \SOH(\ETXR\tvalueMsat\DC2)\n\
\\DLEdescription_hash\CAN\EOT \SOH(\fR\SIdescriptionHash\DC2\SYN\n\
\\ACKexpiry\CAN\ENQ \SOH(\ETXR\ACKexpiry\DC2#\n\
\\rfallback_addr\CAN\ACK \SOH(\tR\ffallbackAddr\DC2\US\n\
\\vcltv_expiry\CAN\a \SOH(\EOTR\n\
\cltvExpiry\DC21\n\
\\vroute_hints\CAN\b \ETX(\v2\DLE.lnrpc.RouteHintR\n\
\routeHints\DC2\CAN\n\
\\aprivate\CAN\t \SOH(\bR\aprivate"
packedFileDescriptor _ = packedFileDescriptor
fieldsByTag
= let
memo__field_descriptor
= Data.ProtoLens.FieldDescriptor
"memo"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"memo")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
hash__field_descriptor
= Data.ProtoLens.FieldDescriptor
"hash"
(Data.ProtoLens.ScalarField Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"hash")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
value__field_descriptor
= Data.ProtoLens.FieldDescriptor
"value"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"value")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
valueMsat__field_descriptor
= Data.ProtoLens.FieldDescriptor
"value_msat"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional
(Data.ProtoLens.Field.field @"valueMsat")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
descriptionHash__field_descriptor
= Data.ProtoLens.FieldDescriptor
"description_hash"
(Data.ProtoLens.ScalarField Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional
(Data.ProtoLens.Field.field @"descriptionHash")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
expiry__field_descriptor
= Data.ProtoLens.FieldDescriptor
"expiry"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"expiry")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
fallbackAddr__field_descriptor
= Data.ProtoLens.FieldDescriptor
"fallback_addr"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional
(Data.ProtoLens.Field.field @"fallbackAddr")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
cltvExpiry__field_descriptor
= Data.ProtoLens.FieldDescriptor
"cltv_expiry"
(Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional
(Data.ProtoLens.Field.field @"cltvExpiry")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
routeHints__field_descriptor
= Data.ProtoLens.FieldDescriptor
"route_hints"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.LndGrpc.RouteHint)
(Data.ProtoLens.RepeatedField
Data.ProtoLens.Unpacked
(Data.ProtoLens.Field.field @"routeHints")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
private__field_descriptor
= Data.ProtoLens.FieldDescriptor
"private"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"private")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceRequest
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, memo__field_descriptor),
(Data.ProtoLens.Tag 2, hash__field_descriptor),
(Data.ProtoLens.Tag 3, value__field_descriptor),
(Data.ProtoLens.Tag 10, valueMsat__field_descriptor),
(Data.ProtoLens.Tag 4, descriptionHash__field_descriptor),
(Data.ProtoLens.Tag 5, expiry__field_descriptor),
(Data.ProtoLens.Tag 6, fallbackAddr__field_descriptor),
(Data.ProtoLens.Tag 7, cltvExpiry__field_descriptor),
(Data.ProtoLens.Tag 8, routeHints__field_descriptor),
(Data.ProtoLens.Tag 9, private__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_AddHoldInvoiceRequest'_unknownFields
(\ x__ y__ -> x__ {_AddHoldInvoiceRequest'_unknownFields = y__})
defMessage
= AddHoldInvoiceRequest'_constructor
{_AddHoldInvoiceRequest'memo = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'hash = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'value = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'valueMsat = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'descriptionHash = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'expiry = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'fallbackAddr = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'cltvExpiry = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'routeHints = Data.Vector.Generic.empty,
_AddHoldInvoiceRequest'private = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceRequest'_unknownFields = []}
parseMessage
= let
loop ::
AddHoldInvoiceRequest
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.LndGrpc.RouteHint
-> Data.ProtoLens.Encoding.Bytes.Parser AddHoldInvoiceRequest
loop x mutable'routeHints
= do end <- Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do frozen'routeHints <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Data.ProtoLens.Encoding.Growing.unsafeFreeze
mutable'routeHints)
(let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields
(\ !t -> Prelude.reverse t)
(Lens.Family2.set
(Data.ProtoLens.Field.field @"vec'routeHints")
frozen'routeHints
x))
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
10
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do value <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len)
Data.ProtoLens.Encoding.Bytes.runEither
(case Data.Text.Encoding.decodeUtf8' value of
(Prelude.Left err)
-> Prelude.Left (Prelude.show err)
(Prelude.Right r) -> Prelude.Right r))
"memo"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"memo") y x)
mutable'routeHints
18
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len))
"hash"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"hash") y x)
mutable'routeHints
24
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(Prelude.fmap
Prelude.fromIntegral
Data.ProtoLens.Encoding.Bytes.getVarInt)
"value"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x)
mutable'routeHints
80
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(Prelude.fmap
Prelude.fromIntegral
Data.ProtoLens.Encoding.Bytes.getVarInt)
"value_msat"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"valueMsat") y x)
mutable'routeHints
34
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len))
"description_hash"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"descriptionHash") y x)
mutable'routeHints
40
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(Prelude.fmap
Prelude.fromIntegral
Data.ProtoLens.Encoding.Bytes.getVarInt)
"expiry"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"expiry") y x)
mutable'routeHints
50
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do value <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len)
Data.ProtoLens.Encoding.Bytes.runEither
(case Data.Text.Encoding.decodeUtf8' value of
(Prelude.Left err)
-> Prelude.Left (Prelude.show err)
(Prelude.Right r) -> Prelude.Right r))
"fallback_addr"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"fallbackAddr") y x)
mutable'routeHints
56
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
Data.ProtoLens.Encoding.Bytes.getVarInt "cltv_expiry"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"cltvExpiry") y x)
mutable'routeHints
66
-> do !y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len)
Data.ProtoLens.parseMessage)
"route_hints"
v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Data.ProtoLens.Encoding.Growing.append mutable'routeHints y)
loop x v
72
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(Prelude.fmap
((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt)
"private"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"private") y x)
mutable'routeHints
wire
-> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> (:) y t) x)
mutable'routeHints
in
(Data.ProtoLens.Encoding.Bytes.<?>)
(do mutable'routeHints <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
Data.ProtoLens.Encoding.Growing.new
loop Data.ProtoLens.defMessage mutable'routeHints)
"AddHoldInvoiceRequest"
buildMessage
= \ _x
-> (Data.Monoid.<>)
(let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"memo") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 10)
((Prelude..)
(\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral (Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
Data.Text.Encoding.encodeUtf8
_v))
((Data.Monoid.<>)
(let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"hash") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 18)
((\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral (Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
_v))
((Data.Monoid.<>)
(let
_v = Lens.Family2.view (Data.ProtoLens.Field.field @"value") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 24)
((Prelude..)
Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v))
((Data.Monoid.<>)
(let
_v = Lens.Family2.view (Data.ProtoLens.Field.field @"valueMsat") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 80)
((Prelude..)
Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v))
((Data.Monoid.<>)
(let
_v
= Lens.Family2.view
(Data.ProtoLens.Field.field @"descriptionHash") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 34)
((\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral (Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
_v))
((Data.Monoid.<>)
(let
_v = Lens.Family2.view (Data.ProtoLens.Field.field @"expiry") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 40)
((Prelude..)
Data.ProtoLens.Encoding.Bytes.putVarInt
Prelude.fromIntegral
_v))
((Data.Monoid.<>)
(let
_v
= Lens.Family2.view
(Data.ProtoLens.Field.field @"fallbackAddr") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 50)
((Prelude..)
(\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral
(Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
Data.Text.Encoding.encodeUtf8
_v))
((Data.Monoid.<>)
(let
_v
= Lens.Family2.view
(Data.ProtoLens.Field.field @"cltvExpiry") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 56)
(Data.ProtoLens.Encoding.Bytes.putVarInt _v))
((Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.foldMapBuilder
(\ _v
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 66)
((Prelude..)
(\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral
(Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes
bs))
Data.ProtoLens.encodeMessage
_v))
(Lens.Family2.view
(Data.ProtoLens.Field.field @"vec'routeHints") _x))
((Data.Monoid.<>)
(let
_v
= Lens.Family2.view
(Data.ProtoLens.Field.field @"private") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 72)
((Prelude..)
Data.ProtoLens.Encoding.Bytes.putVarInt
(\ b -> if b then 1 else 0)
_v))
(Data.ProtoLens.Encoding.Wire.buildFieldSet
(Lens.Family2.view
Data.ProtoLens.unknownFields _x)))))))))))
instance Control.DeepSeq.NFData AddHoldInvoiceRequest where
rnf
= \ x__
-> Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'_unknownFields x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'memo x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'hash x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'value x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'valueMsat x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'descriptionHash x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'expiry x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'fallbackAddr x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'cltvExpiry x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'routeHints x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceRequest'private x__) ()))))))))))
data AddHoldInvoiceResp
= AddHoldInvoiceResp'_constructor {_AddHoldInvoiceResp'paymentRequest :: !Data.Text.Text,
_AddHoldInvoiceResp'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Prelude.Eq, Prelude.Ord)
instance Prelude.Show AddHoldInvoiceResp where
showsPrec _ __x __s
= Prelude.showChar
'{'
(Prelude.showString
(Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s))
instance Data.ProtoLens.Field.HasField AddHoldInvoiceResp "paymentRequest" Data.Text.Text where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_AddHoldInvoiceResp'paymentRequest
(\ x__ y__ -> x__ {_AddHoldInvoiceResp'paymentRequest = y__}))
Prelude.id
instance Data.ProtoLens.Message AddHoldInvoiceResp where
messageName _ = Data.Text.pack "invoicesrpc.AddHoldInvoiceResp"
packedMessageDescriptor _
= "\n\
\\DC2AddHoldInvoiceResp\DC2'\n\
\\SIpayment_request\CAN\SOH \SOH(\tR\SOpaymentRequest"
packedFileDescriptor _ = packedFileDescriptor
fieldsByTag
= let
paymentRequest__field_descriptor
= Data.ProtoLens.FieldDescriptor
"payment_request"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional
(Data.ProtoLens.Field.field @"paymentRequest")) ::
Data.ProtoLens.FieldDescriptor AddHoldInvoiceResp
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, paymentRequest__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_AddHoldInvoiceResp'_unknownFields
(\ x__ y__ -> x__ {_AddHoldInvoiceResp'_unknownFields = y__})
defMessage
= AddHoldInvoiceResp'_constructor
{_AddHoldInvoiceResp'paymentRequest = Data.ProtoLens.fieldDefault,
_AddHoldInvoiceResp'_unknownFields = []}
parseMessage
= let
loop ::
AddHoldInvoiceResp
-> Data.ProtoLens.Encoding.Bytes.Parser AddHoldInvoiceResp
loop x
= do end <- Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
10
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do value <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len)
Data.ProtoLens.Encoding.Bytes.runEither
(case Data.Text.Encoding.decodeUtf8' value of
(Prelude.Left err)
-> Prelude.Left (Prelude.show err)
(Prelude.Right r) -> Prelude.Right r))
"payment_request"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"paymentRequest") y x)
wire
-> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> (:) y t) x)
in
(Data.ProtoLens.Encoding.Bytes.<?>)
(do loop Data.ProtoLens.defMessage) "AddHoldInvoiceResp"
buildMessage
= \ _x
-> (Data.Monoid.<>)
(let
_v
= Lens.Family2.view
(Data.ProtoLens.Field.field @"paymentRequest") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 10)
((Prelude..)
(\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral (Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
Data.Text.Encoding.encodeUtf8
_v))
(Data.ProtoLens.Encoding.Wire.buildFieldSet
(Lens.Family2.view Data.ProtoLens.unknownFields _x))
instance Control.DeepSeq.NFData AddHoldInvoiceResp where
rnf
= \ x__
-> Control.DeepSeq.deepseq
(_AddHoldInvoiceResp'_unknownFields x__)
(Control.DeepSeq.deepseq
(_AddHoldInvoiceResp'paymentRequest x__) ())
data CancelInvoiceMsg
= CancelInvoiceMsg'_constructor {_CancelInvoiceMsg'paymentHash :: !Data.ByteString.ByteString,
_CancelInvoiceMsg'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Prelude.Eq, Prelude.Ord)
instance Prelude.Show CancelInvoiceMsg where
showsPrec _ __x __s
= Prelude.showChar
'{'
(Prelude.showString
(Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s))
instance Data.ProtoLens.Field.HasField CancelInvoiceMsg "paymentHash" Data.ByteString.ByteString where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_CancelInvoiceMsg'paymentHash
(\ x__ y__ -> x__ {_CancelInvoiceMsg'paymentHash = y__}))
Prelude.id
instance Data.ProtoLens.Message CancelInvoiceMsg where
messageName _ = Data.Text.pack "invoicesrpc.CancelInvoiceMsg"
packedMessageDescriptor _
= "\n\
\\DLECancelInvoiceMsg\DC2!\n\
\\fpayment_hash\CAN\SOH \SOH(\fR\vpaymentHash"
packedFileDescriptor _ = packedFileDescriptor
fieldsByTag
= let
paymentHash__field_descriptor
= Data.ProtoLens.FieldDescriptor
"payment_hash"
(Data.ProtoLens.ScalarField Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional
(Data.ProtoLens.Field.field @"paymentHash")) ::
Data.ProtoLens.FieldDescriptor CancelInvoiceMsg
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, paymentHash__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_CancelInvoiceMsg'_unknownFields
(\ x__ y__ -> x__ {_CancelInvoiceMsg'_unknownFields = y__})
defMessage
= CancelInvoiceMsg'_constructor
{_CancelInvoiceMsg'paymentHash = Data.ProtoLens.fieldDefault,
_CancelInvoiceMsg'_unknownFields = []}
parseMessage
= let
loop ::
CancelInvoiceMsg
-> Data.ProtoLens.Encoding.Bytes.Parser CancelInvoiceMsg
loop x
= do end <- Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
10
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len))
"payment_hash"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"paymentHash") y x)
wire
-> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> (:) y t) x)
in
(Data.ProtoLens.Encoding.Bytes.<?>)
(do loop Data.ProtoLens.defMessage) "CancelInvoiceMsg"
buildMessage
= \ _x
-> (Data.Monoid.<>)
(let
_v
= Lens.Family2.view (Data.ProtoLens.Field.field @"paymentHash") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 10)
((\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral (Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
_v))
(Data.ProtoLens.Encoding.Wire.buildFieldSet
(Lens.Family2.view Data.ProtoLens.unknownFields _x))
instance Control.DeepSeq.NFData CancelInvoiceMsg where
rnf
= \ x__
-> Control.DeepSeq.deepseq
(_CancelInvoiceMsg'_unknownFields x__)
(Control.DeepSeq.deepseq (_CancelInvoiceMsg'paymentHash x__) ())
data CancelInvoiceResp
= CancelInvoiceResp'_constructor {_CancelInvoiceResp'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Prelude.Eq, Prelude.Ord)
instance Prelude.Show CancelInvoiceResp where
showsPrec _ __x __s
= Prelude.showChar
'{'
(Prelude.showString
(Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s))
instance Data.ProtoLens.Message CancelInvoiceResp where
messageName _ = Data.Text.pack "invoicesrpc.CancelInvoiceResp"
packedMessageDescriptor _
= "\n\
\\DC1CancelInvoiceResp"
packedFileDescriptor _ = packedFileDescriptor
fieldsByTag = let in Data.Map.fromList []
unknownFields
= Lens.Family2.Unchecked.lens
_CancelInvoiceResp'_unknownFields
(\ x__ y__ -> x__ {_CancelInvoiceResp'_unknownFields = y__})
defMessage
= CancelInvoiceResp'_constructor
{_CancelInvoiceResp'_unknownFields = []}
parseMessage
= let
loop ::
CancelInvoiceResp
-> Data.ProtoLens.Encoding.Bytes.Parser CancelInvoiceResp
loop x
= do end <- Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of {
wire
-> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) }
in
(Data.ProtoLens.Encoding.Bytes.<?>)
(do loop Data.ProtoLens.defMessage) "CancelInvoiceResp"
buildMessage
= \ _x
-> Data.ProtoLens.Encoding.Wire.buildFieldSet
(Lens.Family2.view Data.ProtoLens.unknownFields _x)
instance Control.DeepSeq.NFData CancelInvoiceResp where
rnf
= \ x__
-> Control.DeepSeq.deepseq
(_CancelInvoiceResp'_unknownFields x__) ()
data SettleInvoiceMsg
= SettleInvoiceMsg'_constructor {_SettleInvoiceMsg'preimage :: !Data.ByteString.ByteString,
_SettleInvoiceMsg'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Prelude.Eq, Prelude.Ord)
instance Prelude.Show SettleInvoiceMsg where
showsPrec _ __x __s
= Prelude.showChar
'{'
(Prelude.showString
(Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s))
instance Data.ProtoLens.Field.HasField SettleInvoiceMsg "preimage" Data.ByteString.ByteString where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_SettleInvoiceMsg'preimage
(\ x__ y__ -> x__ {_SettleInvoiceMsg'preimage = y__}))
Prelude.id
instance Data.ProtoLens.Message SettleInvoiceMsg where
messageName _ = Data.Text.pack "invoicesrpc.SettleInvoiceMsg"
packedMessageDescriptor _
= "\n\
\\DLESettleInvoiceMsg\DC2\SUB\n\
\\bpreimage\CAN\SOH \SOH(\fR\bpreimage"
packedFileDescriptor _ = packedFileDescriptor
fieldsByTag
= let
preimage__field_descriptor
= Data.ProtoLens.FieldDescriptor
"preimage"
(Data.ProtoLens.ScalarField Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional
(Data.ProtoLens.Field.field @"preimage")) ::
Data.ProtoLens.FieldDescriptor SettleInvoiceMsg
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, preimage__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_SettleInvoiceMsg'_unknownFields
(\ x__ y__ -> x__ {_SettleInvoiceMsg'_unknownFields = y__})
defMessage
= SettleInvoiceMsg'_constructor
{_SettleInvoiceMsg'preimage = Data.ProtoLens.fieldDefault,
_SettleInvoiceMsg'_unknownFields = []}
parseMessage
= let
loop ::
SettleInvoiceMsg
-> Data.ProtoLens.Encoding.Bytes.Parser SettleInvoiceMsg
loop x
= do end <- Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
10
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len))
"preimage"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"preimage") y x)
wire
-> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> (:) y t) x)
in
(Data.ProtoLens.Encoding.Bytes.<?>)
(do loop Data.ProtoLens.defMessage) "SettleInvoiceMsg"
buildMessage
= \ _x
-> (Data.Monoid.<>)
(let
_v = Lens.Family2.view (Data.ProtoLens.Field.field @"preimage") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 10)
((\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral (Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
_v))
(Data.ProtoLens.Encoding.Wire.buildFieldSet
(Lens.Family2.view Data.ProtoLens.unknownFields _x))
instance Control.DeepSeq.NFData SettleInvoiceMsg where
rnf
= \ x__
-> Control.DeepSeq.deepseq
(_SettleInvoiceMsg'_unknownFields x__)
(Control.DeepSeq.deepseq (_SettleInvoiceMsg'preimage x__) ())
data SettleInvoiceResp
= SettleInvoiceResp'_constructor {_SettleInvoiceResp'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Prelude.Eq, Prelude.Ord)
instance Prelude.Show SettleInvoiceResp where
showsPrec _ __x __s
= Prelude.showChar
'{'
(Prelude.showString
(Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s))
instance Data.ProtoLens.Message SettleInvoiceResp where
messageName _ = Data.Text.pack "invoicesrpc.SettleInvoiceResp"
packedMessageDescriptor _
= "\n\
\\DC1SettleInvoiceResp"
packedFileDescriptor _ = packedFileDescriptor
fieldsByTag = let in Data.Map.fromList []
unknownFields
= Lens.Family2.Unchecked.lens
_SettleInvoiceResp'_unknownFields
(\ x__ y__ -> x__ {_SettleInvoiceResp'_unknownFields = y__})
defMessage
= SettleInvoiceResp'_constructor
{_SettleInvoiceResp'_unknownFields = []}
parseMessage
= let
loop ::
SettleInvoiceResp
-> Data.ProtoLens.Encoding.Bytes.Parser SettleInvoiceResp
loop x
= do end <- Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of {
wire
-> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) }
in
(Data.ProtoLens.Encoding.Bytes.<?>)
(do loop Data.ProtoLens.defMessage) "SettleInvoiceResp"
buildMessage
= \ _x
-> Data.ProtoLens.Encoding.Wire.buildFieldSet
(Lens.Family2.view Data.ProtoLens.unknownFields _x)
instance Control.DeepSeq.NFData SettleInvoiceResp where
rnf
= \ x__
-> Control.DeepSeq.deepseq
(_SettleInvoiceResp'_unknownFields x__) ()
data SubscribeSingleInvoiceRequest
= SubscribeSingleInvoiceRequest'_constructor {_SubscribeSingleInvoiceRequest'rHash :: !Data.ByteString.ByteString,
_SubscribeSingleInvoiceRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Prelude.Eq, Prelude.Ord)
instance Prelude.Show SubscribeSingleInvoiceRequest where
showsPrec _ __x __s
= Prelude.showChar
'{'
(Prelude.showString
(Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s))
instance Data.ProtoLens.Field.HasField SubscribeSingleInvoiceRequest "rHash" Data.ByteString.ByteString where
fieldOf _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_SubscribeSingleInvoiceRequest'rHash
(\ x__ y__ -> x__ {_SubscribeSingleInvoiceRequest'rHash = y__}))
Prelude.id
instance Data.ProtoLens.Message SubscribeSingleInvoiceRequest where
messageName _
= Data.Text.pack "invoicesrpc.SubscribeSingleInvoiceRequest"
packedMessageDescriptor _
= "\n\
\\GSSubscribeSingleInvoiceRequest\DC2\NAK\n\
\\ACKr_hash\CAN\STX \SOH(\fR\ENQrHashJ\EOT\b\SOH\DLE\STX"
packedFileDescriptor _ = packedFileDescriptor
fieldsByTag
= let
rHash__field_descriptor
= Data.ProtoLens.FieldDescriptor
"r_hash"
(Data.ProtoLens.ScalarField Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(Data.ProtoLens.PlainField
Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"rHash")) ::
Data.ProtoLens.FieldDescriptor SubscribeSingleInvoiceRequest
in
Data.Map.fromList [(Data.ProtoLens.Tag 2, rHash__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_SubscribeSingleInvoiceRequest'_unknownFields
(\ x__ y__
-> x__ {_SubscribeSingleInvoiceRequest'_unknownFields = y__})
defMessage
= SubscribeSingleInvoiceRequest'_constructor
{_SubscribeSingleInvoiceRequest'rHash = Data.ProtoLens.fieldDefault,
_SubscribeSingleInvoiceRequest'_unknownFields = []}
parseMessage
= let
loop ::
SubscribeSingleInvoiceRequest
-> Data.ProtoLens.Encoding.Bytes.Parser SubscribeSingleInvoiceRequest
loop x
= do end <- Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
18
-> do y <- (Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getBytes
(Prelude.fromIntegral len))
"r_hash"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"rHash") y x)
wire
-> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !t -> (:) y t) x)
in
(Data.ProtoLens.Encoding.Bytes.<?>)
(do loop Data.ProtoLens.defMessage) "SubscribeSingleInvoiceRequest"
buildMessage
= \ _x
-> (Data.Monoid.<>)
(let
_v = Lens.Family2.view (Data.ProtoLens.Field.field @"rHash") _x
in
if (Prelude.==) _v Data.ProtoLens.fieldDefault then
Data.Monoid.mempty
else
(Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt 18)
((\ bs
-> (Data.Monoid.<>)
(Data.ProtoLens.Encoding.Bytes.putVarInt
(Prelude.fromIntegral (Data.ByteString.length bs)))
(Data.ProtoLens.Encoding.Bytes.putBytes bs))
_v))
(Data.ProtoLens.Encoding.Wire.buildFieldSet
(Lens.Family2.view Data.ProtoLens.unknownFields _x))
instance Control.DeepSeq.NFData SubscribeSingleInvoiceRequest where
rnf
= \ x__
-> Control.DeepSeq.deepseq
(_SubscribeSingleInvoiceRequest'_unknownFields x__)
(Control.DeepSeq.deepseq
(_SubscribeSingleInvoiceRequest'rHash x__) ())
data Invoices = Invoices {}
instance Data.ProtoLens.Service.Types.Service Invoices where
type ServiceName Invoices = "Invoices"
type ServicePackage Invoices = "invoicesrpc"
type ServiceMethods Invoices = '["addHoldInvoice",
"cancelInvoice",
"settleInvoice",
"subscribeSingleInvoice"]
instance Data.ProtoLens.Service.Types.HasMethodImpl Invoices "subscribeSingleInvoice" where
type MethodName Invoices "subscribeSingleInvoice" = "SubscribeSingleInvoice"
type MethodInput Invoices "subscribeSingleInvoice" = SubscribeSingleInvoiceRequest
type MethodOutput Invoices "subscribeSingleInvoice" = Proto.LndGrpc.Invoice
type MethodStreamingType Invoices "subscribeSingleInvoice" = 'Data.ProtoLens.Service.Types.ServerStreaming
instance Data.ProtoLens.Service.Types.HasMethodImpl Invoices "cancelInvoice" where
type MethodName Invoices "cancelInvoice" = "CancelInvoice"
type MethodInput Invoices "cancelInvoice" = CancelInvoiceMsg
type MethodOutput Invoices "cancelInvoice" = CancelInvoiceResp
type MethodStreamingType Invoices "cancelInvoice" = 'Data.ProtoLens.Service.Types.NonStreaming
instance Data.ProtoLens.Service.Types.HasMethodImpl Invoices "addHoldInvoice" where
type MethodName Invoices "addHoldInvoice" = "AddHoldInvoice"
type MethodInput Invoices "addHoldInvoice" = AddHoldInvoiceRequest
type MethodOutput Invoices "addHoldInvoice" = AddHoldInvoiceResp
type MethodStreamingType Invoices "addHoldInvoice" = 'Data.ProtoLens.Service.Types.NonStreaming
instance Data.ProtoLens.Service.Types.HasMethodImpl Invoices "settleInvoice" where
type MethodName Invoices "settleInvoice" = "SettleInvoice"
type MethodInput Invoices "settleInvoice" = SettleInvoiceMsg
type MethodOutput Invoices "settleInvoice" = SettleInvoiceResp
type MethodStreamingType Invoices "settleInvoice" = 'Data.ProtoLens.Service.Types.NonStreaming
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor
= "\n\
\\DC2invoice_grpc.proto\DC2\vinvoicesrpc\SUB\SOlnd_grpc.proto\"5\n\
\\DLECancelInvoiceMsg\DC2!\n\
\\fpayment_hash\CAN\SOH \SOH(\fR\vpaymentHash\"\DC3\n\
\\DC1CancelInvoiceResp\"\202\STX\n\
\\NAKAddHoldInvoiceRequest\DC2\DC2\n\
\\EOTmemo\CAN\SOH \SOH(\tR\EOTmemo\DC2\DC2\n\
\\EOThash\CAN\STX \SOH(\fR\EOThash\DC2\DC4\n\
\\ENQvalue\CAN\ETX \SOH(\ETXR\ENQvalue\DC2\GS\n\
\\n\
\value_msat\CAN\n\
\ \SOH(\ETXR\tvalueMsat\DC2)\n\
\\DLEdescription_hash\CAN\EOT \SOH(\fR\SIdescriptionHash\DC2\SYN\n\
\\ACKexpiry\CAN\ENQ \SOH(\ETXR\ACKexpiry\DC2#\n\
\\rfallback_addr\CAN\ACK \SOH(\tR\ffallbackAddr\DC2\US\n\
\\vcltv_expiry\CAN\a \SOH(\EOTR\n\
\cltvExpiry\DC21\n\
\\vroute_hints\CAN\b \ETX(\v2\DLE.lnrpc.RouteHintR\n\
\routeHints\DC2\CAN\n\
\\aprivate\CAN\t \SOH(\bR\aprivate\"=\n\
\\DC2AddHoldInvoiceResp\DC2'\n\
\\SIpayment_request\CAN\SOH \SOH(\tR\SOpaymentRequest\".\n\
\\DLESettleInvoiceMsg\DC2\SUB\n\
\\bpreimage\CAN\SOH \SOH(\fR\bpreimage\"\DC3\n\
\\DC1SettleInvoiceResp\"<\n\
\\GSSubscribeSingleInvoiceRequest\DC2\NAK\n\
\\ACKr_hash\CAN\STX \SOH(\fR\ENQrHashJ\EOT\b\SOH\DLE\STX2\217\STX\n\
\\bInvoices\DC2V\n\
\\SYNSubscribeSingleInvoice\DC2*.invoicesrpc.SubscribeSingleInvoiceRequest\SUB\SO.lnrpc.Invoice0\SOH\DC2N\n\
\\rCancelInvoice\DC2\GS.invoicesrpc.CancelInvoiceMsg\SUB\RS.invoicesrpc.CancelInvoiceResp\DC2U\n\
\\SOAddHoldInvoice\DC2\".invoicesrpc.AddHoldInvoiceRequest\SUB\US.invoicesrpc.AddHoldInvoiceResp\DC2N\n\
\\rSettleInvoice\DC2\GS.invoicesrpc.SettleInvoiceMsg\SUB\RS.invoicesrpc.SettleInvoiceRespB3Z1github.com/lightningnetwork/lnd/lnrpc/invoicesrpcJ\242\FS\n\
\\ACK\DC2\EOT\STX\NUL{\SOH\n\
\\147\SOH\n\
\\SOH\f\DC2\ETX\STX\NUL\DC22\136\SOHsource https://raw.githubusercontent.com/lightningnetwork/lnd/c733c139e95a6ef4e5f9ac88b43328ac96c333ef/lnrpc/invoicesrpc/invoices.proto\n\
\\n\
\\t\n\
\\STX\ETX\NUL\DC2\ETX\EOT\NUL\CAN\n\
\\b\n\
\\SOH\STX\DC2\ETX\ACK\NUL\DC4\n\
\\b\n\
\\SOH\b\DC2\ETX\b\NULH\n\
\\t\n\
\\STX\b\v\DC2\ETX\b\NULH\n\
\d\n\
\\STX\ACK\NUL\DC2\EOT\f\NUL'\SOH\SUBX Invoices is a service that can be used to create, accept, settle and cancel\n\
\ invoices.\n\
\\n\
\\n\
\\n\
\\ETX\ACK\NUL\SOH\DC2\ETX\f\b\DLE\n\
\\215\SOH\n\
\\EOT\ACK\NUL\STX\NUL\DC2\EOT\DC2\EOT\DC3'\SUB\200\SOH\n\
\SubscribeSingleInvoice returns a uni-directional stream (server -> client)\n\
\to notify the client of state transitions of the specified invoice.\n\
\Initially the current invoice state is always sent out.\n\
\\n\
\\f\n\
\\ENQ\ACK\NUL\STX\NUL\SOH\DC2\ETX\DC2\b\RS\n\
\\f\n\
\\ENQ\ACK\NUL\STX\NUL\STX\DC2\ETX\DC2 =\n\
\\f\n\
\\ENQ\ACK\NUL\STX\NUL\ACK\DC2\ETX\DC3\DC1\ETB\n\
\\f\n\
\\ENQ\ACK\NUL\STX\NUL\ETX\DC2\ETX\DC3\CAN%\n\
\\172\SOH\n\
\\EOT\ACK\NUL\STX\SOH\DC2\ETX\SUB\EOTE\SUB\158\SOH\n\
\CancelInvoice cancels a currently open invoice. If the invoice is already\n\
\canceled, this call will succeed. If the invoice is already settled, it will\n\
\fail.\n\
\\n\
\\f\n\
\\ENQ\ACK\NUL\STX\SOH\SOH\DC2\ETX\SUB\b\NAK\n\
\\f\n\
\\ENQ\ACK\NUL\STX\SOH\STX\DC2\ETX\SUB\ETB'\n\
\\f\n\
\\ENQ\ACK\NUL\STX\SOH\ETX\DC2\ETX\SUB2C\n\
\n\n\
\\EOT\ACK\NUL\STX\STX\DC2\ETX \EOTL\SUBa\n\
\AddHoldInvoice creates a hold invoice. It ties the invoice to the hash\n\
\supplied in the request.\n\
\\n\
\\f\n\
\\ENQ\ACK\NUL\STX\STX\SOH\DC2\ETX \b\SYN\n\
\\f\n\
\\ENQ\ACK\NUL\STX\STX\STX\DC2\ETX \CAN-\n\
\\f\n\
\\ENQ\ACK\NUL\STX\STX\ETX\DC2\ETX 8J\n\
\t\n\
\\EOT\ACK\NUL\STX\ETX\DC2\ETX&\EOTE\SUBg\n\
\SettleInvoice settles an accepted invoice. If the invoice is already\n\
\settled, this call will succeed.\n\
\\n\
\\f\n\
\\ENQ\ACK\NUL\STX\ETX\SOH\DC2\ETX&\b\NAK\n\
\\f\n\
\\ENQ\ACK\NUL\STX\ETX\STX\DC2\ETX&\ETB'\n\
\\f\n\
\\ENQ\ACK\NUL\STX\ETX\ETX\DC2\ETX&2C\n\
\\n\
\\n\
\\STX\EOT\NUL\DC2\EOT)\NUL,\SOH\n\
\\n\
\\n\
\\ETX\EOT\NUL\SOH\DC2\ETX)\b\CAN\n\
\B\n\
\\EOT\EOT\NUL\STX\NUL\DC2\ETX+\EOT\ESC\SUB5 Hash corresponding to the (hold) invoice to cancel.\n\
\\n\
\\r\n\
\\ENQ\EOT\NUL\STX\NUL\EOT\DC2\EOT+\EOT)\SUB\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX+\EOT\t\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX+\n\
\\SYN\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX+\EM\SUB\n\
\\n\
\\n\
\\STX\EOT\SOH\DC2\EOT-\NUL.\SOH\n\
\\n\
\\n\
\\ETX\EOT\SOH\SOH\DC2\ETX-\b\EM\n\
\\n\
\\n\
\\STX\EOT\STX\DC2\EOT0\NULb\SOH\n\
\\n\
\\n\
\\ETX\EOT\STX\SOH\DC2\ETX0\b\GS\n\
\\252\SOH\n\
\\EOT\EOT\STX\STX\NUL\DC2\ETX7\EOT\DC4\SUB\238\SOH\n\
\An optional memo to attach along with the invoice. Used for record keeping\n\
\purposes for the invoice's creator, and will also be set in the description\n\
\field of the encoded payment request if the description_hash field is not\n\
\being used.\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\NUL\EOT\DC2\EOT7\EOT0\US\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX7\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX7\v\SI\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX7\DC2\DC3\n\
\'\n\
\\EOT\EOT\STX\STX\SOH\DC2\ETX:\EOT\DC3\SUB\SUB The hash of the preimage\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\SOH\EOT\DC2\EOT:\EOT7\DC4\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX:\EOT\t\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX:\n\
\\SO\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX:\DC1\DC2\n\
\m\n\
\\EOT\EOT\STX\STX\STX\DC2\ETXA\EOT\DC4\SUB`\n\
\The value of this invoice in satoshis\n\
\\n\
\The fields value and value_msat are mutually exclusive.\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\STX\EOT\DC2\EOTA\EOT:\DC3\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETXA\EOT\t\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXA\n\
\\SI\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXA\DC2\DC3\n\
\r\n\
\\EOT\EOT\STX\STX\ETX\DC2\ETXH\EOT\SUB\SUBe\n\
\The value of this invoice in millisatoshis\n\
\\n\
\The fields value and value_msat are mutually exclusive.\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\ETX\EOT\DC2\EOTH\EOTA\DC4\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\ENQ\DC2\ETXH\EOT\t\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETXH\n\
\\DC4\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETXH\ETB\EM\n\
\\194\SOH\n\
\\EOT\EOT\STX\STX\EOT\DC2\ETXO\EOT\US\SUB\180\SOH\n\
\Hash (SHA-256) of a description of the payment. Used if the description of\n\
\payment (memo) is too long to naturally fit within the description field\n\
\of an encoded payment request.\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\EOT\EOT\DC2\EOTO\EOTH\SUB\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\ENQ\DC2\ETXO\EOT\t\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETXO\n\
\\SUB\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETXO\GS\RS\n\
\P\n\
\\EOT\EOT\STX\STX\ENQ\DC2\ETXR\EOT\NAK\SUBC Payment request expiry time in seconds. Default is 3600 (1 hour).\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\ENQ\EOT\DC2\EOTR\EOTO\US\n\
\\f\n\
\\ENQ\EOT\STX\STX\ENQ\ENQ\DC2\ETXR\EOT\t\n\
\\f\n\
\\ENQ\EOT\STX\STX\ENQ\SOH\DC2\ETXR\n\
\\DLE\n\
\\f\n\
\\ENQ\EOT\STX\STX\ENQ\ETX\DC2\ETXR\DC3\DC4\n\
\)\n\
\\EOT\EOT\STX\STX\ACK\DC2\ETXU\EOT\GS\SUB\FS Fallback on-chain address.\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\ACK\EOT\DC2\EOTU\EOTR\NAK\n\
\\f\n\
\\ENQ\EOT\STX\STX\ACK\ENQ\DC2\ETXU\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\ACK\SOH\DC2\ETXU\v\CAN\n\
\\f\n\
\\ENQ\EOT\STX\STX\ACK\ETX\DC2\ETXU\ESC\FS\n\
\T\n\
\\EOT\EOT\STX\STX\a\DC2\ETXX\EOT\ESC\SUBG Delta to use for the time-lock of the CLTV extended to the final hop.\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\a\EOT\DC2\EOTX\EOTU\GS\n\
\\f\n\
\\ENQ\EOT\STX\STX\a\ENQ\DC2\ETXX\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\a\SOH\DC2\ETXX\v\SYN\n\
\\f\n\
\\ENQ\EOT\STX\STX\a\ETX\DC2\ETXX\EM\SUB\n\
\n\n\
\\EOT\EOT\STX\STX\b\DC2\ETX^\EOT-\SUBa\n\
\Route hints that can each be individually used to assist in reaching the\n\
\invoice's destination.\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\b\EOT\DC2\ETX^\EOT\f\n\
\\f\n\
\\ENQ\EOT\STX\STX\b\ACK\DC2\ETX^\r\FS\n\
\\f\n\
\\ENQ\EOT\STX\STX\b\SOH\DC2\ETX^\GS(\n\
\\f\n\
\\ENQ\EOT\STX\STX\b\ETX\DC2\ETX^+,\n\
\V\n\
\\EOT\EOT\STX\STX\t\DC2\ETXa\EOT\NAK\SUBI Whether this invoice should include routing hints for private channels.\n\
\\n\
\\r\n\
\\ENQ\EOT\STX\STX\t\EOT\DC2\EOTa\EOT^-\n\
\\f\n\
\\ENQ\EOT\STX\STX\t\ENQ\DC2\ETXa\EOT\b\n\
\\f\n\
\\ENQ\EOT\STX\STX\t\SOH\DC2\ETXa\t\DLE\n\
\\f\n\
\\ENQ\EOT\STX\STX\t\ETX\DC2\ETXa\DC3\DC4\n\
\\n\
\\n\
\\STX\EOT\ETX\DC2\EOTd\NULk\SOH\n\
\\n\
\\n\
\\ETX\EOT\ETX\SOH\DC2\ETXd\b\SUB\n\
\\188\SOH\n\
\\EOT\EOT\ETX\STX\NUL\DC2\ETXj\EOT\US\SUB\174\SOH\n\
\A bare-bones invoice for a payment within the Lightning Network. With the\n\
\details of the invoice, the sender has all the data necessary to send a\n\
\payment to the recipient.\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\NUL\EOT\DC2\EOTj\EOTd\FS\n\
\\f\n\
\\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETXj\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETXj\v\SUB\n\
\\f\n\
\\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETXj\GS\RS\n\
\\n\
\\n\
\\STX\EOT\EOT\DC2\EOTm\NULq\SOH\n\
\\n\
\\n\
\\ETX\EOT\EOT\SOH\DC2\ETXm\b\CAN\n\
\_\n\
\\EOT\EOT\EOT\STX\NUL\DC2\ETXp\EOT\ETB\SUBR Externally discovered pre-image that should be used to settle the hold\n\
\ invoice.\n\
\\n\
\\r\n\
\\ENQ\EOT\EOT\STX\NUL\EOT\DC2\EOTp\EOTm\SUB\n\
\\f\n\
\\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETXp\EOT\t\n\
\\f\n\
\\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETXp\n\
\\DC2\n\
\\f\n\
\\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETXp\NAK\SYN\n\
\\n\
\\n\
\\STX\EOT\ENQ\DC2\EOTs\NULt\SOH\n\
\\n\
\\n\
\\ETX\EOT\ENQ\SOH\DC2\ETXs\b\EM\n\
\\n\
\\n\
\\STX\EOT\ACK\DC2\EOTv\NUL{\SOH\n\
\\n\
\\n\
\\ETX\EOT\ACK\SOH\DC2\ETXv\b%\n\
\\n\
\\n\
\\ETX\EOT\ACK\t\DC2\ETXw\EOT\SI\n\
\\v\n\
\\EOT\EOT\ACK\t\NUL\DC2\ETXw\r\SO\n\
\\f\n\
\\ENQ\EOT\ACK\t\NUL\SOH\DC2\ETXw\r\SO\n\
\\f\n\
\\ENQ\EOT\ACK\t\NUL\STX\DC2\ETXw\r\SO\n\
\H\n\
\\EOT\EOT\ACK\STX\NUL\DC2\ETXz\EOT\NAK\SUB; Hash corresponding to the (hold) invoice to subscribe to.\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\NUL\EOT\DC2\EOTz\EOTw\SI\n\
\\f\n\
\\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\ETXz\EOT\t\n\
\\f\n\
\\ENQ\EOT\ACK\STX\NUL\SOH\DC2\ETXz\n\
\\DLE\n\
\\f\n\
\\ENQ\EOT\ACK\STX\NUL\ETX\DC2\ETXz\DC3\DC4b\ACKproto3"