{- This file was auto-generated from utxorpc/v1alpha/query/query.proto by the proto-lens-protoc program. -} {-# 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.Utxorpc.V1alpha.Query.Query ( QueryService(..), AnyChainDatum(), AnyChainDatum'ParsedState(..), _AnyChainDatum'Cardano, AnyChainParams(), AnyChainParams'Params(..), _AnyChainParams'Cardano, AnyUtxoData(), AnyUtxoData'ParsedState(..), _AnyUtxoData'Cardano, AnyUtxoPattern(), AnyUtxoPattern'UtxoPattern(..), _AnyUtxoPattern'Cardano, ChainPoint(), ReadDataRequest(), ReadDataResponse(), ReadParamsRequest(), ReadParamsResponse(), ReadUtxosRequest(), ReadUtxosResponse(), SearchUtxosRequest(), SearchUtxosResponse(), TxoRef(), UtxoPredicate() ) 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.Google.Protobuf.FieldMask import qualified Proto.Utxorpc.V1alpha.Cardano.Cardano {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.nativeBytes' @:: Lens' AnyChainDatum Data.ByteString.ByteString@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.key' @:: Lens' AnyChainDatum Data.ByteString.ByteString@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'parsedState' @:: Lens' AnyChainDatum (Prelude.Maybe AnyChainDatum'ParsedState)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'cardano' @:: Lens' AnyChainDatum (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.PlutusData)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.cardano' @:: Lens' AnyChainDatum Proto.Utxorpc.V1alpha.Cardano.Cardano.PlutusData@ -} data AnyChainDatum = AnyChainDatum'_constructor {_AnyChainDatum'nativeBytes :: !Data.ByteString.ByteString, _AnyChainDatum'key :: !Data.ByteString.ByteString, _AnyChainDatum'parsedState :: !(Prelude.Maybe AnyChainDatum'ParsedState), _AnyChainDatum'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show AnyChainDatum where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data AnyChainDatum'ParsedState = AnyChainDatum'Cardano !Proto.Utxorpc.V1alpha.Cardano.Cardano.PlutusData deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField AnyChainDatum "nativeBytes" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainDatum'nativeBytes (\ x__ y__ -> x__ {_AnyChainDatum'nativeBytes = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyChainDatum "key" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainDatum'key (\ x__ y__ -> x__ {_AnyChainDatum'key = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyChainDatum "maybe'parsedState" (Prelude.Maybe AnyChainDatum'ParsedState) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainDatum'parsedState (\ x__ y__ -> x__ {_AnyChainDatum'parsedState = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyChainDatum "maybe'cardano" (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.PlutusData) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainDatum'parsedState (\ x__ y__ -> x__ {_AnyChainDatum'parsedState = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyChainDatum'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyChainDatum'Cardano y__)) instance Data.ProtoLens.Field.HasField AnyChainDatum "cardano" Proto.Utxorpc.V1alpha.Cardano.Cardano.PlutusData where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainDatum'parsedState (\ x__ y__ -> x__ {_AnyChainDatum'parsedState = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyChainDatum'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyChainDatum'Cardano y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Message AnyChainDatum where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.AnyChainDatum" packedMessageDescriptor _ = "\n\ \\rAnyChainDatum\DC2!\n\ \\fnative_bytes\CAN\SOH \SOH(\fR\vnativeBytes\DC2\DLE\n\ \\ETXkey\CAN\STX \SOH(\fR\ETXkey\DC2?\n\ \\acardano\CAN\ETX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataH\NULR\acardanoB\SO\n\ \\fparsed_state" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let nativeBytes__field_descriptor = Data.ProtoLens.FieldDescriptor "native_bytes" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"nativeBytes")) :: Data.ProtoLens.FieldDescriptor AnyChainDatum key__field_descriptor = Data.ProtoLens.FieldDescriptor "key" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"key")) :: Data.ProtoLens.FieldDescriptor AnyChainDatum cardano__field_descriptor = Data.ProtoLens.FieldDescriptor "cardano" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Utxorpc.V1alpha.Cardano.Cardano.PlutusData) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'cardano")) :: Data.ProtoLens.FieldDescriptor AnyChainDatum in Data.Map.fromList [(Data.ProtoLens.Tag 1, nativeBytes__field_descriptor), (Data.ProtoLens.Tag 2, key__field_descriptor), (Data.ProtoLens.Tag 3, cardano__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _AnyChainDatum'_unknownFields (\ x__ y__ -> x__ {_AnyChainDatum'_unknownFields = y__}) defMessage = AnyChainDatum'_constructor {_AnyChainDatum'nativeBytes = Data.ProtoLens.fieldDefault, _AnyChainDatum'key = Data.ProtoLens.fieldDefault, _AnyChainDatum'parsedState = Prelude.Nothing, _AnyChainDatum'_unknownFields = []} parseMessage = let loop :: AnyChainDatum -> Data.ProtoLens.Encoding.Bytes.Parser AnyChainDatum 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)) "native_bytes" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"nativeBytes") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getBytes (Prelude.fromIntegral len)) "key" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x) 26 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "cardano" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cardano") 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) "AnyChainDatum" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"nativeBytes") _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.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"key") _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.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'parsedState") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (AnyChainDatum'Cardano v)) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 26) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) instance Control.DeepSeq.NFData AnyChainDatum where rnf = \ x__ -> Control.DeepSeq.deepseq (_AnyChainDatum'_unknownFields x__) (Control.DeepSeq.deepseq (_AnyChainDatum'nativeBytes x__) (Control.DeepSeq.deepseq (_AnyChainDatum'key x__) (Control.DeepSeq.deepseq (_AnyChainDatum'parsedState x__) ()))) instance Control.DeepSeq.NFData AnyChainDatum'ParsedState where rnf (AnyChainDatum'Cardano x__) = Control.DeepSeq.rnf x__ _AnyChainDatum'Cardano :: Data.ProtoLens.Prism.Prism' AnyChainDatum'ParsedState Proto.Utxorpc.V1alpha.Cardano.Cardano.PlutusData _AnyChainDatum'Cardano = Data.ProtoLens.Prism.prism' AnyChainDatum'Cardano (\ p__ -> case p__ of (AnyChainDatum'Cardano p__val) -> Prelude.Just p__val) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'params' @:: Lens' AnyChainParams (Prelude.Maybe AnyChainParams'Params)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'cardano' @:: Lens' AnyChainParams (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.PParams)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.cardano' @:: Lens' AnyChainParams Proto.Utxorpc.V1alpha.Cardano.Cardano.PParams@ -} data AnyChainParams = AnyChainParams'_constructor {_AnyChainParams'params :: !(Prelude.Maybe AnyChainParams'Params), _AnyChainParams'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show AnyChainParams where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data AnyChainParams'Params = AnyChainParams'Cardano !Proto.Utxorpc.V1alpha.Cardano.Cardano.PParams deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField AnyChainParams "maybe'params" (Prelude.Maybe AnyChainParams'Params) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainParams'params (\ x__ y__ -> x__ {_AnyChainParams'params = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyChainParams "maybe'cardano" (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.PParams) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainParams'params (\ x__ y__ -> x__ {_AnyChainParams'params = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyChainParams'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyChainParams'Cardano y__)) instance Data.ProtoLens.Field.HasField AnyChainParams "cardano" Proto.Utxorpc.V1alpha.Cardano.Cardano.PParams where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyChainParams'params (\ x__ y__ -> x__ {_AnyChainParams'params = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyChainParams'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyChainParams'Cardano y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Message AnyChainParams where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.AnyChainParams" packedMessageDescriptor _ = "\n\ \\SOAnyChainParams\DC2<\n\ \\acardano\CAN\SOH \SOH(\v2 .utxorpc.v1alpha.cardano.PParamsH\NULR\acardanoB\b\n\ \\ACKparams" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let cardano__field_descriptor = Data.ProtoLens.FieldDescriptor "cardano" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Utxorpc.V1alpha.Cardano.Cardano.PParams) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'cardano")) :: Data.ProtoLens.FieldDescriptor AnyChainParams in Data.Map.fromList [(Data.ProtoLens.Tag 1, cardano__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _AnyChainParams'_unknownFields (\ x__ y__ -> x__ {_AnyChainParams'_unknownFields = y__}) defMessage = AnyChainParams'_constructor {_AnyChainParams'params = Prelude.Nothing, _AnyChainParams'_unknownFields = []} parseMessage = let loop :: AnyChainParams -> Data.ProtoLens.Encoding.Bytes.Parser AnyChainParams 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "cardano" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cardano") 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) "AnyChainParams" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'params") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (AnyChainParams'Cardano v)) -> (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.ProtoLens.encodeMessage v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData AnyChainParams where rnf = \ x__ -> Control.DeepSeq.deepseq (_AnyChainParams'_unknownFields x__) (Control.DeepSeq.deepseq (_AnyChainParams'params x__) ()) instance Control.DeepSeq.NFData AnyChainParams'Params where rnf (AnyChainParams'Cardano x__) = Control.DeepSeq.rnf x__ _AnyChainParams'Cardano :: Data.ProtoLens.Prism.Prism' AnyChainParams'Params Proto.Utxorpc.V1alpha.Cardano.Cardano.PParams _AnyChainParams'Cardano = Data.ProtoLens.Prism.prism' AnyChainParams'Cardano (\ p__ -> case p__ of (AnyChainParams'Cardano p__val) -> Prelude.Just p__val) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.nativeBytes' @:: Lens' AnyUtxoData Data.ByteString.ByteString@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.txoRef' @:: Lens' AnyUtxoData TxoRef@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'txoRef' @:: Lens' AnyUtxoData (Prelude.Maybe TxoRef)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'parsedState' @:: Lens' AnyUtxoData (Prelude.Maybe AnyUtxoData'ParsedState)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'cardano' @:: Lens' AnyUtxoData (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutput)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.cardano' @:: Lens' AnyUtxoData Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutput@ -} data AnyUtxoData = AnyUtxoData'_constructor {_AnyUtxoData'nativeBytes :: !Data.ByteString.ByteString, _AnyUtxoData'txoRef :: !(Prelude.Maybe TxoRef), _AnyUtxoData'parsedState :: !(Prelude.Maybe AnyUtxoData'ParsedState), _AnyUtxoData'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show AnyUtxoData where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data AnyUtxoData'ParsedState = AnyUtxoData'Cardano !Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutput deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField AnyUtxoData "nativeBytes" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoData'nativeBytes (\ x__ y__ -> x__ {_AnyUtxoData'nativeBytes = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyUtxoData "txoRef" TxoRef where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoData'txoRef (\ x__ y__ -> x__ {_AnyUtxoData'txoRef = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField AnyUtxoData "maybe'txoRef" (Prelude.Maybe TxoRef) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoData'txoRef (\ x__ y__ -> x__ {_AnyUtxoData'txoRef = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyUtxoData "maybe'parsedState" (Prelude.Maybe AnyUtxoData'ParsedState) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoData'parsedState (\ x__ y__ -> x__ {_AnyUtxoData'parsedState = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyUtxoData "maybe'cardano" (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutput) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoData'parsedState (\ x__ y__ -> x__ {_AnyUtxoData'parsedState = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyUtxoData'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyUtxoData'Cardano y__)) instance Data.ProtoLens.Field.HasField AnyUtxoData "cardano" Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutput where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoData'parsedState (\ x__ y__ -> x__ {_AnyUtxoData'parsedState = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyUtxoData'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyUtxoData'Cardano y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Message AnyUtxoData where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.AnyUtxoData" packedMessageDescriptor _ = "\n\ \\vAnyUtxoData\DC2!\n\ \\fnative_bytes\CAN\SOH \SOH(\fR\vnativeBytes\DC26\n\ \\atxo_ref\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.query.TxoRefR\ACKtxoRef\DC2=\n\ \\acardano\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputH\NULR\acardanoB\SO\n\ \\fparsed_state" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let nativeBytes__field_descriptor = Data.ProtoLens.FieldDescriptor "native_bytes" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"nativeBytes")) :: Data.ProtoLens.FieldDescriptor AnyUtxoData txoRef__field_descriptor = Data.ProtoLens.FieldDescriptor "txo_ref" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor TxoRef) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'txoRef")) :: Data.ProtoLens.FieldDescriptor AnyUtxoData cardano__field_descriptor = Data.ProtoLens.FieldDescriptor "cardano" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutput) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'cardano")) :: Data.ProtoLens.FieldDescriptor AnyUtxoData in Data.Map.fromList [(Data.ProtoLens.Tag 1, nativeBytes__field_descriptor), (Data.ProtoLens.Tag 2, txoRef__field_descriptor), (Data.ProtoLens.Tag 3, cardano__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _AnyUtxoData'_unknownFields (\ x__ y__ -> x__ {_AnyUtxoData'_unknownFields = y__}) defMessage = AnyUtxoData'_constructor {_AnyUtxoData'nativeBytes = Data.ProtoLens.fieldDefault, _AnyUtxoData'txoRef = Prelude.Nothing, _AnyUtxoData'parsedState = Prelude.Nothing, _AnyUtxoData'_unknownFields = []} parseMessage = let loop :: AnyUtxoData -> Data.ProtoLens.Encoding.Bytes.Parser AnyUtxoData 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)) "native_bytes" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"nativeBytes") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "txo_ref" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"txoRef") y x) 26 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "cardano" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cardano") 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) "AnyUtxoData" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"nativeBytes") _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.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'txoRef") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'parsedState") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (AnyUtxoData'Cardano v)) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 26) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) instance Control.DeepSeq.NFData AnyUtxoData where rnf = \ x__ -> Control.DeepSeq.deepseq (_AnyUtxoData'_unknownFields x__) (Control.DeepSeq.deepseq (_AnyUtxoData'nativeBytes x__) (Control.DeepSeq.deepseq (_AnyUtxoData'txoRef x__) (Control.DeepSeq.deepseq (_AnyUtxoData'parsedState x__) ()))) instance Control.DeepSeq.NFData AnyUtxoData'ParsedState where rnf (AnyUtxoData'Cardano x__) = Control.DeepSeq.rnf x__ _AnyUtxoData'Cardano :: Data.ProtoLens.Prism.Prism' AnyUtxoData'ParsedState Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutput _AnyUtxoData'Cardano = Data.ProtoLens.Prism.prism' AnyUtxoData'Cardano (\ p__ -> case p__ of (AnyUtxoData'Cardano p__val) -> Prelude.Just p__val) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'utxoPattern' @:: Lens' AnyUtxoPattern (Prelude.Maybe AnyUtxoPattern'UtxoPattern)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'cardano' @:: Lens' AnyUtxoPattern (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutputPattern)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.cardano' @:: Lens' AnyUtxoPattern Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutputPattern@ -} data AnyUtxoPattern = AnyUtxoPattern'_constructor {_AnyUtxoPattern'utxoPattern :: !(Prelude.Maybe AnyUtxoPattern'UtxoPattern), _AnyUtxoPattern'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show AnyUtxoPattern where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data AnyUtxoPattern'UtxoPattern = AnyUtxoPattern'Cardano !Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutputPattern deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField AnyUtxoPattern "maybe'utxoPattern" (Prelude.Maybe AnyUtxoPattern'UtxoPattern) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoPattern'utxoPattern (\ x__ y__ -> x__ {_AnyUtxoPattern'utxoPattern = y__})) Prelude.id instance Data.ProtoLens.Field.HasField AnyUtxoPattern "maybe'cardano" (Prelude.Maybe Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutputPattern) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoPattern'utxoPattern (\ x__ y__ -> x__ {_AnyUtxoPattern'utxoPattern = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyUtxoPattern'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyUtxoPattern'Cardano y__)) instance Data.ProtoLens.Field.HasField AnyUtxoPattern "cardano" Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutputPattern where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _AnyUtxoPattern'utxoPattern (\ x__ y__ -> x__ {_AnyUtxoPattern'utxoPattern = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (AnyUtxoPattern'Cardano x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap AnyUtxoPattern'Cardano y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Message AnyUtxoPattern where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.AnyUtxoPattern" packedMessageDescriptor _ = "\n\ \\SOAnyUtxoPattern\DC2D\n\ \\acardano\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternH\NULR\acardanoB\SO\n\ \\futxo_pattern" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let cardano__field_descriptor = Data.ProtoLens.FieldDescriptor "cardano" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutputPattern) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'cardano")) :: Data.ProtoLens.FieldDescriptor AnyUtxoPattern in Data.Map.fromList [(Data.ProtoLens.Tag 1, cardano__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _AnyUtxoPattern'_unknownFields (\ x__ y__ -> x__ {_AnyUtxoPattern'_unknownFields = y__}) defMessage = AnyUtxoPattern'_constructor {_AnyUtxoPattern'utxoPattern = Prelude.Nothing, _AnyUtxoPattern'_unknownFields = []} parseMessage = let loop :: AnyUtxoPattern -> Data.ProtoLens.Encoding.Bytes.Parser AnyUtxoPattern 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "cardano" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cardano") 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) "AnyUtxoPattern" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'utxoPattern") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (AnyUtxoPattern'Cardano v)) -> (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.ProtoLens.encodeMessage v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData AnyUtxoPattern where rnf = \ x__ -> Control.DeepSeq.deepseq (_AnyUtxoPattern'_unknownFields x__) (Control.DeepSeq.deepseq (_AnyUtxoPattern'utxoPattern x__) ()) instance Control.DeepSeq.NFData AnyUtxoPattern'UtxoPattern where rnf (AnyUtxoPattern'Cardano x__) = Control.DeepSeq.rnf x__ _AnyUtxoPattern'Cardano :: Data.ProtoLens.Prism.Prism' AnyUtxoPattern'UtxoPattern Proto.Utxorpc.V1alpha.Cardano.Cardano.TxOutputPattern _AnyUtxoPattern'Cardano = Data.ProtoLens.Prism.prism' AnyUtxoPattern'Cardano (\ p__ -> case p__ of (AnyUtxoPattern'Cardano p__val) -> Prelude.Just p__val) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.slot' @:: Lens' ChainPoint Data.Word.Word64@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.hash' @:: Lens' ChainPoint Data.ByteString.ByteString@ -} data ChainPoint = ChainPoint'_constructor {_ChainPoint'slot :: !Data.Word.Word64, _ChainPoint'hash :: !Data.ByteString.ByteString, _ChainPoint'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ChainPoint where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ChainPoint "slot" Data.Word.Word64 where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ChainPoint'slot (\ x__ y__ -> x__ {_ChainPoint'slot = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ChainPoint "hash" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ChainPoint'hash (\ x__ y__ -> x__ {_ChainPoint'hash = y__})) Prelude.id instance Data.ProtoLens.Message ChainPoint where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.ChainPoint" packedMessageDescriptor _ = "\n\ \\n\ \ChainPoint\DC2\DC2\n\ \\EOTslot\CAN\SOH \SOH(\EOTR\EOTslot\DC2\DC2\n\ \\EOThash\CAN\STX \SOH(\fR\EOThash" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let slot__field_descriptor = Data.ProtoLens.FieldDescriptor "slot" (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"slot")) :: Data.ProtoLens.FieldDescriptor ChainPoint 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 ChainPoint in Data.Map.fromList [(Data.ProtoLens.Tag 1, slot__field_descriptor), (Data.ProtoLens.Tag 2, hash__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ChainPoint'_unknownFields (\ x__ y__ -> x__ {_ChainPoint'_unknownFields = y__}) defMessage = ChainPoint'_constructor {_ChainPoint'slot = Data.ProtoLens.fieldDefault, _ChainPoint'hash = Data.ProtoLens.fieldDefault, _ChainPoint'_unknownFields = []} parseMessage = let loop :: ChainPoint -> Data.ProtoLens.Encoding.Bytes.Parser ChainPoint 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 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) Data.ProtoLens.Encoding.Bytes.getVarInt "slot" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"slot") y x) 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) 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) "ChainPoint" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"slot") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 8) (Data.ProtoLens.Encoding.Bytes.putVarInt _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.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData ChainPoint where rnf = \ x__ -> Control.DeepSeq.deepseq (_ChainPoint'_unknownFields x__) (Control.DeepSeq.deepseq (_ChainPoint'slot x__) (Control.DeepSeq.deepseq (_ChainPoint'hash x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.keys' @:: Lens' ReadDataRequest [Data.ByteString.ByteString]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'keys' @:: Lens' ReadDataRequest (Data.Vector.Vector Data.ByteString.ByteString)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.fieldMask' @:: Lens' ReadDataRequest Proto.Google.Protobuf.FieldMask.FieldMask@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'fieldMask' @:: Lens' ReadDataRequest (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask)@ -} data ReadDataRequest = ReadDataRequest'_constructor {_ReadDataRequest'keys :: !(Data.Vector.Vector Data.ByteString.ByteString), _ReadDataRequest'fieldMask :: !(Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask), _ReadDataRequest'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ReadDataRequest where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ReadDataRequest "keys" [Data.ByteString.ByteString] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataRequest'keys (\ x__ y__ -> x__ {_ReadDataRequest'keys = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField ReadDataRequest "vec'keys" (Data.Vector.Vector Data.ByteString.ByteString) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataRequest'keys (\ x__ y__ -> x__ {_ReadDataRequest'keys = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ReadDataRequest "fieldMask" Proto.Google.Protobuf.FieldMask.FieldMask where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataRequest'fieldMask (\ x__ y__ -> x__ {_ReadDataRequest'fieldMask = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField ReadDataRequest "maybe'fieldMask" (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataRequest'fieldMask (\ x__ y__ -> x__ {_ReadDataRequest'fieldMask = y__})) Prelude.id instance Data.ProtoLens.Message ReadDataRequest where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.ReadDataRequest" packedMessageDescriptor _ = "\n\ \\SIReadDataRequest\DC2\DC2\n\ \\EOTkeys\CAN\SOH \ETX(\fR\EOTkeys\DC29\n\ \\n\ \field_mask\CAN\STX \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let keys__field_descriptor = Data.ProtoLens.FieldDescriptor "keys" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"keys")) :: Data.ProtoLens.FieldDescriptor ReadDataRequest fieldMask__field_descriptor = Data.ProtoLens.FieldDescriptor "field_mask" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.FieldMask.FieldMask) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'fieldMask")) :: Data.ProtoLens.FieldDescriptor ReadDataRequest in Data.Map.fromList [(Data.ProtoLens.Tag 1, keys__field_descriptor), (Data.ProtoLens.Tag 2, fieldMask__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ReadDataRequest'_unknownFields (\ x__ y__ -> x__ {_ReadDataRequest'_unknownFields = y__}) defMessage = ReadDataRequest'_constructor {_ReadDataRequest'keys = Data.Vector.Generic.empty, _ReadDataRequest'fieldMask = Prelude.Nothing, _ReadDataRequest'_unknownFields = []} parseMessage = let loop :: ReadDataRequest -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.ByteString.ByteString -> Data.ProtoLens.Encoding.Bytes.Parser ReadDataRequest loop x mutable'keys = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'keys <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'keys) (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'keys") frozen'keys 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)) "keys" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'keys y) loop x v 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "field_mask" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"fieldMask") y x) mutable'keys wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'keys in (Data.ProtoLens.Encoding.Bytes.) (do mutable'keys <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'keys) "ReadDataRequest" buildMessage = \ _x -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (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)) (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'keys") _x)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'fieldMask") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData ReadDataRequest where rnf = \ x__ -> Control.DeepSeq.deepseq (_ReadDataRequest'_unknownFields x__) (Control.DeepSeq.deepseq (_ReadDataRequest'keys x__) (Control.DeepSeq.deepseq (_ReadDataRequest'fieldMask x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.values' @:: Lens' ReadDataResponse [AnyChainDatum]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'values' @:: Lens' ReadDataResponse (Data.Vector.Vector AnyChainDatum)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.ledgerTip' @:: Lens' ReadDataResponse ChainPoint@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'ledgerTip' @:: Lens' ReadDataResponse (Prelude.Maybe ChainPoint)@ -} data ReadDataResponse = ReadDataResponse'_constructor {_ReadDataResponse'values :: !(Data.Vector.Vector AnyChainDatum), _ReadDataResponse'ledgerTip :: !(Prelude.Maybe ChainPoint), _ReadDataResponse'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ReadDataResponse where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ReadDataResponse "values" [AnyChainDatum] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataResponse'values (\ x__ y__ -> x__ {_ReadDataResponse'values = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField ReadDataResponse "vec'values" (Data.Vector.Vector AnyChainDatum) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataResponse'values (\ x__ y__ -> x__ {_ReadDataResponse'values = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ReadDataResponse "ledgerTip" ChainPoint where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataResponse'ledgerTip (\ x__ y__ -> x__ {_ReadDataResponse'ledgerTip = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField ReadDataResponse "maybe'ledgerTip" (Prelude.Maybe ChainPoint) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadDataResponse'ledgerTip (\ x__ y__ -> x__ {_ReadDataResponse'ledgerTip = y__})) Prelude.id instance Data.ProtoLens.Message ReadDataResponse where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.ReadDataResponse" packedMessageDescriptor _ = "\n\ \\DLEReadDataResponse\DC2<\n\ \\ACKvalues\CAN\SOH \ETX(\v2$.utxorpc.v1alpha.query.AnyChainDatumR\ACKvalues\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let values__field_descriptor = Data.ProtoLens.FieldDescriptor "values" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor AnyChainDatum) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"values")) :: Data.ProtoLens.FieldDescriptor ReadDataResponse ledgerTip__field_descriptor = Data.ProtoLens.FieldDescriptor "ledger_tip" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor ChainPoint) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'ledgerTip")) :: Data.ProtoLens.FieldDescriptor ReadDataResponse in Data.Map.fromList [(Data.ProtoLens.Tag 1, values__field_descriptor), (Data.ProtoLens.Tag 2, ledgerTip__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ReadDataResponse'_unknownFields (\ x__ y__ -> x__ {_ReadDataResponse'_unknownFields = y__}) defMessage = ReadDataResponse'_constructor {_ReadDataResponse'values = Data.Vector.Generic.empty, _ReadDataResponse'ledgerTip = Prelude.Nothing, _ReadDataResponse'_unknownFields = []} parseMessage = let loop :: ReadDataResponse -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AnyChainDatum -> Data.ProtoLens.Encoding.Bytes.Parser ReadDataResponse loop x mutable'values = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'values <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'values) (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'values") frozen'values 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "values" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'values y) loop x v 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "ledger_tip" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ledgerTip") y x) mutable'values wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'values in (Data.ProtoLens.Encoding.Bytes.) (do mutable'values <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'values) "ReadDataResponse" buildMessage = \ _x -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (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.ProtoLens.encodeMessage _v)) (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'values") _x)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'ledgerTip") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData ReadDataResponse where rnf = \ x__ -> Control.DeepSeq.deepseq (_ReadDataResponse'_unknownFields x__) (Control.DeepSeq.deepseq (_ReadDataResponse'values x__) (Control.DeepSeq.deepseq (_ReadDataResponse'ledgerTip x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.fieldMask' @:: Lens' ReadParamsRequest Proto.Google.Protobuf.FieldMask.FieldMask@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'fieldMask' @:: Lens' ReadParamsRequest (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask)@ -} data ReadParamsRequest = ReadParamsRequest'_constructor {_ReadParamsRequest'fieldMask :: !(Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask), _ReadParamsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ReadParamsRequest where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ReadParamsRequest "fieldMask" Proto.Google.Protobuf.FieldMask.FieldMask where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadParamsRequest'fieldMask (\ x__ y__ -> x__ {_ReadParamsRequest'fieldMask = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField ReadParamsRequest "maybe'fieldMask" (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadParamsRequest'fieldMask (\ x__ y__ -> x__ {_ReadParamsRequest'fieldMask = y__})) Prelude.id instance Data.ProtoLens.Message ReadParamsRequest where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.ReadParamsRequest" packedMessageDescriptor _ = "\n\ \\DC1ReadParamsRequest\DC29\n\ \\n\ \field_mask\CAN\SOH \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let fieldMask__field_descriptor = Data.ProtoLens.FieldDescriptor "field_mask" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.FieldMask.FieldMask) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'fieldMask")) :: Data.ProtoLens.FieldDescriptor ReadParamsRequest in Data.Map.fromList [(Data.ProtoLens.Tag 1, fieldMask__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ReadParamsRequest'_unknownFields (\ x__ y__ -> x__ {_ReadParamsRequest'_unknownFields = y__}) defMessage = ReadParamsRequest'_constructor {_ReadParamsRequest'fieldMask = Prelude.Nothing, _ReadParamsRequest'_unknownFields = []} parseMessage = let loop :: ReadParamsRequest -> Data.ProtoLens.Encoding.Bytes.Parser ReadParamsRequest 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "field_mask" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"fieldMask") 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) "ReadParamsRequest" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'fieldMask") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (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.ProtoLens.encodeMessage _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData ReadParamsRequest where rnf = \ x__ -> Control.DeepSeq.deepseq (_ReadParamsRequest'_unknownFields x__) (Control.DeepSeq.deepseq (_ReadParamsRequest'fieldMask x__) ()) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.values' @:: Lens' ReadParamsResponse AnyChainParams@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'values' @:: Lens' ReadParamsResponse (Prelude.Maybe AnyChainParams)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.ledgerTip' @:: Lens' ReadParamsResponse ChainPoint@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'ledgerTip' @:: Lens' ReadParamsResponse (Prelude.Maybe ChainPoint)@ -} data ReadParamsResponse = ReadParamsResponse'_constructor {_ReadParamsResponse'values :: !(Prelude.Maybe AnyChainParams), _ReadParamsResponse'ledgerTip :: !(Prelude.Maybe ChainPoint), _ReadParamsResponse'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ReadParamsResponse where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ReadParamsResponse "values" AnyChainParams where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadParamsResponse'values (\ x__ y__ -> x__ {_ReadParamsResponse'values = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField ReadParamsResponse "maybe'values" (Prelude.Maybe AnyChainParams) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadParamsResponse'values (\ x__ y__ -> x__ {_ReadParamsResponse'values = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ReadParamsResponse "ledgerTip" ChainPoint where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadParamsResponse'ledgerTip (\ x__ y__ -> x__ {_ReadParamsResponse'ledgerTip = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField ReadParamsResponse "maybe'ledgerTip" (Prelude.Maybe ChainPoint) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadParamsResponse'ledgerTip (\ x__ y__ -> x__ {_ReadParamsResponse'ledgerTip = y__})) Prelude.id instance Data.ProtoLens.Message ReadParamsResponse where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.ReadParamsResponse" packedMessageDescriptor _ = "\n\ \\DC2ReadParamsResponse\DC2=\n\ \\ACKvalues\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.query.AnyChainParamsR\ACKvalues\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let values__field_descriptor = Data.ProtoLens.FieldDescriptor "values" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor AnyChainParams) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'values")) :: Data.ProtoLens.FieldDescriptor ReadParamsResponse ledgerTip__field_descriptor = Data.ProtoLens.FieldDescriptor "ledger_tip" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor ChainPoint) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'ledgerTip")) :: Data.ProtoLens.FieldDescriptor ReadParamsResponse in Data.Map.fromList [(Data.ProtoLens.Tag 1, values__field_descriptor), (Data.ProtoLens.Tag 2, ledgerTip__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ReadParamsResponse'_unknownFields (\ x__ y__ -> x__ {_ReadParamsResponse'_unknownFields = y__}) defMessage = ReadParamsResponse'_constructor {_ReadParamsResponse'values = Prelude.Nothing, _ReadParamsResponse'ledgerTip = Prelude.Nothing, _ReadParamsResponse'_unknownFields = []} parseMessage = let loop :: ReadParamsResponse -> Data.ProtoLens.Encoding.Bytes.Parser ReadParamsResponse 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "values" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"values") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "ledger_tip" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ledgerTip") 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) "ReadParamsResponse" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'values") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (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.ProtoLens.encodeMessage _v)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'ledgerTip") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData ReadParamsResponse where rnf = \ x__ -> Control.DeepSeq.deepseq (_ReadParamsResponse'_unknownFields x__) (Control.DeepSeq.deepseq (_ReadParamsResponse'values x__) (Control.DeepSeq.deepseq (_ReadParamsResponse'ledgerTip x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.keys' @:: Lens' ReadUtxosRequest [TxoRef]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'keys' @:: Lens' ReadUtxosRequest (Data.Vector.Vector TxoRef)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.fieldMask' @:: Lens' ReadUtxosRequest Proto.Google.Protobuf.FieldMask.FieldMask@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'fieldMask' @:: Lens' ReadUtxosRequest (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask)@ -} data ReadUtxosRequest = ReadUtxosRequest'_constructor {_ReadUtxosRequest'keys :: !(Data.Vector.Vector TxoRef), _ReadUtxosRequest'fieldMask :: !(Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask), _ReadUtxosRequest'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ReadUtxosRequest where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ReadUtxosRequest "keys" [TxoRef] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosRequest'keys (\ x__ y__ -> x__ {_ReadUtxosRequest'keys = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField ReadUtxosRequest "vec'keys" (Data.Vector.Vector TxoRef) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosRequest'keys (\ x__ y__ -> x__ {_ReadUtxosRequest'keys = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ReadUtxosRequest "fieldMask" Proto.Google.Protobuf.FieldMask.FieldMask where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosRequest'fieldMask (\ x__ y__ -> x__ {_ReadUtxosRequest'fieldMask = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField ReadUtxosRequest "maybe'fieldMask" (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosRequest'fieldMask (\ x__ y__ -> x__ {_ReadUtxosRequest'fieldMask = y__})) Prelude.id instance Data.ProtoLens.Message ReadUtxosRequest where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.ReadUtxosRequest" packedMessageDescriptor _ = "\n\ \\DLEReadUtxosRequest\DC21\n\ \\EOTkeys\CAN\SOH \ETX(\v2\GS.utxorpc.v1alpha.query.TxoRefR\EOTkeys\DC29\n\ \\n\ \field_mask\CAN\STX \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let keys__field_descriptor = Data.ProtoLens.FieldDescriptor "keys" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor TxoRef) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"keys")) :: Data.ProtoLens.FieldDescriptor ReadUtxosRequest fieldMask__field_descriptor = Data.ProtoLens.FieldDescriptor "field_mask" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.FieldMask.FieldMask) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'fieldMask")) :: Data.ProtoLens.FieldDescriptor ReadUtxosRequest in Data.Map.fromList [(Data.ProtoLens.Tag 1, keys__field_descriptor), (Data.ProtoLens.Tag 2, fieldMask__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ReadUtxosRequest'_unknownFields (\ x__ y__ -> x__ {_ReadUtxosRequest'_unknownFields = y__}) defMessage = ReadUtxosRequest'_constructor {_ReadUtxosRequest'keys = Data.Vector.Generic.empty, _ReadUtxosRequest'fieldMask = Prelude.Nothing, _ReadUtxosRequest'_unknownFields = []} parseMessage = let loop :: ReadUtxosRequest -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TxoRef -> Data.ProtoLens.Encoding.Bytes.Parser ReadUtxosRequest loop x mutable'keys = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'keys <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'keys) (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'keys") frozen'keys 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "keys" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'keys y) loop x v 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "field_mask" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"fieldMask") y x) mutable'keys wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'keys in (Data.ProtoLens.Encoding.Bytes.) (do mutable'keys <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'keys) "ReadUtxosRequest" buildMessage = \ _x -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (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.ProtoLens.encodeMessage _v)) (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'keys") _x)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'fieldMask") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData ReadUtxosRequest where rnf = \ x__ -> Control.DeepSeq.deepseq (_ReadUtxosRequest'_unknownFields x__) (Control.DeepSeq.deepseq (_ReadUtxosRequest'keys x__) (Control.DeepSeq.deepseq (_ReadUtxosRequest'fieldMask x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.items' @:: Lens' ReadUtxosResponse [AnyUtxoData]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'items' @:: Lens' ReadUtxosResponse (Data.Vector.Vector AnyUtxoData)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.ledgerTip' @:: Lens' ReadUtxosResponse ChainPoint@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'ledgerTip' @:: Lens' ReadUtxosResponse (Prelude.Maybe ChainPoint)@ -} data ReadUtxosResponse = ReadUtxosResponse'_constructor {_ReadUtxosResponse'items :: !(Data.Vector.Vector AnyUtxoData), _ReadUtxosResponse'ledgerTip :: !(Prelude.Maybe ChainPoint), _ReadUtxosResponse'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ReadUtxosResponse where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ReadUtxosResponse "items" [AnyUtxoData] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosResponse'items (\ x__ y__ -> x__ {_ReadUtxosResponse'items = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField ReadUtxosResponse "vec'items" (Data.Vector.Vector AnyUtxoData) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosResponse'items (\ x__ y__ -> x__ {_ReadUtxosResponse'items = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ReadUtxosResponse "ledgerTip" ChainPoint where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosResponse'ledgerTip (\ x__ y__ -> x__ {_ReadUtxosResponse'ledgerTip = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField ReadUtxosResponse "maybe'ledgerTip" (Prelude.Maybe ChainPoint) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ReadUtxosResponse'ledgerTip (\ x__ y__ -> x__ {_ReadUtxosResponse'ledgerTip = y__})) Prelude.id instance Data.ProtoLens.Message ReadUtxosResponse where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.ReadUtxosResponse" packedMessageDescriptor _ = "\n\ \\DC1ReadUtxosResponse\DC28\n\ \\ENQitems\CAN\SOH \ETX(\v2\".utxorpc.v1alpha.query.AnyUtxoDataR\ENQitems\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let items__field_descriptor = Data.ProtoLens.FieldDescriptor "items" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor AnyUtxoData) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"items")) :: Data.ProtoLens.FieldDescriptor ReadUtxosResponse ledgerTip__field_descriptor = Data.ProtoLens.FieldDescriptor "ledger_tip" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor ChainPoint) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'ledgerTip")) :: Data.ProtoLens.FieldDescriptor ReadUtxosResponse in Data.Map.fromList [(Data.ProtoLens.Tag 1, items__field_descriptor), (Data.ProtoLens.Tag 2, ledgerTip__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ReadUtxosResponse'_unknownFields (\ x__ y__ -> x__ {_ReadUtxosResponse'_unknownFields = y__}) defMessage = ReadUtxosResponse'_constructor {_ReadUtxosResponse'items = Data.Vector.Generic.empty, _ReadUtxosResponse'ledgerTip = Prelude.Nothing, _ReadUtxosResponse'_unknownFields = []} parseMessage = let loop :: ReadUtxosResponse -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AnyUtxoData -> Data.ProtoLens.Encoding.Bytes.Parser ReadUtxosResponse loop x mutable'items = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'items <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'items) (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'items") frozen'items 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "items" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'items y) loop x v 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "ledger_tip" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ledgerTip") y x) mutable'items wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'items in (Data.ProtoLens.Encoding.Bytes.) (do mutable'items <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'items) "ReadUtxosResponse" buildMessage = \ _x -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (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.ProtoLens.encodeMessage _v)) (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'items") _x)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'ledgerTip") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData ReadUtxosResponse where rnf = \ x__ -> Control.DeepSeq.deepseq (_ReadUtxosResponse'_unknownFields x__) (Control.DeepSeq.deepseq (_ReadUtxosResponse'items x__) (Control.DeepSeq.deepseq (_ReadUtxosResponse'ledgerTip x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.predicate' @:: Lens' SearchUtxosRequest UtxoPredicate@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'predicate' @:: Lens' SearchUtxosRequest (Prelude.Maybe UtxoPredicate)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.fieldMask' @:: Lens' SearchUtxosRequest Proto.Google.Protobuf.FieldMask.FieldMask@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'fieldMask' @:: Lens' SearchUtxosRequest (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask)@ -} data SearchUtxosRequest = SearchUtxosRequest'_constructor {_SearchUtxosRequest'predicate :: !(Prelude.Maybe UtxoPredicate), _SearchUtxosRequest'fieldMask :: !(Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask), _SearchUtxosRequest'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show SearchUtxosRequest where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField SearchUtxosRequest "predicate" UtxoPredicate where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosRequest'predicate (\ x__ y__ -> x__ {_SearchUtxosRequest'predicate = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField SearchUtxosRequest "maybe'predicate" (Prelude.Maybe UtxoPredicate) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosRequest'predicate (\ x__ y__ -> x__ {_SearchUtxosRequest'predicate = y__})) Prelude.id instance Data.ProtoLens.Field.HasField SearchUtxosRequest "fieldMask" Proto.Google.Protobuf.FieldMask.FieldMask where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosRequest'fieldMask (\ x__ y__ -> x__ {_SearchUtxosRequest'fieldMask = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField SearchUtxosRequest "maybe'fieldMask" (Prelude.Maybe Proto.Google.Protobuf.FieldMask.FieldMask) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosRequest'fieldMask (\ x__ y__ -> x__ {_SearchUtxosRequest'fieldMask = y__})) Prelude.id instance Data.ProtoLens.Message SearchUtxosRequest where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.SearchUtxosRequest" packedMessageDescriptor _ = "\n\ \\DC2SearchUtxosRequest\DC2B\n\ \\tpredicate\CAN\SOH \SOH(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\tpredicate\DC29\n\ \\n\ \field_mask\CAN\STX \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let predicate__field_descriptor = Data.ProtoLens.FieldDescriptor "predicate" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor UtxoPredicate) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'predicate")) :: Data.ProtoLens.FieldDescriptor SearchUtxosRequest fieldMask__field_descriptor = Data.ProtoLens.FieldDescriptor "field_mask" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.FieldMask.FieldMask) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'fieldMask")) :: Data.ProtoLens.FieldDescriptor SearchUtxosRequest in Data.Map.fromList [(Data.ProtoLens.Tag 1, predicate__field_descriptor), (Data.ProtoLens.Tag 2, fieldMask__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _SearchUtxosRequest'_unknownFields (\ x__ y__ -> x__ {_SearchUtxosRequest'_unknownFields = y__}) defMessage = SearchUtxosRequest'_constructor {_SearchUtxosRequest'predicate = Prelude.Nothing, _SearchUtxosRequest'fieldMask = Prelude.Nothing, _SearchUtxosRequest'_unknownFields = []} parseMessage = let loop :: SearchUtxosRequest -> Data.ProtoLens.Encoding.Bytes.Parser SearchUtxosRequest 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "predicate" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"predicate") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "field_mask" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"fieldMask") 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) "SearchUtxosRequest" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'predicate") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (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.ProtoLens.encodeMessage _v)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'fieldMask") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData SearchUtxosRequest where rnf = \ x__ -> Control.DeepSeq.deepseq (_SearchUtxosRequest'_unknownFields x__) (Control.DeepSeq.deepseq (_SearchUtxosRequest'predicate x__) (Control.DeepSeq.deepseq (_SearchUtxosRequest'fieldMask x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.items' @:: Lens' SearchUtxosResponse [AnyUtxoData]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'items' @:: Lens' SearchUtxosResponse (Data.Vector.Vector AnyUtxoData)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.ledgerTip' @:: Lens' SearchUtxosResponse ChainPoint@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'ledgerTip' @:: Lens' SearchUtxosResponse (Prelude.Maybe ChainPoint)@ -} data SearchUtxosResponse = SearchUtxosResponse'_constructor {_SearchUtxosResponse'items :: !(Data.Vector.Vector AnyUtxoData), _SearchUtxosResponse'ledgerTip :: !(Prelude.Maybe ChainPoint), _SearchUtxosResponse'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show SearchUtxosResponse where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField SearchUtxosResponse "items" [AnyUtxoData] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosResponse'items (\ x__ y__ -> x__ {_SearchUtxosResponse'items = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField SearchUtxosResponse "vec'items" (Data.Vector.Vector AnyUtxoData) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosResponse'items (\ x__ y__ -> x__ {_SearchUtxosResponse'items = y__})) Prelude.id instance Data.ProtoLens.Field.HasField SearchUtxosResponse "ledgerTip" ChainPoint where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosResponse'ledgerTip (\ x__ y__ -> x__ {_SearchUtxosResponse'ledgerTip = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField SearchUtxosResponse "maybe'ledgerTip" (Prelude.Maybe ChainPoint) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchUtxosResponse'ledgerTip (\ x__ y__ -> x__ {_SearchUtxosResponse'ledgerTip = y__})) Prelude.id instance Data.ProtoLens.Message SearchUtxosResponse where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.SearchUtxosResponse" packedMessageDescriptor _ = "\n\ \\DC3SearchUtxosResponse\DC28\n\ \\ENQitems\CAN\SOH \ETX(\v2\".utxorpc.v1alpha.query.AnyUtxoDataR\ENQitems\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let items__field_descriptor = Data.ProtoLens.FieldDescriptor "items" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor AnyUtxoData) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"items")) :: Data.ProtoLens.FieldDescriptor SearchUtxosResponse ledgerTip__field_descriptor = Data.ProtoLens.FieldDescriptor "ledger_tip" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor ChainPoint) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'ledgerTip")) :: Data.ProtoLens.FieldDescriptor SearchUtxosResponse in Data.Map.fromList [(Data.ProtoLens.Tag 1, items__field_descriptor), (Data.ProtoLens.Tag 2, ledgerTip__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _SearchUtxosResponse'_unknownFields (\ x__ y__ -> x__ {_SearchUtxosResponse'_unknownFields = y__}) defMessage = SearchUtxosResponse'_constructor {_SearchUtxosResponse'items = Data.Vector.Generic.empty, _SearchUtxosResponse'ledgerTip = Prelude.Nothing, _SearchUtxosResponse'_unknownFields = []} parseMessage = let loop :: SearchUtxosResponse -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AnyUtxoData -> Data.ProtoLens.Encoding.Bytes.Parser SearchUtxosResponse loop x mutable'items = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'items <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'items) (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'items") frozen'items 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "items" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'items y) loop x v 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "ledger_tip" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ledgerTip") y x) mutable'items wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'items in (Data.ProtoLens.Encoding.Bytes.) (do mutable'items <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'items) "SearchUtxosResponse" buildMessage = \ _x -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (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.ProtoLens.encodeMessage _v)) (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'items") _x)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'ledgerTip") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData SearchUtxosResponse where rnf = \ x__ -> Control.DeepSeq.deepseq (_SearchUtxosResponse'_unknownFields x__) (Control.DeepSeq.deepseq (_SearchUtxosResponse'items x__) (Control.DeepSeq.deepseq (_SearchUtxosResponse'ledgerTip x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.hash' @:: Lens' TxoRef Data.ByteString.ByteString@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.index' @:: Lens' TxoRef Data.Word.Word32@ -} data TxoRef = TxoRef'_constructor {_TxoRef'hash :: !Data.ByteString.ByteString, _TxoRef'index :: !Data.Word.Word32, _TxoRef'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show TxoRef where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField TxoRef "hash" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _TxoRef'hash (\ x__ y__ -> x__ {_TxoRef'hash = y__})) Prelude.id instance Data.ProtoLens.Field.HasField TxoRef "index" Data.Word.Word32 where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _TxoRef'index (\ x__ y__ -> x__ {_TxoRef'index = y__})) Prelude.id instance Data.ProtoLens.Message TxoRef where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.TxoRef" packedMessageDescriptor _ = "\n\ \\ACKTxoRef\DC2\DC2\n\ \\EOThash\CAN\SOH \SOH(\fR\EOThash\DC2\DC4\n\ \\ENQindex\CAN\STX \SOH(\rR\ENQindex" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let 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 TxoRef index__field_descriptor = Data.ProtoLens.FieldDescriptor "index" (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"index")) :: Data.ProtoLens.FieldDescriptor TxoRef in Data.Map.fromList [(Data.ProtoLens.Tag 1, hash__field_descriptor), (Data.ProtoLens.Tag 2, index__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _TxoRef'_unknownFields (\ x__ y__ -> x__ {_TxoRef'_unknownFields = y__}) defMessage = TxoRef'_constructor {_TxoRef'hash = Data.ProtoLens.fieldDefault, _TxoRef'index = Data.ProtoLens.fieldDefault, _TxoRef'_unknownFields = []} parseMessage = let loop :: TxoRef -> Data.ProtoLens.Encoding.Bytes.Parser TxoRef 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)) "hash" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"hash") y x) 16 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt) "index" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"index") 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) "TxoRef" buildMessage = \ _x -> (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 10) ((\ 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 @"index") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 16) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData TxoRef where rnf = \ x__ -> Control.DeepSeq.deepseq (_TxoRef'_unknownFields x__) (Control.DeepSeq.deepseq (_TxoRef'hash x__) (Control.DeepSeq.deepseq (_TxoRef'index x__) ())) {- | Fields : * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.match' @:: Lens' UtxoPredicate AnyUtxoPattern@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.maybe'match' @:: Lens' UtxoPredicate (Prelude.Maybe AnyUtxoPattern)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.not' @:: Lens' UtxoPredicate [UtxoPredicate]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'not' @:: Lens' UtxoPredicate (Data.Vector.Vector UtxoPredicate)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.allOf' @:: Lens' UtxoPredicate [UtxoPredicate]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'allOf' @:: Lens' UtxoPredicate (Data.Vector.Vector UtxoPredicate)@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.anyOf' @:: Lens' UtxoPredicate [UtxoPredicate]@ * 'Proto.Utxorpc.V1alpha.Query.Query_Fields.vec'anyOf' @:: Lens' UtxoPredicate (Data.Vector.Vector UtxoPredicate)@ -} data UtxoPredicate = UtxoPredicate'_constructor {_UtxoPredicate'match :: !(Prelude.Maybe AnyUtxoPattern), _UtxoPredicate'not :: !(Data.Vector.Vector UtxoPredicate), _UtxoPredicate'allOf :: !(Data.Vector.Vector UtxoPredicate), _UtxoPredicate'anyOf :: !(Data.Vector.Vector UtxoPredicate), _UtxoPredicate'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show UtxoPredicate where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField UtxoPredicate "match" AnyUtxoPattern where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'match (\ x__ y__ -> x__ {_UtxoPredicate'match = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField UtxoPredicate "maybe'match" (Prelude.Maybe AnyUtxoPattern) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'match (\ x__ y__ -> x__ {_UtxoPredicate'match = y__})) Prelude.id instance Data.ProtoLens.Field.HasField UtxoPredicate "not" [UtxoPredicate] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'not (\ x__ y__ -> x__ {_UtxoPredicate'not = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField UtxoPredicate "vec'not" (Data.Vector.Vector UtxoPredicate) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'not (\ x__ y__ -> x__ {_UtxoPredicate'not = y__})) Prelude.id instance Data.ProtoLens.Field.HasField UtxoPredicate "allOf" [UtxoPredicate] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'allOf (\ x__ y__ -> x__ {_UtxoPredicate'allOf = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField UtxoPredicate "vec'allOf" (Data.Vector.Vector UtxoPredicate) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'allOf (\ x__ y__ -> x__ {_UtxoPredicate'allOf = y__})) Prelude.id instance Data.ProtoLens.Field.HasField UtxoPredicate "anyOf" [UtxoPredicate] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'anyOf (\ x__ y__ -> x__ {_UtxoPredicate'anyOf = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField UtxoPredicate "vec'anyOf" (Data.Vector.Vector UtxoPredicate) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _UtxoPredicate'anyOf (\ x__ y__ -> x__ {_UtxoPredicate'anyOf = y__})) Prelude.id instance Data.ProtoLens.Message UtxoPredicate where messageName _ = Data.Text.pack "utxorpc.v1alpha.query.UtxoPredicate" packedMessageDescriptor _ = "\n\ \\rUtxoPredicate\DC2;\n\ \\ENQmatch\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.query.AnyUtxoPatternR\ENQmatch\DC26\n\ \\ETXnot\CAN\STX \ETX(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\ETXnot\DC2;\n\ \\ACKall_of\CAN\ETX \ETX(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\ENQallOf\DC2;\n\ \\ACKany_of\CAN\EOT \ETX(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\ENQanyOf" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let match__field_descriptor = Data.ProtoLens.FieldDescriptor "match" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor AnyUtxoPattern) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'match")) :: Data.ProtoLens.FieldDescriptor UtxoPredicate not__field_descriptor = Data.ProtoLens.FieldDescriptor "not" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor UtxoPredicate) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"not")) :: Data.ProtoLens.FieldDescriptor UtxoPredicate allOf__field_descriptor = Data.ProtoLens.FieldDescriptor "all_of" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor UtxoPredicate) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"allOf")) :: Data.ProtoLens.FieldDescriptor UtxoPredicate anyOf__field_descriptor = Data.ProtoLens.FieldDescriptor "any_of" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor UtxoPredicate) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"anyOf")) :: Data.ProtoLens.FieldDescriptor UtxoPredicate in Data.Map.fromList [(Data.ProtoLens.Tag 1, match__field_descriptor), (Data.ProtoLens.Tag 2, not__field_descriptor), (Data.ProtoLens.Tag 3, allOf__field_descriptor), (Data.ProtoLens.Tag 4, anyOf__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _UtxoPredicate'_unknownFields (\ x__ y__ -> x__ {_UtxoPredicate'_unknownFields = y__}) defMessage = UtxoPredicate'_constructor {_UtxoPredicate'match = Prelude.Nothing, _UtxoPredicate'not = Data.Vector.Generic.empty, _UtxoPredicate'allOf = Data.Vector.Generic.empty, _UtxoPredicate'anyOf = Data.Vector.Generic.empty, _UtxoPredicate'_unknownFields = []} parseMessage = let loop :: UtxoPredicate -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld UtxoPredicate -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld UtxoPredicate -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld UtxoPredicate -> Data.ProtoLens.Encoding.Bytes.Parser UtxoPredicate loop x mutable'allOf mutable'anyOf mutable'not = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'allOf <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'allOf) frozen'anyOf <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'anyOf) frozen'not <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'not) (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'allOf") frozen'allOf (Lens.Family2.set (Data.ProtoLens.Field.field @"vec'anyOf") frozen'anyOf (Lens.Family2.set (Data.ProtoLens.Field.field @"vec'not") frozen'not 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.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "match" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"match") y x) mutable'allOf mutable'anyOf mutable'not 18 -> do !y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "not" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'not y) loop x mutable'allOf mutable'anyOf v 26 -> do !y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "all_of" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'allOf y) loop x v mutable'anyOf mutable'not 34 -> do !y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "any_of" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'anyOf y) loop x mutable'allOf v mutable'not wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'allOf mutable'anyOf mutable'not in (Data.ProtoLens.Encoding.Bytes.) (do mutable'allOf <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new mutable'anyOf <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new mutable'not <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'allOf mutable'anyOf mutable'not) "UtxoPredicate" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'match") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _v) -> (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.ProtoLens.encodeMessage _v)) ((Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 18) ((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'not") _x)) ((Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 26) ((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'allOf") _x)) ((Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 34) ((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'anyOf") _x)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) instance Control.DeepSeq.NFData UtxoPredicate where rnf = \ x__ -> Control.DeepSeq.deepseq (_UtxoPredicate'_unknownFields x__) (Control.DeepSeq.deepseq (_UtxoPredicate'match x__) (Control.DeepSeq.deepseq (_UtxoPredicate'not x__) (Control.DeepSeq.deepseq (_UtxoPredicate'allOf x__) (Control.DeepSeq.deepseq (_UtxoPredicate'anyOf x__) ())))) data QueryService = QueryService {} instance Data.ProtoLens.Service.Types.Service QueryService where type ServiceName QueryService = "QueryService" type ServicePackage QueryService = "utxorpc.v1alpha.query" type ServiceMethods QueryService = '["readData", "readParams", "readUtxos", "searchUtxos"] packedServiceDescriptor _ = "\n\ \\fQueryService\DC2a\n\ \\n\ \ReadParams\DC2(.utxorpc.v1alpha.query.ReadParamsRequest\SUB).utxorpc.v1alpha.query.ReadParamsResponse\DC2^\n\ \\tReadUtxos\DC2'.utxorpc.v1alpha.query.ReadUtxosRequest\SUB(.utxorpc.v1alpha.query.ReadUtxosResponse\DC2d\n\ \\vSearchUtxos\DC2).utxorpc.v1alpha.query.SearchUtxosRequest\SUB*.utxorpc.v1alpha.query.SearchUtxosResponse\DC2[\n\ \\bReadData\DC2&.utxorpc.v1alpha.query.ReadDataRequest\SUB'.utxorpc.v1alpha.query.ReadDataResponse" instance Data.ProtoLens.Service.Types.HasMethodImpl QueryService "readParams" where type MethodName QueryService "readParams" = "ReadParams" type MethodInput QueryService "readParams" = ReadParamsRequest type MethodOutput QueryService "readParams" = ReadParamsResponse type MethodStreamingType QueryService "readParams" = 'Data.ProtoLens.Service.Types.NonStreaming instance Data.ProtoLens.Service.Types.HasMethodImpl QueryService "readUtxos" where type MethodName QueryService "readUtxos" = "ReadUtxos" type MethodInput QueryService "readUtxos" = ReadUtxosRequest type MethodOutput QueryService "readUtxos" = ReadUtxosResponse type MethodStreamingType QueryService "readUtxos" = 'Data.ProtoLens.Service.Types.NonStreaming instance Data.ProtoLens.Service.Types.HasMethodImpl QueryService "searchUtxos" where type MethodName QueryService "searchUtxos" = "SearchUtxos" type MethodInput QueryService "searchUtxos" = SearchUtxosRequest type MethodOutput QueryService "searchUtxos" = SearchUtxosResponse type MethodStreamingType QueryService "searchUtxos" = 'Data.ProtoLens.Service.Types.NonStreaming instance Data.ProtoLens.Service.Types.HasMethodImpl QueryService "readData" where type MethodName QueryService "readData" = "ReadData" type MethodInput QueryService "readData" = ReadDataRequest type MethodOutput QueryService "readData" = ReadDataResponse type MethodStreamingType QueryService "readData" = 'Data.ProtoLens.Service.Types.NonStreaming packedFileDescriptor :: Data.ByteString.ByteString packedFileDescriptor = "\n\ \!utxorpc/v1alpha/query/query.proto\DC2\NAKutxorpc.v1alpha.query\SUB google/protobuf/field_mask.proto\SUB%utxorpc/v1alpha/cardano/cardano.proto\"4\n\ \\n\ \ChainPoint\DC2\DC2\n\ \\EOTslot\CAN\SOH \SOH(\EOTR\EOTslot\DC2\DC2\n\ \\EOThash\CAN\STX \SOH(\fR\EOThash\"2\n\ \\ACKTxoRef\DC2\DC2\n\ \\EOThash\CAN\SOH \SOH(\fR\EOThash\DC2\DC4\n\ \\ENQindex\CAN\STX \SOH(\rR\ENQindex\"N\n\ \\DC1ReadParamsRequest\DC29\n\ \\n\ \field_mask\CAN\SOH \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask\"X\n\ \\SOAnyChainParams\DC2<\n\ \\acardano\CAN\SOH \SOH(\v2 .utxorpc.v1alpha.cardano.PParamsH\NULR\acardanoB\b\n\ \\ACKparams\"\149\SOH\n\ \\DC2ReadParamsResponse\DC2=\n\ \\ACKvalues\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.query.AnyChainParamsR\ACKvalues\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip\"f\n\ \\SOAnyUtxoPattern\DC2D\n\ \\acardano\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternH\NULR\acardanoB\SO\n\ \\futxo_pattern\"\254\SOH\n\ \\rUtxoPredicate\DC2;\n\ \\ENQmatch\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.query.AnyUtxoPatternR\ENQmatch\DC26\n\ \\ETXnot\CAN\STX \ETX(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\ETXnot\DC2;\n\ \\ACKall_of\CAN\ETX \ETX(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\ENQallOf\DC2;\n\ \\ACKany_of\CAN\EOT \ETX(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\ENQanyOf\"\183\SOH\n\ \\vAnyUtxoData\DC2!\n\ \\fnative_bytes\CAN\SOH \SOH(\fR\vnativeBytes\DC26\n\ \\atxo_ref\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.query.TxoRefR\ACKtxoRef\DC2=\n\ \\acardano\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputH\NULR\acardanoB\SO\n\ \\fparsed_state\"\128\SOH\n\ \\DLEReadUtxosRequest\DC21\n\ \\EOTkeys\CAN\SOH \ETX(\v2\GS.utxorpc.v1alpha.query.TxoRefR\EOTkeys\DC29\n\ \\n\ \field_mask\CAN\STX \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask\"\143\SOH\n\ \\DC1ReadUtxosResponse\DC28\n\ \\ENQitems\CAN\SOH \ETX(\v2\".utxorpc.v1alpha.query.AnyUtxoDataR\ENQitems\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip\"\147\SOH\n\ \\DC2SearchUtxosRequest\DC2B\n\ \\tpredicate\CAN\SOH \SOH(\v2$.utxorpc.v1alpha.query.UtxoPredicateR\tpredicate\DC29\n\ \\n\ \field_mask\CAN\STX \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask\"\145\SOH\n\ \\DC3SearchUtxosResponse\DC28\n\ \\ENQitems\CAN\SOH \ETX(\v2\".utxorpc.v1alpha.query.AnyUtxoDataR\ENQitems\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip\"`\n\ \\SIReadDataRequest\DC2\DC2\n\ \\EOTkeys\CAN\SOH \ETX(\fR\EOTkeys\DC29\n\ \\n\ \field_mask\CAN\STX \SOH(\v2\SUB.google.protobuf.FieldMaskR\tfieldMask\"\149\SOH\n\ \\rAnyChainDatum\DC2!\n\ \\fnative_bytes\CAN\SOH \SOH(\fR\vnativeBytes\DC2\DLE\n\ \\ETXkey\CAN\STX \SOH(\fR\ETXkey\DC2?\n\ \\acardano\CAN\ETX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataH\NULR\acardanoB\SO\n\ \\fparsed_state\"\146\SOH\n\ \\DLEReadDataResponse\DC2<\n\ \\ACKvalues\CAN\SOH \ETX(\v2$.utxorpc.v1alpha.query.AnyChainDatumR\ACKvalues\DC2@\n\ \\n\ \ledger_tip\CAN\STX \SOH(\v2!.utxorpc.v1alpha.query.ChainPointR\tledgerTip2\148\ETX\n\ \\fQueryService\DC2a\n\ \\n\ \ReadParams\DC2(.utxorpc.v1alpha.query.ReadParamsRequest\SUB).utxorpc.v1alpha.query.ReadParamsResponse\DC2^\n\ \\tReadUtxos\DC2'.utxorpc.v1alpha.query.ReadUtxosRequest\SUB(.utxorpc.v1alpha.query.ReadUtxosResponse\DC2d\n\ \\vSearchUtxos\DC2).utxorpc.v1alpha.query.SearchUtxosRequest\SUB*.utxorpc.v1alpha.query.SearchUtxosResponse\DC2[\n\ \\bReadData\DC2&.utxorpc.v1alpha.query.ReadDataRequest\SUB'.utxorpc.v1alpha.query.ReadDataResponseB\210\SOH\n\ \\EMcom.utxorpc.v1alpha.queryB\n\ \QueryProtoP\SOHZ3github.com/utxorpc/go-codegen/utxorpc/v1alpha/query\162\STX\ETXUVQ\170\STX\NAKUtxorpc.V1alpha.Query\202\STX\NAKUtxorpc\\V1alpha\\Query\226\STX!Utxorpc\\V1alpha\\Query\\GPBMetadata\234\STX\ETBUtxorpc::V1alpha::QueryJ\158%\n\ \\ACK\DC2\EOT\STX\NULw\SOH\n\ \9\n\ \\SOH\f\DC2\ETX\STX\NUL\DC22// A consistent view of the state of the ledger\n\ \\n\ \\b\n\ \\SOH\STX\DC2\ETX\EOT\NUL\RS\n\ \\t\n\ \\STX\ETX\NUL\DC2\ETX\ACK\NUL*\n\ \\t\n\ \\STX\ETX\SOH\DC2\ETX\a\NUL/\n\ \<\n\ \\STX\EOT\NUL\DC2\EOT\n\ \\NUL\r\SOH\SUB0 Represents a specific point in the blockchain.\n\ \\n\ \\n\ \\n\ \\ETX\EOT\NUL\SOH\DC2\ETX\n\ \\b\DC2\n\ \\ESC\n\ \\EOT\EOT\NUL\STX\NUL\DC2\ETX\v\STX\DC2\"\SO Slot number.\n\ \\n\ \\f\n\ \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\v\STX\b\n\ \\f\n\ \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\v\t\r\n\ \\f\n\ \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\v\DLE\DC1\n\ \\SUB\n\ \\EOT\EOT\NUL\STX\SOH\DC2\ETX\f\STX\DC1\"\r Block hash.\n\ \\n\ \\f\n\ \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\f\STX\a\n\ \\f\n\ \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\f\b\f\n\ \\f\n\ \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\f\SI\DLE\n\ \<\n\ \\STX\EOT\SOH\DC2\EOT\DLE\NUL\DC3\SOH\SUB0 Represents a reference to a transaction output\n\ \\n\ \\n\ \\n\ \\ETX\EOT\SOH\SOH\DC2\ETX\DLE\b\SO\n\ \\ETB\n\ \\EOT\EOT\SOH\STX\NUL\DC2\ETX\DC1\STX\DC1\"\n\ \ Tx hash.\n\ \\n\ \\f\n\ \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\DC1\STX\a\n\ \\f\n\ \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\DC1\b\f\n\ \\f\n\ \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\DC1\SI\DLE\n\ \\FS\n\ \\EOT\EOT\SOH\STX\SOH\DC2\ETX\DC2\STX\DC3\"\SI Output index.\n\ \\n\ \\f\n\ \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\DC2\STX\b\n\ \\f\n\ \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\DC2\t\SO\n\ \\f\n\ \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\DC2\DC1\DC2\n\ \1\n\ \\STX\EOT\STX\DC2\EOT\SYN\NUL\CAN\SOH\SUB% Request to get the chain parameters\n\ \\n\ \\n\ \\n\ \\ETX\EOT\STX\SOH\DC2\ETX\SYN\b\EM\n\ \N\n\ \\EOT\EOT\STX\STX\NUL\DC2\ETX\ETB\STX+\"A Field mask to selectively return fields in the parsed response.\n\ \\n\ \\f\n\ \\ENQ\EOT\STX\STX\NUL\ACK\DC2\ETX\ETB\STX\ESC\n\ \\f\n\ \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX\ETB\FS&\n\ \\f\n\ \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX\ETB)*\n\ \U\n\ \\STX\EOT\ETX\DC2\EOT\ESC\NUL\US\SOH\SUBI An evenlope that holds parameter data from any of the compatible chains\n\ \\n\ \\n\ \\n\ \\ETX\EOT\ETX\SOH\DC2\ETX\ESC\b\SYN\n\ \\f\n\ \\EOT\EOT\ETX\b\NUL\DC2\EOT\FS\STX\RS\ETX\n\ \\f\n\ \\ENQ\EOT\ETX\b\NUL\SOH\DC2\ETX\FS\b\SO\n\ \!\n\ \\EOT\EOT\ETX\STX\NUL\DC2\ETX\GS\EOT0\"\DC4 Cardano parameters\n\ \\n\ \\f\n\ \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\ETX\GS\EOT#\n\ \\f\n\ \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX\GS$+\n\ \\f\n\ \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX\GS./\n\ \6\n\ \\STX\EOT\EOT\DC2\EOT\"\NUL%\SOH\SUB* Response containing the chain parameters\n\ \\n\ \\n\ \\n\ \\ETX\EOT\EOT\SOH\DC2\ETX\"\b\SUB\n\ \+\n\ \\EOT\EOT\EOT\STX\NUL\DC2\ETX#\STX\FS\"\RS The value of the parameters.\n\ \\n\ \\f\n\ \\ENQ\EOT\EOT\STX\NUL\ACK\DC2\ETX#\STX\DLE\n\ \\f\n\ \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETX#\DC1\ETB\n\ \\f\n\ \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETX#\SUB\ESC\n\ \J\n\ \\EOT\EOT\EOT\STX\SOH\DC2\ETX$\STX\FS\"= The chain point that represent the ledger current position.\n\ \\n\ \\f\n\ \\ENQ\EOT\EOT\STX\SOH\ACK\DC2\ETX$\STX\f\n\ \\f\n\ \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETX$\r\ETB\n\ \\f\n\ \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETX$\SUB\ESC\n\ \S\n\ \\STX\EOT\ENQ\DC2\EOT(\NUL,\SOH\SUBG An evenlope that holds an UTxO patterns from any of compatible chains\n\ \\n\ \\n\ \\n\ \\ETX\EOT\ENQ\SOH\DC2\ETX(\b\SYN\n\ \\f\n\ \\EOT\EOT\ENQ\b\NUL\DC2\EOT)\STX+\ETX\n\ \\f\n\ \\ENQ\EOT\ENQ\b\NUL\SOH\DC2\ETX)\b\DC4\n\ \\v\n\ \\EOT\EOT\ENQ\STX\NUL\DC2\ETX*\EOT8\n\ \\f\n\ \\ENQ\EOT\ENQ\STX\NUL\ACK\DC2\ETX*\EOT+\n\ \\f\n\ \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\ETX*,3\n\ \\f\n\ \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\ETX*67\n\ \^\n\ \\STX\EOT\ACK\DC2\EOT/\NUL4\SOH\SUBR Represents a simple utxo predicate that can composed to create more complex ones\n\ \\n\ \\n\ \\n\ \\ETX\EOT\ACK\SOH\DC2\ETX/\b\NAK\n\ \8\n\ \\EOT\EOT\ACK\STX\NUL\DC2\ETX0\STX\ESC\"+ Predicate is true if tx exhibits pattern.\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\NUL\ACK\DC2\ETX0\STX\DLE\n\ \\f\n\ \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\ETX0\DC1\SYN\n\ \\f\n\ \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\ETX0\EM\SUB\n\ \?\n\ \\EOT\EOT\ACK\STX\SOH\DC2\ETX1\STX!\"2 Predicate is true if tx doesn't exhibit pattern.\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\SOH\EOT\DC2\ETX1\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\SOH\ACK\DC2\ETX1\v\CAN\n\ \\f\n\ \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\ETX1\EM\FS\n\ \\f\n\ \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\ETX1\US \n\ \F\n\ \\EOT\EOT\ACK\STX\STX\DC2\ETX2\STX$\"9 Predicate is true if utxo exhibits all of the patterns.\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\STX\EOT\DC2\ETX2\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\STX\ACK\DC2\ETX2\v\CAN\n\ \\f\n\ \\ENQ\EOT\ACK\STX\STX\SOH\DC2\ETX2\EM\US\n\ \\f\n\ \\ENQ\EOT\ACK\STX\STX\ETX\DC2\ETX2\"#\n\ \F\n\ \\EOT\EOT\ACK\STX\ETX\DC2\ETX3\STX$\"9 Predicate is true if utxo exhibits any of the patterns.\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\ETX\EOT\DC2\ETX3\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\ETX\ACK\DC2\ETX3\v\CAN\n\ \\f\n\ \\ENQ\EOT\ACK\STX\ETX\SOH\DC2\ETX3\EM\US\n\ \\f\n\ \\ENQ\EOT\ACK\STX\ETX\ETX\DC2\ETX3\"#\n\ \J\n\ \\STX\EOT\a\DC2\EOT7\NUL=\SOH\SUB> An evenlope that holds an UTxO from any of compatible chains\n\ \\n\ \\n\ \\n\ \\ETX\EOT\a\SOH\DC2\ETX7\b\DC3\n\ \5\n\ \\EOT\EOT\a\STX\NUL\DC2\ETX8\STX\EM\"( Original bytes as defined by the chain\n\ \\n\ \\f\n\ \\ENQ\EOT\a\STX\NUL\ENQ\DC2\ETX8\STX\a\n\ \\f\n\ \\ENQ\EOT\a\STX\NUL\SOH\DC2\ETX8\b\DC4\n\ \\f\n\ \\ENQ\EOT\a\STX\NUL\ETX\DC2\ETX8\ETB\CAN\n\ \0\n\ \\EOT\EOT\a\STX\SOH\DC2\ETX9\STX\NAK\"# Hash of the previous transaction.\n\ \\n\ \\f\n\ \\ENQ\EOT\a\STX\SOH\ACK\DC2\ETX9\STX\b\n\ \\f\n\ \\ENQ\EOT\a\STX\SOH\SOH\DC2\ETX9\t\DLE\n\ \\f\n\ \\ENQ\EOT\a\STX\SOH\ETX\DC2\ETX9\DC3\DC4\n\ \\f\n\ \\EOT\EOT\a\b\NUL\DC2\EOT:\STX<\ETX\n\ \\f\n\ \\ENQ\EOT\a\b\NUL\SOH\DC2\ETX:\b\DC4\n\ \\GS\n\ \\EOT\EOT\a\STX\STX\DC2\ETX;\EOT1\"\DLE A cardano UTxO\n\ \\n\ \\f\n\ \\ENQ\EOT\a\STX\STX\ACK\DC2\ETX;\EOT$\n\ \\f\n\ \\ENQ\EOT\a\STX\STX\SOH\DC2\ETX;%,\n\ \\f\n\ \\ENQ\EOT\a\STX\STX\ETX\DC2\ETX;/0\n\ \+\n\ \\STX\EOT\b\DC2\EOT@\NULC\SOH\SUB\US Request to get specific UTxOs\n\ \\n\ \\n\ \\n\ \\ETX\EOT\b\SOH\DC2\ETX@\b\CAN\n\ \\"\n\ \\EOT\EOT\b\STX\NUL\DC2\ETXA\STX\ESC\"\NAK List of keys UTxOs.\n\ \\n\ \\f\n\ \\ENQ\EOT\b\STX\NUL\EOT\DC2\ETXA\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\b\STX\NUL\ACK\DC2\ETXA\v\DC1\n\ \\f\n\ \\ENQ\EOT\b\STX\NUL\SOH\DC2\ETXA\DC2\SYN\n\ \\f\n\ \\ENQ\EOT\b\STX\NUL\ETX\DC2\ETXA\EM\SUB\n\ \7\n\ \\EOT\EOT\b\STX\SOH\DC2\ETXB\STX+\"* Field mask to selectively return fields.\n\ \\n\ \\f\n\ \\ENQ\EOT\b\STX\SOH\ACK\DC2\ETXB\STX\ESC\n\ \\f\n\ \\ENQ\EOT\b\STX\SOH\SOH\DC2\ETXB\FS&\n\ \\f\n\ \\ENQ\EOT\b\STX\SOH\ETX\DC2\ETXB)*\n\ \T\n\ \\STX\EOT\t\DC2\EOTF\NULI\SOH\SUBH Response containing the UTxOs associated with the requested addresses.\n\ \\n\ \\n\ \\n\ \\ETX\EOT\t\SOH\DC2\ETXF\b\EM\n\ \\GS\n\ \\EOT\EOT\t\STX\NUL\DC2\ETXG\STX!\"\DLE List of UTxOs.\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\NUL\EOT\DC2\ETXG\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\NUL\ACK\DC2\ETXG\v\SYN\n\ \\f\n\ \\ENQ\EOT\t\STX\NUL\SOH\DC2\ETXG\ETB\FS\n\ \\f\n\ \\ENQ\EOT\t\STX\NUL\ETX\DC2\ETXG\US \n\ \J\n\ \\EOT\EOT\t\STX\SOH\DC2\ETXH\STX\FS\"= The chain point that represent the ledger current position.\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\SOH\ACK\DC2\ETXH\STX\f\n\ \\f\n\ \\ENQ\EOT\t\STX\SOH\SOH\DC2\ETXH\r\ETB\n\ \\f\n\ \\ENQ\EOT\t\STX\SOH\ETX\DC2\ETXH\SUB\ESC\n\ \;\n\ \\STX\EOT\n\ \\DC2\EOTL\NULO\SOH\SUB/ Reques to search for UTxO based on a pattern.\n\ \\n\ \\n\ \\n\ \\ETX\EOT\n\ \\SOH\DC2\ETXL\b\SUB\n\ \)\n\ \\EOT\EOT\n\ \\STX\NUL\DC2\ETXM\STX\RS\"\FS Pattern to match UTxOs by.\n\ \\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\NUL\ACK\DC2\ETXM\STX\SI\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\NUL\SOH\DC2\ETXM\DLE\EM\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\NUL\ETX\DC2\ETXM\FS\GS\n\ \7\n\ \\EOT\EOT\n\ \\STX\SOH\DC2\ETXN\STX+\"* Field mask to selectively return fields.\n\ \\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\SOH\ACK\DC2\ETXN\STX\ESC\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\SOH\SOH\DC2\ETXN\FS&\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\SOH\ETX\DC2\ETXN)*\n\ \O\n\ \\STX\EOT\v\DC2\EOTR\NULU\SOH\SUBC Response containing the UTxOs that match the requested addresses.\n\ \\n\ \\n\ \\n\ \\ETX\EOT\v\SOH\DC2\ETXR\b\ESC\n\ \\GS\n\ \\EOT\EOT\v\STX\NUL\DC2\ETXS\STX!\"\DLE List of UTxOs.\n\ \\n\ \\f\n\ \\ENQ\EOT\v\STX\NUL\EOT\DC2\ETXS\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\v\STX\NUL\ACK\DC2\ETXS\v\SYN\n\ \\f\n\ \\ENQ\EOT\v\STX\NUL\SOH\DC2\ETXS\ETB\FS\n\ \\f\n\ \\ENQ\EOT\v\STX\NUL\ETX\DC2\ETXS\US \n\ \J\n\ \\EOT\EOT\v\STX\SOH\DC2\ETXT\STX\FS\"= The chain point that represent the ledger current position.\n\ \\n\ \\f\n\ \\ENQ\EOT\v\STX\SOH\ACK\DC2\ETXT\STX\f\n\ \\f\n\ \\ENQ\EOT\v\STX\SOH\SOH\DC2\ETXT\r\ETB\n\ \\f\n\ \\ENQ\EOT\v\STX\SOH\ETX\DC2\ETXT\SUB\ESC\n\ \9\n\ \\STX\EOT\f\DC2\EOTX\NUL[\SOH\SUB- Request to get data (as in plural of datum)\n\ \\n\ \\n\ \\n\ \\ETX\EOT\f\SOH\DC2\ETXX\b\ETB\n\ \\v\n\ \\EOT\EOT\f\STX\NUL\DC2\ETXY\STX\SUB\n\ \\f\n\ \\ENQ\EOT\f\STX\NUL\EOT\DC2\ETXY\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\f\STX\NUL\ENQ\DC2\ETXY\v\DLE\n\ \\f\n\ \\ENQ\EOT\f\STX\NUL\SOH\DC2\ETXY\DC1\NAK\n\ \\f\n\ \\ENQ\EOT\f\STX\NUL\ETX\DC2\ETXY\CAN\EM\n\ \G\n\ \\EOT\EOT\f\STX\SOH\DC2\ETXZ\STX+\": Field mask to selectively return fields in the response.\n\ \\n\ \\f\n\ \\ENQ\EOT\f\STX\SOH\ACK\DC2\ETXZ\STX\ESC\n\ \\f\n\ \\ENQ\EOT\f\STX\SOH\SOH\DC2\ETXZ\FS&\n\ \\f\n\ \\ENQ\EOT\f\STX\SOH\ETX\DC2\ETXZ)*\n\ \M\n\ \\STX\EOT\r\DC2\EOT^\NULd\SOH\SUBA An evenlope that holds a datum for any of the compatible chains\n\ \\n\ \\n\ \\n\ \\ETX\EOT\r\SOH\DC2\ETX^\b\NAK\n\ \5\n\ \\EOT\EOT\r\STX\NUL\DC2\ETX_\STX\EM\"( Original bytes as defined by the chain\n\ \\n\ \\f\n\ \\ENQ\EOT\r\STX\NUL\ENQ\DC2\ETX_\STX\a\n\ \\f\n\ \\ENQ\EOT\r\STX\NUL\SOH\DC2\ETX_\b\DC4\n\ \\f\n\ \\ENQ\EOT\r\STX\NUL\ETX\DC2\ETX_\ETB\CAN\n\ \\v\n\ \\EOT\EOT\r\STX\SOH\DC2\ETX`\STX\DLE\n\ \\f\n\ \\ENQ\EOT\r\STX\SOH\ENQ\DC2\ETX`\STX\a\n\ \\f\n\ \\ENQ\EOT\r\STX\SOH\SOH\DC2\ETX`\b\v\n\ \\f\n\ \\ENQ\EOT\r\STX\SOH\ETX\DC2\ETX`\SO\SI\n\ \\f\n\ \\EOT\EOT\r\b\NUL\DC2\EOTa\STXc\ETX\n\ \\f\n\ \\ENQ\EOT\r\b\NUL\SOH\DC2\ETXa\b\DC4\n\ \\GS\n\ \\EOT\EOT\r\STX\STX\DC2\ETXb\EOT3\"\DLE A cardano UTxO\n\ \\n\ \\f\n\ \\ENQ\EOT\r\STX\STX\ACK\DC2\ETXb\EOT&\n\ \\f\n\ \\ENQ\EOT\r\STX\STX\SOH\DC2\ETXb'.\n\ \\f\n\ \\ENQ\EOT\r\STX\STX\ETX\DC2\ETXb12\n\ \>\n\ \\STX\EOT\SO\DC2\EOTg\NULj\SOH\SUB2 Response containing data (as in plural of datum)\n\ \\n\ \\n\ \\n\ \\ETX\EOT\SO\SOH\DC2\ETXg\b\CAN\n\ \'\n\ \\EOT\EOT\SO\STX\NUL\DC2\ETXh\STX$\"\SUB The value of each datum.\n\ \\n\ \\f\n\ \\ENQ\EOT\SO\STX\NUL\EOT\DC2\ETXh\STX\n\ \\n\ \\f\n\ \\ENQ\EOT\SO\STX\NUL\ACK\DC2\ETXh\v\CAN\n\ \\f\n\ \\ENQ\EOT\SO\STX\NUL\SOH\DC2\ETXh\EM\US\n\ \\f\n\ \\ENQ\EOT\SO\STX\NUL\ETX\DC2\ETXh\"#\n\ \J\n\ \\EOT\EOT\SO\STX\SOH\DC2\ETXi\STX\FS\"= The chain point that represent the ledger current position.\n\ \\n\ \\f\n\ \\ENQ\EOT\SO\STX\SOH\ACK\DC2\ETXi\STX\f\n\ \\f\n\ \\ENQ\EOT\SO\STX\SOH\SOH\DC2\ETXi\r\ETB\n\ \\f\n\ \\ENQ\EOT\SO\STX\SOH\ETX\DC2\ETXi\SUB\ESC\n\ \E\n\ \\STX\ACK\NUL\DC2\EOTm\NULw\SOH\SUB9 Service definition for querying the state of the chain.\n\ \\n\ \\n\ \\n\ \\ETX\ACK\NUL\SOH\DC2\ETXm\b\DC4\n\ \'\n\ \\EOT\ACK\NUL\STX\NUL\DC2\ETXn\STXA\"\SUB Get overall chain state.\n\ \\n\ \\f\n\ \\ENQ\ACK\NUL\STX\NUL\SOH\DC2\ETXn\ACK\DLE\n\ \\f\n\ \\ENQ\ACK\NUL\STX\NUL\STX\DC2\ETXn\DC1\"\n\ \\f\n\ \\ENQ\ACK\NUL\STX\NUL\ETX\DC2\ETXn-?\n\ \0\n\ \\EOT\ACK\NUL\STX\SOH\DC2\ETXo\STX>\"# Read specific UTxOs by reference.\n\ \\n\ \\f\n\ \\ENQ\ACK\NUL\STX\SOH\SOH\DC2\ETXo\ACK\SI\n\ \\f\n\ \\ENQ\ACK\NUL\STX\SOH\STX\DC2\ETXo\DLE \n\ \\f\n\ \\ENQ\ACK\NUL\STX\SOH\ETX\DC2\ETXo+<\n\ \2\n\ \\EOT\ACK\NUL\STX\STX\DC2\ETXp\STXD\"% Search for UTxO based on a pattern.\n\ \\n\ \\f\n\ \\ENQ\ACK\NUL\STX\STX\SOH\DC2\ETXp\ACK\DC1\n\ \\f\n\ \\ENQ\ACK\NUL\STX\STX\STX\DC2\ETXp\DC2$\n\ \\f\n\ \\ENQ\ACK\NUL\STX\STX\ETX\DC2\ETXp/B\n\ \*\n\ \\EOT\ACK\NUL\STX\ETX\DC2\ETXq\STX;\"\GS Read specific datum by hash\n\ \\n\ \\f\n\ \\ENQ\ACK\NUL\STX\ETX\SOH\DC2\ETXq\ACK\SO\n\ \\f\n\ \\ENQ\ACK\NUL\STX\ETX\STX\DC2\ETXq\SI\RS\n\ \\f\n\ \\ENQ\ACK\NUL\STX\ETX\ETX\DC2\ETXq)9b\ACKproto3"