{- This file was auto-generated from temporal/api/common/v1/message.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.Temporal.Api.Common.V1.Message ( ActivityType(), Callback(), Callback'Variant(..), _Callback'Nexus', _Callback'Internal', Callback'Internal(), Callback'Nexus(), Callback'Nexus'HeaderEntry(), DataBlob(), Header(), Header'FieldsEntry(), Link(), Link'Variant(..), _Link'WorkflowEvent', _Link'BatchJob', Link'BatchJob(), Link'WorkflowEvent(), Link'WorkflowEvent'Reference(..), _Link'WorkflowEvent'EventRef, Link'WorkflowEvent'EventReference(), Memo(), Memo'FieldsEntry(), MeteringMetadata(), Payload(), Payload'MetadataEntry(), Payloads(), Priority(), ResetOptions(), ResetOptions'Target(..), _ResetOptions'FirstWorkflowTask, _ResetOptions'LastWorkflowTask, _ResetOptions'WorkflowTaskId, _ResetOptions'BuildId, RetryPolicy(), SearchAttributes(), SearchAttributes'IndexedFieldsEntry(), WorkerVersionCapabilities(), WorkerVersionStamp(), WorkflowExecution(), WorkflowType() ) 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.Duration import qualified Proto.Google.Protobuf.Empty import qualified Proto.Temporal.Api.Enums.V1.Common import qualified Proto.Temporal.Api.Enums.V1.EventType import qualified Proto.Temporal.Api.Enums.V1.Reset {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.name' @:: Lens' ActivityType Data.Text.Text@ -} data ActivityType = ActivityType'_constructor {_ActivityType'name :: !Data.Text.Text, _ActivityType'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ActivityType where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField ActivityType "name" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ActivityType'name (\ x__ y__ -> x__ {_ActivityType'name = y__})) Prelude.id instance Data.ProtoLens.Message ActivityType where messageName _ = Data.Text.pack "temporal.api.common.v1.ActivityType" packedMessageDescriptor _ = "\n\ \\fActivityType\DC2\DC2\n\ \\EOTname\CAN\SOH \SOH(\tR\EOTname" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let name__field_descriptor = Data.ProtoLens.FieldDescriptor "name" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"name")) :: Data.ProtoLens.FieldDescriptor ActivityType in Data.Map.fromList [(Data.ProtoLens.Tag 1, name__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ActivityType'_unknownFields (\ x__ y__ -> x__ {_ActivityType'_unknownFields = y__}) defMessage = ActivityType'_constructor {_ActivityType'name = Data.ProtoLens.fieldDefault, _ActivityType'_unknownFields = []} parseMessage = let loop :: ActivityType -> Data.ProtoLens.Encoding.Bytes.Parser ActivityType 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.getText (Prelude.fromIntegral len)) "name" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") 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) "ActivityType" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData ActivityType where rnf = \ x__ -> Control.DeepSeq.deepseq (_ActivityType'_unknownFields x__) (Control.DeepSeq.deepseq (_ActivityType'name x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'variant' @:: Lens' Callback (Prelude.Maybe Callback'Variant)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'nexus' @:: Lens' Callback (Prelude.Maybe Callback'Nexus)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.nexus' @:: Lens' Callback Callback'Nexus@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'internal' @:: Lens' Callback (Prelude.Maybe Callback'Internal)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.internal' @:: Lens' Callback Callback'Internal@ -} data Callback = Callback'_constructor {_Callback'variant :: !(Prelude.Maybe Callback'Variant), _Callback'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Callback where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data Callback'Variant = Callback'Nexus' !Callback'Nexus | Callback'Internal' !Callback'Internal deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField Callback "maybe'variant" (Prelude.Maybe Callback'Variant) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'variant (\ x__ y__ -> x__ {_Callback'variant = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Callback "maybe'nexus" (Prelude.Maybe Callback'Nexus) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'variant (\ x__ y__ -> x__ {_Callback'variant = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Callback'Nexus' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Callback'Nexus' y__)) instance Data.ProtoLens.Field.HasField Callback "nexus" Callback'Nexus where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'variant (\ x__ y__ -> x__ {_Callback'variant = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Callback'Nexus' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Callback'Nexus' y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Field.HasField Callback "maybe'internal" (Prelude.Maybe Callback'Internal) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'variant (\ x__ y__ -> x__ {_Callback'variant = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Callback'Internal' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Callback'Internal' y__)) instance Data.ProtoLens.Field.HasField Callback "internal" Callback'Internal where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'variant (\ x__ y__ -> x__ {_Callback'variant = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Callback'Internal' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Callback'Internal' y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Message Callback where messageName _ = Data.Text.pack "temporal.api.common.v1.Callback" packedMessageDescriptor _ = "\n\ \\bCallback\DC2>\n\ \\ENQnexus\CAN\STX \SOH(\v2&.temporal.api.common.v1.Callback.NexusH\NULR\ENQnexus\DC2G\n\ \\binternal\CAN\ETX \SOH(\v2).temporal.api.common.v1.Callback.InternalH\NULR\binternal\SUB\160\SOH\n\ \\ENQNexus\DC2\DLE\n\ \\ETXurl\CAN\SOH \SOH(\tR\ETXurl\DC2J\n\ \\ACKheader\CAN\STX \ETX(\v22.temporal.api.common.v1.Callback.Nexus.HeaderEntryR\ACKheader\SUB9\n\ \\vHeaderEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\ \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\SUB\RS\n\ \\bInternal\DC2\DC2\n\ \\EOTdata\CAN\SOH \SOH(\fR\EOTdataB\t\n\ \\avariantJ\EOT\b\SOH\DLE\STX" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let nexus__field_descriptor = Data.ProtoLens.FieldDescriptor "nexus" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Callback'Nexus) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'nexus")) :: Data.ProtoLens.FieldDescriptor Callback internal__field_descriptor = Data.ProtoLens.FieldDescriptor "internal" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Callback'Internal) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'internal")) :: Data.ProtoLens.FieldDescriptor Callback in Data.Map.fromList [(Data.ProtoLens.Tag 2, nexus__field_descriptor), (Data.ProtoLens.Tag 3, internal__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Callback'_unknownFields (\ x__ y__ -> x__ {_Callback'_unknownFields = y__}) defMessage = Callback'_constructor {_Callback'variant = Prelude.Nothing, _Callback'_unknownFields = []} parseMessage = let loop :: Callback -> Data.ProtoLens.Encoding.Bytes.Parser Callback loop x = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do (let missing = [] in if Prelude.null missing then Prelude.return () else Prelude.fail ((Prelude.++) "Missing required fields: " (Prelude.show (missing :: [Prelude.String])))) Prelude.return (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) else do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt case tag of 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "nexus" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"nexus") 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) "internal" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"internal") 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) "Callback" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'variant") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (Callback'Nexus' 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) (Prelude.Just (Callback'Internal' 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 Callback where rnf = \ x__ -> Control.DeepSeq.deepseq (_Callback'_unknownFields x__) (Control.DeepSeq.deepseq (_Callback'variant x__) ()) instance Control.DeepSeq.NFData Callback'Variant where rnf (Callback'Nexus' x__) = Control.DeepSeq.rnf x__ rnf (Callback'Internal' x__) = Control.DeepSeq.rnf x__ _Callback'Nexus' :: Data.ProtoLens.Prism.Prism' Callback'Variant Callback'Nexus _Callback'Nexus' = Data.ProtoLens.Prism.prism' Callback'Nexus' (\ p__ -> case p__ of (Callback'Nexus' p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) _Callback'Internal' :: Data.ProtoLens.Prism.Prism' Callback'Variant Callback'Internal _Callback'Internal' = Data.ProtoLens.Prism.prism' Callback'Internal' (\ p__ -> case p__ of (Callback'Internal' p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.data'' @:: Lens' Callback'Internal Data.ByteString.ByteString@ -} data Callback'Internal = Callback'Internal'_constructor {_Callback'Internal'data' :: !Data.ByteString.ByteString, _Callback'Internal'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Callback'Internal where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Callback'Internal "data'" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'Internal'data' (\ x__ y__ -> x__ {_Callback'Internal'data' = y__})) Prelude.id instance Data.ProtoLens.Message Callback'Internal where messageName _ = Data.Text.pack "temporal.api.common.v1.Callback.Internal" packedMessageDescriptor _ = "\n\ \\bInternal\DC2\DC2\n\ \\EOTdata\CAN\SOH \SOH(\fR\EOTdata" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let data'__field_descriptor = Data.ProtoLens.FieldDescriptor "data" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"data'")) :: Data.ProtoLens.FieldDescriptor Callback'Internal in Data.Map.fromList [(Data.ProtoLens.Tag 1, data'__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Callback'Internal'_unknownFields (\ x__ y__ -> x__ {_Callback'Internal'_unknownFields = y__}) defMessage = Callback'Internal'_constructor {_Callback'Internal'data' = Data.ProtoLens.fieldDefault, _Callback'Internal'_unknownFields = []} parseMessage = let loop :: Callback'Internal -> Data.ProtoLens.Encoding.Bytes.Parser Callback'Internal 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)) "data" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"data'") 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) "Internal" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"data'") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData Callback'Internal where rnf = \ x__ -> Control.DeepSeq.deepseq (_Callback'Internal'_unknownFields x__) (Control.DeepSeq.deepseq (_Callback'Internal'data' x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.url' @:: Lens' Callback'Nexus Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.header' @:: Lens' Callback'Nexus (Data.Map.Map Data.Text.Text Data.Text.Text)@ -} data Callback'Nexus = Callback'Nexus'_constructor {_Callback'Nexus'url :: !Data.Text.Text, _Callback'Nexus'header :: !(Data.Map.Map Data.Text.Text Data.Text.Text), _Callback'Nexus'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Callback'Nexus where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Callback'Nexus "url" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'Nexus'url (\ x__ y__ -> x__ {_Callback'Nexus'url = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Callback'Nexus "header" (Data.Map.Map Data.Text.Text Data.Text.Text) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'Nexus'header (\ x__ y__ -> x__ {_Callback'Nexus'header = y__})) Prelude.id instance Data.ProtoLens.Message Callback'Nexus where messageName _ = Data.Text.pack "temporal.api.common.v1.Callback.Nexus" packedMessageDescriptor _ = "\n\ \\ENQNexus\DC2\DLE\n\ \\ETXurl\CAN\SOH \SOH(\tR\ETXurl\DC2J\n\ \\ACKheader\CAN\STX \ETX(\v22.temporal.api.common.v1.Callback.Nexus.HeaderEntryR\ACKheader\SUB9\n\ \\vHeaderEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\ \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let url__field_descriptor = Data.ProtoLens.FieldDescriptor "url" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"url")) :: Data.ProtoLens.FieldDescriptor Callback'Nexus header__field_descriptor = Data.ProtoLens.FieldDescriptor "header" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Callback'Nexus'HeaderEntry) (Data.ProtoLens.MapField (Data.ProtoLens.Field.field @"key") (Data.ProtoLens.Field.field @"value") (Data.ProtoLens.Field.field @"header")) :: Data.ProtoLens.FieldDescriptor Callback'Nexus in Data.Map.fromList [(Data.ProtoLens.Tag 1, url__field_descriptor), (Data.ProtoLens.Tag 2, header__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Callback'Nexus'_unknownFields (\ x__ y__ -> x__ {_Callback'Nexus'_unknownFields = y__}) defMessage = Callback'Nexus'_constructor {_Callback'Nexus'url = Data.ProtoLens.fieldDefault, _Callback'Nexus'header = Data.Map.empty, _Callback'Nexus'_unknownFields = []} parseMessage = let loop :: Callback'Nexus -> Data.ProtoLens.Encoding.Bytes.Parser Callback'Nexus 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.getText (Prelude.fromIntegral len)) "url" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"url") y x) 18 -> do !(entry :: Callback'Nexus'HeaderEntry) <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "header" (let key = Lens.Family2.view (Data.ProtoLens.Field.field @"key") entry value = Lens.Family2.view (Data.ProtoLens.Field.field @"value") entry in loop (Lens.Family2.over (Data.ProtoLens.Field.field @"header") (\ !t -> Data.Map.insert key value t) 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) "Nexus" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"url") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (Data.Monoid.mconcat (Prelude.map (\ _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 (Lens.Family2.set (Data.ProtoLens.Field.field @"key") (Prelude.fst _v) (Lens.Family2.set (Data.ProtoLens.Field.field @"value") (Prelude.snd _v) (Data.ProtoLens.defMessage :: Callback'Nexus'HeaderEntry))))) (Data.Map.toList (Lens.Family2.view (Data.ProtoLens.Field.field @"header") _x)))) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData Callback'Nexus where rnf = \ x__ -> Control.DeepSeq.deepseq (_Callback'Nexus'_unknownFields x__) (Control.DeepSeq.deepseq (_Callback'Nexus'url x__) (Control.DeepSeq.deepseq (_Callback'Nexus'header x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.key' @:: Lens' Callback'Nexus'HeaderEntry Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.value' @:: Lens' Callback'Nexus'HeaderEntry Data.Text.Text@ -} data Callback'Nexus'HeaderEntry = Callback'Nexus'HeaderEntry'_constructor {_Callback'Nexus'HeaderEntry'key :: !Data.Text.Text, _Callback'Nexus'HeaderEntry'value :: !Data.Text.Text, _Callback'Nexus'HeaderEntry'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Callback'Nexus'HeaderEntry where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Callback'Nexus'HeaderEntry "key" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'Nexus'HeaderEntry'key (\ x__ y__ -> x__ {_Callback'Nexus'HeaderEntry'key = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Callback'Nexus'HeaderEntry "value" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Callback'Nexus'HeaderEntry'value (\ x__ y__ -> x__ {_Callback'Nexus'HeaderEntry'value = y__})) Prelude.id instance Data.ProtoLens.Message Callback'Nexus'HeaderEntry where messageName _ = Data.Text.pack "temporal.api.common.v1.Callback.Nexus.HeaderEntry" packedMessageDescriptor _ = "\n\ \\vHeaderEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\ \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let key__field_descriptor = Data.ProtoLens.FieldDescriptor "key" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"key")) :: Data.ProtoLens.FieldDescriptor Callback'Nexus'HeaderEntry value__field_descriptor = Data.ProtoLens.FieldDescriptor "value" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"value")) :: Data.ProtoLens.FieldDescriptor Callback'Nexus'HeaderEntry in Data.Map.fromList [(Data.ProtoLens.Tag 1, key__field_descriptor), (Data.ProtoLens.Tag 2, value__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Callback'Nexus'HeaderEntry'_unknownFields (\ x__ y__ -> x__ {_Callback'Nexus'HeaderEntry'_unknownFields = y__}) defMessage = Callback'Nexus'HeaderEntry'_constructor {_Callback'Nexus'HeaderEntry'key = Data.ProtoLens.fieldDefault, _Callback'Nexus'HeaderEntry'value = Data.ProtoLens.fieldDefault, _Callback'Nexus'HeaderEntry'_unknownFields = []} parseMessage = let loop :: Callback'Nexus'HeaderEntry -> Data.ProtoLens.Encoding.Bytes.Parser Callback'Nexus'HeaderEntry 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.getText (Prelude.fromIntegral len)) "key" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getText (Prelude.fromIntegral len)) "value" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") 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) "HeaderEntry" buildMessage = \ _x -> (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 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"value") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (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.Text.Encoding.encodeUtf8 _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData Callback'Nexus'HeaderEntry where rnf = \ x__ -> Control.DeepSeq.deepseq (_Callback'Nexus'HeaderEntry'_unknownFields x__) (Control.DeepSeq.deepseq (_Callback'Nexus'HeaderEntry'key x__) (Control.DeepSeq.deepseq (_Callback'Nexus'HeaderEntry'value x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.encodingType' @:: Lens' DataBlob Proto.Temporal.Api.Enums.V1.Common.EncodingType@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.data'' @:: Lens' DataBlob Data.ByteString.ByteString@ -} data DataBlob = DataBlob'_constructor {_DataBlob'encodingType :: !Proto.Temporal.Api.Enums.V1.Common.EncodingType, _DataBlob'data' :: !Data.ByteString.ByteString, _DataBlob'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show DataBlob where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField DataBlob "encodingType" Proto.Temporal.Api.Enums.V1.Common.EncodingType where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _DataBlob'encodingType (\ x__ y__ -> x__ {_DataBlob'encodingType = y__})) Prelude.id instance Data.ProtoLens.Field.HasField DataBlob "data'" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _DataBlob'data' (\ x__ y__ -> x__ {_DataBlob'data' = y__})) Prelude.id instance Data.ProtoLens.Message DataBlob where messageName _ = Data.Text.pack "temporal.api.common.v1.DataBlob" packedMessageDescriptor _ = "\n\ \\bDataBlob\DC2H\n\ \\rencoding_type\CAN\SOH \SOH(\SO2#.temporal.api.enums.v1.EncodingTypeR\fencodingType\DC2\DC2\n\ \\EOTdata\CAN\STX \SOH(\fR\EOTdata" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let encodingType__field_descriptor = Data.ProtoLens.FieldDescriptor "encoding_type" (Data.ProtoLens.ScalarField Data.ProtoLens.EnumField :: Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Common.EncodingType) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"encodingType")) :: Data.ProtoLens.FieldDescriptor DataBlob data'__field_descriptor = Data.ProtoLens.FieldDescriptor "data" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"data'")) :: Data.ProtoLens.FieldDescriptor DataBlob in Data.Map.fromList [(Data.ProtoLens.Tag 1, encodingType__field_descriptor), (Data.ProtoLens.Tag 2, data'__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _DataBlob'_unknownFields (\ x__ y__ -> x__ {_DataBlob'_unknownFields = y__}) defMessage = DataBlob'_constructor {_DataBlob'encodingType = Data.ProtoLens.fieldDefault, _DataBlob'data' = Data.ProtoLens.fieldDefault, _DataBlob'_unknownFields = []} parseMessage = let loop :: DataBlob -> Data.ProtoLens.Encoding.Bytes.Parser DataBlob 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.) (Prelude.fmap Prelude.toEnum (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt)) "encoding_type" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"encodingType") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getBytes (Prelude.fromIntegral len)) "data" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"data'") 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) "DataBlob" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"encodingType") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 8) ((Prelude..) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) Prelude.fromEnum _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"data'") _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 DataBlob where rnf = \ x__ -> Control.DeepSeq.deepseq (_DataBlob'_unknownFields x__) (Control.DeepSeq.deepseq (_DataBlob'encodingType x__) (Control.DeepSeq.deepseq (_DataBlob'data' x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.fields' @:: Lens' Header (Data.Map.Map Data.Text.Text Payload)@ -} data Header = Header'_constructor {_Header'fields :: !(Data.Map.Map Data.Text.Text Payload), _Header'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Header where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Header "fields" (Data.Map.Map Data.Text.Text Payload) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Header'fields (\ x__ y__ -> x__ {_Header'fields = y__})) Prelude.id instance Data.ProtoLens.Message Header where messageName _ = Data.Text.pack "temporal.api.common.v1.Header" packedMessageDescriptor _ = "\n\ \\ACKHeader\DC2B\n\ \\ACKfields\CAN\SOH \ETX(\v2*.temporal.api.common.v1.Header.FieldsEntryR\ACKfields\SUBZ\n\ \\vFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let fields__field_descriptor = Data.ProtoLens.FieldDescriptor "fields" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Header'FieldsEntry) (Data.ProtoLens.MapField (Data.ProtoLens.Field.field @"key") (Data.ProtoLens.Field.field @"value") (Data.ProtoLens.Field.field @"fields")) :: Data.ProtoLens.FieldDescriptor Header in Data.Map.fromList [(Data.ProtoLens.Tag 1, fields__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Header'_unknownFields (\ x__ y__ -> x__ {_Header'_unknownFields = y__}) defMessage = Header'_constructor {_Header'fields = Data.Map.empty, _Header'_unknownFields = []} parseMessage = let loop :: Header -> Data.ProtoLens.Encoding.Bytes.Parser Header 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 !(entry :: Header'FieldsEntry) <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "fields" (let key = Lens.Family2.view (Data.ProtoLens.Field.field @"key") entry value = Lens.Family2.view (Data.ProtoLens.Field.field @"value") entry in loop (Lens.Family2.over (Data.ProtoLens.Field.field @"fields") (\ !t -> Data.Map.insert key value t) 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) "Header" buildMessage = \ _x -> (Data.Monoid.<>) (Data.Monoid.mconcat (Prelude.map (\ _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 (Lens.Family2.set (Data.ProtoLens.Field.field @"key") (Prelude.fst _v) (Lens.Family2.set (Data.ProtoLens.Field.field @"value") (Prelude.snd _v) (Data.ProtoLens.defMessage :: Header'FieldsEntry))))) (Data.Map.toList (Lens.Family2.view (Data.ProtoLens.Field.field @"fields") _x)))) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData Header where rnf = \ x__ -> Control.DeepSeq.deepseq (_Header'_unknownFields x__) (Control.DeepSeq.deepseq (_Header'fields x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.key' @:: Lens' Header'FieldsEntry Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.value' @:: Lens' Header'FieldsEntry Payload@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'value' @:: Lens' Header'FieldsEntry (Prelude.Maybe Payload)@ -} data Header'FieldsEntry = Header'FieldsEntry'_constructor {_Header'FieldsEntry'key :: !Data.Text.Text, _Header'FieldsEntry'value :: !(Prelude.Maybe Payload), _Header'FieldsEntry'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Header'FieldsEntry where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Header'FieldsEntry "key" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Header'FieldsEntry'key (\ x__ y__ -> x__ {_Header'FieldsEntry'key = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Header'FieldsEntry "value" Payload where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Header'FieldsEntry'value (\ x__ y__ -> x__ {_Header'FieldsEntry'value = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField Header'FieldsEntry "maybe'value" (Prelude.Maybe Payload) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Header'FieldsEntry'value (\ x__ y__ -> x__ {_Header'FieldsEntry'value = y__})) Prelude.id instance Data.ProtoLens.Message Header'FieldsEntry where messageName _ = Data.Text.pack "temporal.api.common.v1.Header.FieldsEntry" packedMessageDescriptor _ = "\n\ \\vFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let key__field_descriptor = Data.ProtoLens.FieldDescriptor "key" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"key")) :: Data.ProtoLens.FieldDescriptor Header'FieldsEntry value__field_descriptor = Data.ProtoLens.FieldDescriptor "value" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Payload) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'value")) :: Data.ProtoLens.FieldDescriptor Header'FieldsEntry in Data.Map.fromList [(Data.ProtoLens.Tag 1, key__field_descriptor), (Data.ProtoLens.Tag 2, value__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Header'FieldsEntry'_unknownFields (\ x__ y__ -> x__ {_Header'FieldsEntry'_unknownFields = y__}) defMessage = Header'FieldsEntry'_constructor {_Header'FieldsEntry'key = Data.ProtoLens.fieldDefault, _Header'FieldsEntry'value = Prelude.Nothing, _Header'FieldsEntry'_unknownFields = []} parseMessage = let loop :: Header'FieldsEntry -> Data.ProtoLens.Encoding.Bytes.Parser Header'FieldsEntry 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.getText (Prelude.fromIntegral len)) "key" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") 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) "value" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") 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) "FieldsEntry" buildMessage = \ _x -> (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 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _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 Header'FieldsEntry where rnf = \ x__ -> Control.DeepSeq.deepseq (_Header'FieldsEntry'_unknownFields x__) (Control.DeepSeq.deepseq (_Header'FieldsEntry'key x__) (Control.DeepSeq.deepseq (_Header'FieldsEntry'value x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'variant' @:: Lens' Link (Prelude.Maybe Link'Variant)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'workflowEvent' @:: Lens' Link (Prelude.Maybe Link'WorkflowEvent)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.workflowEvent' @:: Lens' Link Link'WorkflowEvent@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'batchJob' @:: Lens' Link (Prelude.Maybe Link'BatchJob)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.batchJob' @:: Lens' Link Link'BatchJob@ -} data Link = Link'_constructor {_Link'variant :: !(Prelude.Maybe Link'Variant), _Link'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Link where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data Link'Variant = Link'WorkflowEvent' !Link'WorkflowEvent | Link'BatchJob' !Link'BatchJob deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField Link "maybe'variant" (Prelude.Maybe Link'Variant) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'variant (\ x__ y__ -> x__ {_Link'variant = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Link "maybe'workflowEvent" (Prelude.Maybe Link'WorkflowEvent) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'variant (\ x__ y__ -> x__ {_Link'variant = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Link'WorkflowEvent' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Link'WorkflowEvent' y__)) instance Data.ProtoLens.Field.HasField Link "workflowEvent" Link'WorkflowEvent where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'variant (\ x__ y__ -> x__ {_Link'variant = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Link'WorkflowEvent' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Link'WorkflowEvent' y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Field.HasField Link "maybe'batchJob" (Prelude.Maybe Link'BatchJob) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'variant (\ x__ y__ -> x__ {_Link'variant = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Link'BatchJob' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Link'BatchJob' y__)) instance Data.ProtoLens.Field.HasField Link "batchJob" Link'BatchJob where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'variant (\ x__ y__ -> x__ {_Link'variant = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Link'BatchJob' x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Link'BatchJob' y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Message Link where messageName _ = Data.Text.pack "temporal.api.common.v1.Link" packedMessageDescriptor _ = "\n\ \\EOTLink\DC2S\n\ \\SOworkflow_event\CAN\SOH \SOH(\v2*.temporal.api.common.v1.Link.WorkflowEventH\NULR\rworkflowEvent\DC2D\n\ \\tbatch_job\CAN\STX \SOH(\v2%.temporal.api.common.v1.Link.BatchJobH\NULR\bbatchJob\SUB\186\STX\n\ \\rWorkflowEvent\DC2\FS\n\ \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\ \\vworkflow_id\CAN\STX \SOH(\tR\n\ \workflowId\DC2\NAK\n\ \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2X\n\ \\tevent_ref\CANd \SOH(\v29.temporal.api.common.v1.Link.WorkflowEvent.EventReferenceH\NULR\beventRef\SUBl\n\ \\SOEventReference\DC2\EM\n\ \\bevent_id\CAN\SOH \SOH(\ETXR\aeventId\DC2?\n\ \\n\ \event_type\CAN\STX \SOH(\SO2 .temporal.api.enums.v1.EventTypeR\teventTypeB\v\n\ \\treference\SUB!\n\ \\bBatchJob\DC2\NAK\n\ \\ACKjob_id\CAN\SOH \SOH(\tR\ENQjobIdB\t\n\ \\avariant" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let workflowEvent__field_descriptor = Data.ProtoLens.FieldDescriptor "workflow_event" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Link'WorkflowEvent) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'workflowEvent")) :: Data.ProtoLens.FieldDescriptor Link batchJob__field_descriptor = Data.ProtoLens.FieldDescriptor "batch_job" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Link'BatchJob) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'batchJob")) :: Data.ProtoLens.FieldDescriptor Link in Data.Map.fromList [(Data.ProtoLens.Tag 1, workflowEvent__field_descriptor), (Data.ProtoLens.Tag 2, batchJob__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Link'_unknownFields (\ x__ y__ -> x__ {_Link'_unknownFields = y__}) defMessage = Link'_constructor {_Link'variant = Prelude.Nothing, _Link'_unknownFields = []} parseMessage = let loop :: Link -> Data.ProtoLens.Encoding.Bytes.Parser Link 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) "workflow_event" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowEvent") 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) "batch_job" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"batchJob") 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) "Link" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'variant") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (Link'WorkflowEvent' 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) (Prelude.Just (Link'BatchJob' 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 Link where rnf = \ x__ -> Control.DeepSeq.deepseq (_Link'_unknownFields x__) (Control.DeepSeq.deepseq (_Link'variant x__) ()) instance Control.DeepSeq.NFData Link'Variant where rnf (Link'WorkflowEvent' x__) = Control.DeepSeq.rnf x__ rnf (Link'BatchJob' x__) = Control.DeepSeq.rnf x__ _Link'WorkflowEvent' :: Data.ProtoLens.Prism.Prism' Link'Variant Link'WorkflowEvent _Link'WorkflowEvent' = Data.ProtoLens.Prism.prism' Link'WorkflowEvent' (\ p__ -> case p__ of (Link'WorkflowEvent' p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) _Link'BatchJob' :: Data.ProtoLens.Prism.Prism' Link'Variant Link'BatchJob _Link'BatchJob' = Data.ProtoLens.Prism.prism' Link'BatchJob' (\ p__ -> case p__ of (Link'BatchJob' p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.jobId' @:: Lens' Link'BatchJob Data.Text.Text@ -} data Link'BatchJob = Link'BatchJob'_constructor {_Link'BatchJob'jobId :: !Data.Text.Text, _Link'BatchJob'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Link'BatchJob where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Link'BatchJob "jobId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'BatchJob'jobId (\ x__ y__ -> x__ {_Link'BatchJob'jobId = y__})) Prelude.id instance Data.ProtoLens.Message Link'BatchJob where messageName _ = Data.Text.pack "temporal.api.common.v1.Link.BatchJob" packedMessageDescriptor _ = "\n\ \\bBatchJob\DC2\NAK\n\ \\ACKjob_id\CAN\SOH \SOH(\tR\ENQjobId" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let jobId__field_descriptor = Data.ProtoLens.FieldDescriptor "job_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"jobId")) :: Data.ProtoLens.FieldDescriptor Link'BatchJob in Data.Map.fromList [(Data.ProtoLens.Tag 1, jobId__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Link'BatchJob'_unknownFields (\ x__ y__ -> x__ {_Link'BatchJob'_unknownFields = y__}) defMessage = Link'BatchJob'_constructor {_Link'BatchJob'jobId = Data.ProtoLens.fieldDefault, _Link'BatchJob'_unknownFields = []} parseMessage = let loop :: Link'BatchJob -> Data.ProtoLens.Encoding.Bytes.Parser Link'BatchJob 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.getText (Prelude.fromIntegral len)) "job_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"jobId") 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) "BatchJob" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"jobId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData Link'BatchJob where rnf = \ x__ -> Control.DeepSeq.deepseq (_Link'BatchJob'_unknownFields x__) (Control.DeepSeq.deepseq (_Link'BatchJob'jobId x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.namespace' @:: Lens' Link'WorkflowEvent Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.workflowId' @:: Lens' Link'WorkflowEvent Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.runId' @:: Lens' Link'WorkflowEvent Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'reference' @:: Lens' Link'WorkflowEvent (Prelude.Maybe Link'WorkflowEvent'Reference)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'eventRef' @:: Lens' Link'WorkflowEvent (Prelude.Maybe Link'WorkflowEvent'EventReference)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.eventRef' @:: Lens' Link'WorkflowEvent Link'WorkflowEvent'EventReference@ -} data Link'WorkflowEvent = Link'WorkflowEvent'_constructor {_Link'WorkflowEvent'namespace :: !Data.Text.Text, _Link'WorkflowEvent'workflowId :: !Data.Text.Text, _Link'WorkflowEvent'runId :: !Data.Text.Text, _Link'WorkflowEvent'reference :: !(Prelude.Maybe Link'WorkflowEvent'Reference), _Link'WorkflowEvent'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Link'WorkflowEvent where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data Link'WorkflowEvent'Reference = Link'WorkflowEvent'EventRef !Link'WorkflowEvent'EventReference deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField Link'WorkflowEvent "namespace" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'namespace (\ x__ y__ -> x__ {_Link'WorkflowEvent'namespace = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Link'WorkflowEvent "workflowId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'workflowId (\ x__ y__ -> x__ {_Link'WorkflowEvent'workflowId = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Link'WorkflowEvent "runId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'runId (\ x__ y__ -> x__ {_Link'WorkflowEvent'runId = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Link'WorkflowEvent "maybe'reference" (Prelude.Maybe Link'WorkflowEvent'Reference) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'reference (\ x__ y__ -> x__ {_Link'WorkflowEvent'reference = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Link'WorkflowEvent "maybe'eventRef" (Prelude.Maybe Link'WorkflowEvent'EventReference) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'reference (\ x__ y__ -> x__ {_Link'WorkflowEvent'reference = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Link'WorkflowEvent'EventRef x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Link'WorkflowEvent'EventRef y__)) instance Data.ProtoLens.Field.HasField Link'WorkflowEvent "eventRef" Link'WorkflowEvent'EventReference where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'reference (\ x__ y__ -> x__ {_Link'WorkflowEvent'reference = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (Link'WorkflowEvent'EventRef x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap Link'WorkflowEvent'EventRef y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Message Link'WorkflowEvent where messageName _ = Data.Text.pack "temporal.api.common.v1.Link.WorkflowEvent" packedMessageDescriptor _ = "\n\ \\rWorkflowEvent\DC2\FS\n\ \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\ \\vworkflow_id\CAN\STX \SOH(\tR\n\ \workflowId\DC2\NAK\n\ \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2X\n\ \\tevent_ref\CANd \SOH(\v29.temporal.api.common.v1.Link.WorkflowEvent.EventReferenceH\NULR\beventRef\SUBl\n\ \\SOEventReference\DC2\EM\n\ \\bevent_id\CAN\SOH \SOH(\ETXR\aeventId\DC2?\n\ \\n\ \event_type\CAN\STX \SOH(\SO2 .temporal.api.enums.v1.EventTypeR\teventTypeB\v\n\ \\treference" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let namespace__field_descriptor = Data.ProtoLens.FieldDescriptor "namespace" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"namespace")) :: Data.ProtoLens.FieldDescriptor Link'WorkflowEvent workflowId__field_descriptor = Data.ProtoLens.FieldDescriptor "workflow_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"workflowId")) :: Data.ProtoLens.FieldDescriptor Link'WorkflowEvent runId__field_descriptor = Data.ProtoLens.FieldDescriptor "run_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"runId")) :: Data.ProtoLens.FieldDescriptor Link'WorkflowEvent eventRef__field_descriptor = Data.ProtoLens.FieldDescriptor "event_ref" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Link'WorkflowEvent'EventReference) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'eventRef")) :: Data.ProtoLens.FieldDescriptor Link'WorkflowEvent in Data.Map.fromList [(Data.ProtoLens.Tag 1, namespace__field_descriptor), (Data.ProtoLens.Tag 2, workflowId__field_descriptor), (Data.ProtoLens.Tag 3, runId__field_descriptor), (Data.ProtoLens.Tag 100, eventRef__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Link'WorkflowEvent'_unknownFields (\ x__ y__ -> x__ {_Link'WorkflowEvent'_unknownFields = y__}) defMessage = Link'WorkflowEvent'_constructor {_Link'WorkflowEvent'namespace = Data.ProtoLens.fieldDefault, _Link'WorkflowEvent'workflowId = Data.ProtoLens.fieldDefault, _Link'WorkflowEvent'runId = Data.ProtoLens.fieldDefault, _Link'WorkflowEvent'reference = Prelude.Nothing, _Link'WorkflowEvent'_unknownFields = []} parseMessage = let loop :: Link'WorkflowEvent -> Data.ProtoLens.Encoding.Bytes.Parser Link'WorkflowEvent 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.getText (Prelude.fromIntegral len)) "namespace" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getText (Prelude.fromIntegral len)) "workflow_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x) 26 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getText (Prelude.fromIntegral len)) "run_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x) 802 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "event_ref" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"eventRef") 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) "WorkflowEvent" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"namespace") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"workflowId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (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.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"runId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (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.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'reference") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (Link'WorkflowEvent'EventRef v)) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 802) ((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 Link'WorkflowEvent where rnf = \ x__ -> Control.DeepSeq.deepseq (_Link'WorkflowEvent'_unknownFields x__) (Control.DeepSeq.deepseq (_Link'WorkflowEvent'namespace x__) (Control.DeepSeq.deepseq (_Link'WorkflowEvent'workflowId x__) (Control.DeepSeq.deepseq (_Link'WorkflowEvent'runId x__) (Control.DeepSeq.deepseq (_Link'WorkflowEvent'reference x__) ())))) instance Control.DeepSeq.NFData Link'WorkflowEvent'Reference where rnf (Link'WorkflowEvent'EventRef x__) = Control.DeepSeq.rnf x__ _Link'WorkflowEvent'EventRef :: Data.ProtoLens.Prism.Prism' Link'WorkflowEvent'Reference Link'WorkflowEvent'EventReference _Link'WorkflowEvent'EventRef = Data.ProtoLens.Prism.prism' Link'WorkflowEvent'EventRef (\ p__ -> case p__ of (Link'WorkflowEvent'EventRef p__val) -> Prelude.Just p__val) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.eventId' @:: Lens' Link'WorkflowEvent'EventReference Data.Int.Int64@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.eventType' @:: Lens' Link'WorkflowEvent'EventReference Proto.Temporal.Api.Enums.V1.EventType.EventType@ -} data Link'WorkflowEvent'EventReference = Link'WorkflowEvent'EventReference'_constructor {_Link'WorkflowEvent'EventReference'eventId :: !Data.Int.Int64, _Link'WorkflowEvent'EventReference'eventType :: !Proto.Temporal.Api.Enums.V1.EventType.EventType, _Link'WorkflowEvent'EventReference'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Link'WorkflowEvent'EventReference where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Link'WorkflowEvent'EventReference "eventId" Data.Int.Int64 where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'EventReference'eventId (\ x__ y__ -> x__ {_Link'WorkflowEvent'EventReference'eventId = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Link'WorkflowEvent'EventReference "eventType" Proto.Temporal.Api.Enums.V1.EventType.EventType where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Link'WorkflowEvent'EventReference'eventType (\ x__ y__ -> x__ {_Link'WorkflowEvent'EventReference'eventType = y__})) Prelude.id instance Data.ProtoLens.Message Link'WorkflowEvent'EventReference where messageName _ = Data.Text.pack "temporal.api.common.v1.Link.WorkflowEvent.EventReference" packedMessageDescriptor _ = "\n\ \\SOEventReference\DC2\EM\n\ \\bevent_id\CAN\SOH \SOH(\ETXR\aeventId\DC2?\n\ \\n\ \event_type\CAN\STX \SOH(\SO2 .temporal.api.enums.v1.EventTypeR\teventType" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let eventId__field_descriptor = Data.ProtoLens.FieldDescriptor "event_id" (Data.ProtoLens.ScalarField Data.ProtoLens.Int64Field :: Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"eventId")) :: Data.ProtoLens.FieldDescriptor Link'WorkflowEvent'EventReference eventType__field_descriptor = Data.ProtoLens.FieldDescriptor "event_type" (Data.ProtoLens.ScalarField Data.ProtoLens.EnumField :: Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.EventType.EventType) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"eventType")) :: Data.ProtoLens.FieldDescriptor Link'WorkflowEvent'EventReference in Data.Map.fromList [(Data.ProtoLens.Tag 1, eventId__field_descriptor), (Data.ProtoLens.Tag 2, eventType__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Link'WorkflowEvent'EventReference'_unknownFields (\ x__ y__ -> x__ {_Link'WorkflowEvent'EventReference'_unknownFields = y__}) defMessage = Link'WorkflowEvent'EventReference'_constructor {_Link'WorkflowEvent'EventReference'eventId = Data.ProtoLens.fieldDefault, _Link'WorkflowEvent'EventReference'eventType = Data.ProtoLens.fieldDefault, _Link'WorkflowEvent'EventReference'_unknownFields = []} parseMessage = let loop :: Link'WorkflowEvent'EventReference -> Data.ProtoLens.Encoding.Bytes.Parser Link'WorkflowEvent'EventReference 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.) (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt) "event_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"eventId") y x) 16 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.toEnum (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt)) "event_type" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"eventType") 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) "EventReference" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"eventId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 8) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"eventType") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 16) ((Prelude..) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) Prelude.fromEnum _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData Link'WorkflowEvent'EventReference where rnf = \ x__ -> Control.DeepSeq.deepseq (_Link'WorkflowEvent'EventReference'_unknownFields x__) (Control.DeepSeq.deepseq (_Link'WorkflowEvent'EventReference'eventId x__) (Control.DeepSeq.deepseq (_Link'WorkflowEvent'EventReference'eventType x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.fields' @:: Lens' Memo (Data.Map.Map Data.Text.Text Payload)@ -} data Memo = Memo'_constructor {_Memo'fields :: !(Data.Map.Map Data.Text.Text Payload), _Memo'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Memo where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Memo "fields" (Data.Map.Map Data.Text.Text Payload) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Memo'fields (\ x__ y__ -> x__ {_Memo'fields = y__})) Prelude.id instance Data.ProtoLens.Message Memo where messageName _ = Data.Text.pack "temporal.api.common.v1.Memo" packedMessageDescriptor _ = "\n\ \\EOTMemo\DC2@\n\ \\ACKfields\CAN\SOH \ETX(\v2(.temporal.api.common.v1.Memo.FieldsEntryR\ACKfields\SUBZ\n\ \\vFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let fields__field_descriptor = Data.ProtoLens.FieldDescriptor "fields" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Memo'FieldsEntry) (Data.ProtoLens.MapField (Data.ProtoLens.Field.field @"key") (Data.ProtoLens.Field.field @"value") (Data.ProtoLens.Field.field @"fields")) :: Data.ProtoLens.FieldDescriptor Memo in Data.Map.fromList [(Data.ProtoLens.Tag 1, fields__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Memo'_unknownFields (\ x__ y__ -> x__ {_Memo'_unknownFields = y__}) defMessage = Memo'_constructor {_Memo'fields = Data.Map.empty, _Memo'_unknownFields = []} parseMessage = let loop :: Memo -> Data.ProtoLens.Encoding.Bytes.Parser Memo 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 !(entry :: Memo'FieldsEntry) <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "fields" (let key = Lens.Family2.view (Data.ProtoLens.Field.field @"key") entry value = Lens.Family2.view (Data.ProtoLens.Field.field @"value") entry in loop (Lens.Family2.over (Data.ProtoLens.Field.field @"fields") (\ !t -> Data.Map.insert key value t) 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) "Memo" buildMessage = \ _x -> (Data.Monoid.<>) (Data.Monoid.mconcat (Prelude.map (\ _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 (Lens.Family2.set (Data.ProtoLens.Field.field @"key") (Prelude.fst _v) (Lens.Family2.set (Data.ProtoLens.Field.field @"value") (Prelude.snd _v) (Data.ProtoLens.defMessage :: Memo'FieldsEntry))))) (Data.Map.toList (Lens.Family2.view (Data.ProtoLens.Field.field @"fields") _x)))) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData Memo where rnf = \ x__ -> Control.DeepSeq.deepseq (_Memo'_unknownFields x__) (Control.DeepSeq.deepseq (_Memo'fields x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.key' @:: Lens' Memo'FieldsEntry Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.value' @:: Lens' Memo'FieldsEntry Payload@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'value' @:: Lens' Memo'FieldsEntry (Prelude.Maybe Payload)@ -} data Memo'FieldsEntry = Memo'FieldsEntry'_constructor {_Memo'FieldsEntry'key :: !Data.Text.Text, _Memo'FieldsEntry'value :: !(Prelude.Maybe Payload), _Memo'FieldsEntry'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Memo'FieldsEntry where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Memo'FieldsEntry "key" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Memo'FieldsEntry'key (\ x__ y__ -> x__ {_Memo'FieldsEntry'key = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Memo'FieldsEntry "value" Payload where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Memo'FieldsEntry'value (\ x__ y__ -> x__ {_Memo'FieldsEntry'value = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField Memo'FieldsEntry "maybe'value" (Prelude.Maybe Payload) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Memo'FieldsEntry'value (\ x__ y__ -> x__ {_Memo'FieldsEntry'value = y__})) Prelude.id instance Data.ProtoLens.Message Memo'FieldsEntry where messageName _ = Data.Text.pack "temporal.api.common.v1.Memo.FieldsEntry" packedMessageDescriptor _ = "\n\ \\vFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let key__field_descriptor = Data.ProtoLens.FieldDescriptor "key" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"key")) :: Data.ProtoLens.FieldDescriptor Memo'FieldsEntry value__field_descriptor = Data.ProtoLens.FieldDescriptor "value" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Payload) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'value")) :: Data.ProtoLens.FieldDescriptor Memo'FieldsEntry in Data.Map.fromList [(Data.ProtoLens.Tag 1, key__field_descriptor), (Data.ProtoLens.Tag 2, value__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Memo'FieldsEntry'_unknownFields (\ x__ y__ -> x__ {_Memo'FieldsEntry'_unknownFields = y__}) defMessage = Memo'FieldsEntry'_constructor {_Memo'FieldsEntry'key = Data.ProtoLens.fieldDefault, _Memo'FieldsEntry'value = Prelude.Nothing, _Memo'FieldsEntry'_unknownFields = []} parseMessage = let loop :: Memo'FieldsEntry -> Data.ProtoLens.Encoding.Bytes.Parser Memo'FieldsEntry 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.getText (Prelude.fromIntegral len)) "key" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") 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) "value" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") 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) "FieldsEntry" buildMessage = \ _x -> (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 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _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 Memo'FieldsEntry where rnf = \ x__ -> Control.DeepSeq.deepseq (_Memo'FieldsEntry'_unknownFields x__) (Control.DeepSeq.deepseq (_Memo'FieldsEntry'key x__) (Control.DeepSeq.deepseq (_Memo'FieldsEntry'value x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.nonfirstLocalActivityExecutionAttempts' @:: Lens' MeteringMetadata Data.Word.Word32@ -} data MeteringMetadata = MeteringMetadata'_constructor {_MeteringMetadata'nonfirstLocalActivityExecutionAttempts :: !Data.Word.Word32, _MeteringMetadata'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show MeteringMetadata where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField MeteringMetadata "nonfirstLocalActivityExecutionAttempts" Data.Word.Word32 where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _MeteringMetadata'nonfirstLocalActivityExecutionAttempts (\ x__ y__ -> x__ {_MeteringMetadata'nonfirstLocalActivityExecutionAttempts = y__})) Prelude.id instance Data.ProtoLens.Message MeteringMetadata where messageName _ = Data.Text.pack "temporal.api.common.v1.MeteringMetadata" packedMessageDescriptor _ = "\n\ \\DLEMeteringMetadata\DC2Z\n\ \*nonfirst_local_activity_execution_attempts\CAN\r \SOH(\rR&nonfirstLocalActivityExecutionAttempts" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let nonfirstLocalActivityExecutionAttempts__field_descriptor = Data.ProtoLens.FieldDescriptor "nonfirst_local_activity_execution_attempts" (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"nonfirstLocalActivityExecutionAttempts")) :: Data.ProtoLens.FieldDescriptor MeteringMetadata in Data.Map.fromList [(Data.ProtoLens.Tag 13, nonfirstLocalActivityExecutionAttempts__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _MeteringMetadata'_unknownFields (\ x__ y__ -> x__ {_MeteringMetadata'_unknownFields = y__}) defMessage = MeteringMetadata'_constructor {_MeteringMetadata'nonfirstLocalActivityExecutionAttempts = Data.ProtoLens.fieldDefault, _MeteringMetadata'_unknownFields = []} parseMessage = let loop :: MeteringMetadata -> Data.ProtoLens.Encoding.Bytes.Parser MeteringMetadata 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 104 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt) "nonfirst_local_activity_execution_attempts" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"nonfirstLocalActivityExecutionAttempts") 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) "MeteringMetadata" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"nonfirstLocalActivityExecutionAttempts") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 104) ((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 MeteringMetadata where rnf = \ x__ -> Control.DeepSeq.deepseq (_MeteringMetadata'_unknownFields x__) (Control.DeepSeq.deepseq (_MeteringMetadata'nonfirstLocalActivityExecutionAttempts x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.metadata' @:: Lens' Payload (Data.Map.Map Data.Text.Text Data.ByteString.ByteString)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.data'' @:: Lens' Payload Data.ByteString.ByteString@ -} data Payload = Payload'_constructor {_Payload'metadata :: !(Data.Map.Map Data.Text.Text Data.ByteString.ByteString), _Payload'data' :: !Data.ByteString.ByteString, _Payload'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Payload where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Payload "metadata" (Data.Map.Map Data.Text.Text Data.ByteString.ByteString) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Payload'metadata (\ x__ y__ -> x__ {_Payload'metadata = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Payload "data'" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Payload'data' (\ x__ y__ -> x__ {_Payload'data' = y__})) Prelude.id instance Data.ProtoLens.Message Payload where messageName _ = Data.Text.pack "temporal.api.common.v1.Payload" packedMessageDescriptor _ = "\n\ \\aPayload\DC2I\n\ \\bmetadata\CAN\SOH \ETX(\v2-.temporal.api.common.v1.Payload.MetadataEntryR\bmetadata\DC2\DC2\n\ \\EOTdata\CAN\STX \SOH(\fR\EOTdata\SUB;\n\ \\rMetadataEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\ \\ENQvalue\CAN\STX \SOH(\fR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let metadata__field_descriptor = Data.ProtoLens.FieldDescriptor "metadata" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Payload'MetadataEntry) (Data.ProtoLens.MapField (Data.ProtoLens.Field.field @"key") (Data.ProtoLens.Field.field @"value") (Data.ProtoLens.Field.field @"metadata")) :: Data.ProtoLens.FieldDescriptor Payload data'__field_descriptor = Data.ProtoLens.FieldDescriptor "data" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"data'")) :: Data.ProtoLens.FieldDescriptor Payload in Data.Map.fromList [(Data.ProtoLens.Tag 1, metadata__field_descriptor), (Data.ProtoLens.Tag 2, data'__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Payload'_unknownFields (\ x__ y__ -> x__ {_Payload'_unknownFields = y__}) defMessage = Payload'_constructor {_Payload'metadata = Data.Map.empty, _Payload'data' = Data.ProtoLens.fieldDefault, _Payload'_unknownFields = []} parseMessage = let loop :: Payload -> Data.ProtoLens.Encoding.Bytes.Parser Payload 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 !(entry :: Payload'MetadataEntry) <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "metadata" (let key = Lens.Family2.view (Data.ProtoLens.Field.field @"key") entry value = Lens.Family2.view (Data.ProtoLens.Field.field @"value") entry in loop (Lens.Family2.over (Data.ProtoLens.Field.field @"metadata") (\ !t -> Data.Map.insert key value t) x)) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getBytes (Prelude.fromIntegral len)) "data" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"data'") 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) "Payload" buildMessage = \ _x -> (Data.Monoid.<>) (Data.Monoid.mconcat (Prelude.map (\ _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 (Lens.Family2.set (Data.ProtoLens.Field.field @"key") (Prelude.fst _v) (Lens.Family2.set (Data.ProtoLens.Field.field @"value") (Prelude.snd _v) (Data.ProtoLens.defMessage :: Payload'MetadataEntry))))) (Data.Map.toList (Lens.Family2.view (Data.ProtoLens.Field.field @"metadata") _x)))) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"data'") _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 Payload where rnf = \ x__ -> Control.DeepSeq.deepseq (_Payload'_unknownFields x__) (Control.DeepSeq.deepseq (_Payload'metadata x__) (Control.DeepSeq.deepseq (_Payload'data' x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.key' @:: Lens' Payload'MetadataEntry Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.value' @:: Lens' Payload'MetadataEntry Data.ByteString.ByteString@ -} data Payload'MetadataEntry = Payload'MetadataEntry'_constructor {_Payload'MetadataEntry'key :: !Data.Text.Text, _Payload'MetadataEntry'value :: !Data.ByteString.ByteString, _Payload'MetadataEntry'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Payload'MetadataEntry where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Payload'MetadataEntry "key" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Payload'MetadataEntry'key (\ x__ y__ -> x__ {_Payload'MetadataEntry'key = y__})) Prelude.id instance Data.ProtoLens.Field.HasField Payload'MetadataEntry "value" Data.ByteString.ByteString where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Payload'MetadataEntry'value (\ x__ y__ -> x__ {_Payload'MetadataEntry'value = y__})) Prelude.id instance Data.ProtoLens.Message Payload'MetadataEntry where messageName _ = Data.Text.pack "temporal.api.common.v1.Payload.MetadataEntry" packedMessageDescriptor _ = "\n\ \\rMetadataEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\ \\ENQvalue\CAN\STX \SOH(\fR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let key__field_descriptor = Data.ProtoLens.FieldDescriptor "key" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"key")) :: Data.ProtoLens.FieldDescriptor Payload'MetadataEntry value__field_descriptor = Data.ProtoLens.FieldDescriptor "value" (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"value")) :: Data.ProtoLens.FieldDescriptor Payload'MetadataEntry in Data.Map.fromList [(Data.ProtoLens.Tag 1, key__field_descriptor), (Data.ProtoLens.Tag 2, value__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Payload'MetadataEntry'_unknownFields (\ x__ y__ -> x__ {_Payload'MetadataEntry'_unknownFields = y__}) defMessage = Payload'MetadataEntry'_constructor {_Payload'MetadataEntry'key = Data.ProtoLens.fieldDefault, _Payload'MetadataEntry'value = Data.ProtoLens.fieldDefault, _Payload'MetadataEntry'_unknownFields = []} parseMessage = let loop :: Payload'MetadataEntry -> Data.ProtoLens.Encoding.Bytes.Parser Payload'MetadataEntry 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.getText (Prelude.fromIntegral len)) "key" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getBytes (Prelude.fromIntegral len)) "value" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") 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) "MetadataEntry" buildMessage = \ _x -> (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 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"value") _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 Payload'MetadataEntry where rnf = \ x__ -> Control.DeepSeq.deepseq (_Payload'MetadataEntry'_unknownFields x__) (Control.DeepSeq.deepseq (_Payload'MetadataEntry'key x__) (Control.DeepSeq.deepseq (_Payload'MetadataEntry'value x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.payloads' @:: Lens' Payloads [Payload]@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.vec'payloads' @:: Lens' Payloads (Data.Vector.Vector Payload)@ -} data Payloads = Payloads'_constructor {_Payloads'payloads :: !(Data.Vector.Vector Payload), _Payloads'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Payloads where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Payloads "payloads" [Payload] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Payloads'payloads (\ x__ y__ -> x__ {_Payloads'payloads = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField Payloads "vec'payloads" (Data.Vector.Vector Payload) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Payloads'payloads (\ x__ y__ -> x__ {_Payloads'payloads = y__})) Prelude.id instance Data.ProtoLens.Message Payloads where messageName _ = Data.Text.pack "temporal.api.common.v1.Payloads" packedMessageDescriptor _ = "\n\ \\bPayloads\DC2;\n\ \\bpayloads\CAN\SOH \ETX(\v2\US.temporal.api.common.v1.PayloadR\bpayloads" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let payloads__field_descriptor = Data.ProtoLens.FieldDescriptor "payloads" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Payload) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"payloads")) :: Data.ProtoLens.FieldDescriptor Payloads in Data.Map.fromList [(Data.ProtoLens.Tag 1, payloads__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Payloads'_unknownFields (\ x__ y__ -> x__ {_Payloads'_unknownFields = y__}) defMessage = Payloads'_constructor {_Payloads'payloads = Data.Vector.Generic.empty, _Payloads'_unknownFields = []} parseMessage = let loop :: Payloads -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Payload -> Data.ProtoLens.Encoding.Bytes.Parser Payloads loop x mutable'payloads = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'payloads <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'payloads) (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'payloads") frozen'payloads 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) "payloads" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'payloads y) loop x v wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'payloads in (Data.ProtoLens.Encoding.Bytes.) (do mutable'payloads <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'payloads) "Payloads" 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'payloads") _x)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData Payloads where rnf = \ x__ -> Control.DeepSeq.deepseq (_Payloads'_unknownFields x__) (Control.DeepSeq.deepseq (_Payloads'payloads x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.priorityKey' @:: Lens' Priority Data.Int.Int32@ -} data Priority = Priority'_constructor {_Priority'priorityKey :: !Data.Int.Int32, _Priority'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show Priority where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField Priority "priorityKey" Data.Int.Int32 where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _Priority'priorityKey (\ x__ y__ -> x__ {_Priority'priorityKey = y__})) Prelude.id instance Data.ProtoLens.Message Priority where messageName _ = Data.Text.pack "temporal.api.common.v1.Priority" packedMessageDescriptor _ = "\n\ \\bPriority\DC2!\n\ \\fpriority_key\CAN\SOH \SOH(\ENQR\vpriorityKey" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let priorityKey__field_descriptor = Data.ProtoLens.FieldDescriptor "priority_key" (Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field :: Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"priorityKey")) :: Data.ProtoLens.FieldDescriptor Priority in Data.Map.fromList [(Data.ProtoLens.Tag 1, priorityKey__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _Priority'_unknownFields (\ x__ y__ -> x__ {_Priority'_unknownFields = y__}) defMessage = Priority'_constructor {_Priority'priorityKey = Data.ProtoLens.fieldDefault, _Priority'_unknownFields = []} parseMessage = let loop :: Priority -> Data.ProtoLens.Encoding.Bytes.Parser Priority 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.) (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt) "priority_key" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"priorityKey") 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) "Priority" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"priorityKey") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 8) ((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 Priority where rnf = \ x__ -> Control.DeepSeq.deepseq (_Priority'_unknownFields x__) (Control.DeepSeq.deepseq (_Priority'priorityKey x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.resetReapplyType' @:: Lens' ResetOptions Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.currentRunOnly' @:: Lens' ResetOptions Prelude.Bool@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.resetReapplyExcludeTypes' @:: Lens' ResetOptions [Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType]@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.vec'resetReapplyExcludeTypes' @:: Lens' ResetOptions (Data.Vector.Vector Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'target' @:: Lens' ResetOptions (Prelude.Maybe ResetOptions'Target)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'firstWorkflowTask' @:: Lens' ResetOptions (Prelude.Maybe Proto.Google.Protobuf.Empty.Empty)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.firstWorkflowTask' @:: Lens' ResetOptions Proto.Google.Protobuf.Empty.Empty@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'lastWorkflowTask' @:: Lens' ResetOptions (Prelude.Maybe Proto.Google.Protobuf.Empty.Empty)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.lastWorkflowTask' @:: Lens' ResetOptions Proto.Google.Protobuf.Empty.Empty@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'workflowTaskId' @:: Lens' ResetOptions (Prelude.Maybe Data.Int.Int64)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.workflowTaskId' @:: Lens' ResetOptions Data.Int.Int64@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'buildId' @:: Lens' ResetOptions (Prelude.Maybe Data.Text.Text)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.buildId' @:: Lens' ResetOptions Data.Text.Text@ -} data ResetOptions = ResetOptions'_constructor {_ResetOptions'resetReapplyType :: !Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType, _ResetOptions'currentRunOnly :: !Prelude.Bool, _ResetOptions'resetReapplyExcludeTypes :: !(Data.Vector.Vector Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType), _ResetOptions'target :: !(Prelude.Maybe ResetOptions'Target), _ResetOptions'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show ResetOptions where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) data ResetOptions'Target = ResetOptions'FirstWorkflowTask !Proto.Google.Protobuf.Empty.Empty | ResetOptions'LastWorkflowTask !Proto.Google.Protobuf.Empty.Empty | ResetOptions'WorkflowTaskId !Data.Int.Int64 | ResetOptions'BuildId !Data.Text.Text deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) instance Data.ProtoLens.Field.HasField ResetOptions "resetReapplyType" Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'resetReapplyType (\ x__ y__ -> x__ {_ResetOptions'resetReapplyType = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ResetOptions "currentRunOnly" Prelude.Bool where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'currentRunOnly (\ x__ y__ -> x__ {_ResetOptions'currentRunOnly = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ResetOptions "resetReapplyExcludeTypes" [Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'resetReapplyExcludeTypes (\ x__ y__ -> x__ {_ResetOptions'resetReapplyExcludeTypes = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField ResetOptions "vec'resetReapplyExcludeTypes" (Data.Vector.Vector Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'resetReapplyExcludeTypes (\ x__ y__ -> x__ {_ResetOptions'resetReapplyExcludeTypes = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ResetOptions "maybe'target" (Prelude.Maybe ResetOptions'Target) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) Prelude.id instance Data.ProtoLens.Field.HasField ResetOptions "maybe'firstWorkflowTask" (Prelude.Maybe Proto.Google.Protobuf.Empty.Empty) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'FirstWorkflowTask x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'FirstWorkflowTask y__)) instance Data.ProtoLens.Field.HasField ResetOptions "firstWorkflowTask" Proto.Google.Protobuf.Empty.Empty where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'FirstWorkflowTask x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'FirstWorkflowTask y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Field.HasField ResetOptions "maybe'lastWorkflowTask" (Prelude.Maybe Proto.Google.Protobuf.Empty.Empty) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'LastWorkflowTask x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'LastWorkflowTask y__)) instance Data.ProtoLens.Field.HasField ResetOptions "lastWorkflowTask" Proto.Google.Protobuf.Empty.Empty where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'LastWorkflowTask x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'LastWorkflowTask y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) instance Data.ProtoLens.Field.HasField ResetOptions "maybe'workflowTaskId" (Prelude.Maybe Data.Int.Int64) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'WorkflowTaskId x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'WorkflowTaskId y__)) instance Data.ProtoLens.Field.HasField ResetOptions "workflowTaskId" Data.Int.Int64 where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'WorkflowTaskId x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'WorkflowTaskId y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) instance Data.ProtoLens.Field.HasField ResetOptions "maybe'buildId" (Prelude.Maybe Data.Text.Text) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'BuildId x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'BuildId y__)) instance Data.ProtoLens.Field.HasField ResetOptions "buildId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _ResetOptions'target (\ x__ y__ -> x__ {_ResetOptions'target = y__})) ((Prelude..) (Lens.Family2.Unchecked.lens (\ x__ -> case x__ of (Prelude.Just (ResetOptions'BuildId x__val)) -> Prelude.Just x__val _otherwise -> Prelude.Nothing) (\ _ y__ -> Prelude.fmap ResetOptions'BuildId y__)) (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) instance Data.ProtoLens.Message ResetOptions where messageName _ = Data.Text.pack "temporal.api.common.v1.ResetOptions" packedMessageDescriptor _ = "\n\ \\fResetOptions\DC2H\n\ \\DC3first_workflow_task\CAN\SOH \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\DC1firstWorkflowTask\DC2F\n\ \\DC2last_workflow_task\CAN\STX \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\DLElastWorkflowTask\DC2*\n\ \\DLEworkflow_task_id\CAN\ETX \SOH(\ETXH\NULR\SOworkflowTaskId\DC2\ESC\n\ \\bbuild_id\CAN\EOT \SOH(\tH\NULR\abuildId\DC2U\n\ \\DC2reset_reapply_type\CAN\n\ \ \SOH(\SO2'.temporal.api.enums.v1.ResetReapplyTypeR\DLEresetReapplyType\DC2(\n\ \\DLEcurrent_run_only\CAN\v \SOH(\bR\SOcurrentRunOnly\DC2m\n\ \\ESCreset_reapply_exclude_types\CAN\f \ETX(\SO2..temporal.api.enums.v1.ResetReapplyExcludeTypeR\CANresetReapplyExcludeTypesB\b\n\ \\ACKtarget" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let resetReapplyType__field_descriptor = Data.ProtoLens.FieldDescriptor "reset_reapply_type" (Data.ProtoLens.ScalarField Data.ProtoLens.EnumField :: Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"resetReapplyType")) :: Data.ProtoLens.FieldDescriptor ResetOptions currentRunOnly__field_descriptor = Data.ProtoLens.FieldDescriptor "current_run_only" (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"currentRunOnly")) :: Data.ProtoLens.FieldDescriptor ResetOptions resetReapplyExcludeTypes__field_descriptor = Data.ProtoLens.FieldDescriptor "reset_reapply_exclude_types" (Data.ProtoLens.ScalarField Data.ProtoLens.EnumField :: Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType) (Data.ProtoLens.RepeatedField Data.ProtoLens.Packed (Data.ProtoLens.Field.field @"resetReapplyExcludeTypes")) :: Data.ProtoLens.FieldDescriptor ResetOptions firstWorkflowTask__field_descriptor = Data.ProtoLens.FieldDescriptor "first_workflow_task" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Empty.Empty) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'firstWorkflowTask")) :: Data.ProtoLens.FieldDescriptor ResetOptions lastWorkflowTask__field_descriptor = Data.ProtoLens.FieldDescriptor "last_workflow_task" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Empty.Empty) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'lastWorkflowTask")) :: Data.ProtoLens.FieldDescriptor ResetOptions workflowTaskId__field_descriptor = Data.ProtoLens.FieldDescriptor "workflow_task_id" (Data.ProtoLens.ScalarField Data.ProtoLens.Int64Field :: Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'workflowTaskId")) :: Data.ProtoLens.FieldDescriptor ResetOptions buildId__field_descriptor = Data.ProtoLens.FieldDescriptor "build_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'buildId")) :: Data.ProtoLens.FieldDescriptor ResetOptions in Data.Map.fromList [(Data.ProtoLens.Tag 10, resetReapplyType__field_descriptor), (Data.ProtoLens.Tag 11, currentRunOnly__field_descriptor), (Data.ProtoLens.Tag 12, resetReapplyExcludeTypes__field_descriptor), (Data.ProtoLens.Tag 1, firstWorkflowTask__field_descriptor), (Data.ProtoLens.Tag 2, lastWorkflowTask__field_descriptor), (Data.ProtoLens.Tag 3, workflowTaskId__field_descriptor), (Data.ProtoLens.Tag 4, buildId__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _ResetOptions'_unknownFields (\ x__ y__ -> x__ {_ResetOptions'_unknownFields = y__}) defMessage = ResetOptions'_constructor {_ResetOptions'resetReapplyType = Data.ProtoLens.fieldDefault, _ResetOptions'currentRunOnly = Data.ProtoLens.fieldDefault, _ResetOptions'resetReapplyExcludeTypes = Data.Vector.Generic.empty, _ResetOptions'target = Prelude.Nothing, _ResetOptions'_unknownFields = []} parseMessage = let loop :: ResetOptions -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType -> Data.ProtoLens.Encoding.Bytes.Parser ResetOptions loop x mutable'resetReapplyExcludeTypes = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'resetReapplyExcludeTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'resetReapplyExcludeTypes) (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'resetReapplyExcludeTypes") frozen'resetReapplyExcludeTypes x)) else do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt case tag of 80 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.toEnum (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt)) "reset_reapply_type" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"resetReapplyType") y x) mutable'resetReapplyExcludeTypes 88 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) "current_run_only" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"currentRunOnly") y x) mutable'resetReapplyExcludeTypes 96 -> do !y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.toEnum (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt)) "reset_reapply_exclude_types" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'resetReapplyExcludeTypes y) loop x v 98 -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) ((let ploop qs = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd if packedEnd then Prelude.return qs else do !q <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.toEnum (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt)) "reset_reapply_exclude_types" qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append qs q) ploop qs' in ploop) mutable'resetReapplyExcludeTypes) loop x y 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) "first_workflow_task" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"firstWorkflowTask") y x) mutable'resetReapplyExcludeTypes 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) "last_workflow_task" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"lastWorkflowTask") y x) mutable'resetReapplyExcludeTypes 24 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt) "workflow_task_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowTaskId") y x) mutable'resetReapplyExcludeTypes 34 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getText (Prelude.fromIntegral len)) "build_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"buildId") y x) mutable'resetReapplyExcludeTypes wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'resetReapplyExcludeTypes in (Data.ProtoLens.Encoding.Bytes.) (do mutable'resetReapplyExcludeTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'resetReapplyExcludeTypes) "ResetOptions" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"resetReapplyType") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 80) ((Prelude..) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) Prelude.fromEnum _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"currentRunOnly") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 88) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) _v)) ((Data.Monoid.<>) (let p = Lens.Family2.view (Data.ProtoLens.Field.field @"vec'resetReapplyExcludeTypes") _x in if Data.Vector.Generic.null p then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 98) ((\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) (Data.ProtoLens.Encoding.Bytes.runBuilder (Data.ProtoLens.Encoding.Bytes.foldMapBuilder ((Prelude..) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) Prelude.fromEnum) p)))) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'target") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just (ResetOptions'FirstWorkflowTask 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) (Prelude.Just (ResetOptions'LastWorkflowTask 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) (Prelude.Just (ResetOptions'WorkflowTaskId v)) -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 24) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral v) (Prelude.Just (ResetOptions'BuildId 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.Text.Encoding.encodeUtf8 v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) instance Control.DeepSeq.NFData ResetOptions where rnf = \ x__ -> Control.DeepSeq.deepseq (_ResetOptions'_unknownFields x__) (Control.DeepSeq.deepseq (_ResetOptions'resetReapplyType x__) (Control.DeepSeq.deepseq (_ResetOptions'currentRunOnly x__) (Control.DeepSeq.deepseq (_ResetOptions'resetReapplyExcludeTypes x__) (Control.DeepSeq.deepseq (_ResetOptions'target x__) ())))) instance Control.DeepSeq.NFData ResetOptions'Target where rnf (ResetOptions'FirstWorkflowTask x__) = Control.DeepSeq.rnf x__ rnf (ResetOptions'LastWorkflowTask x__) = Control.DeepSeq.rnf x__ rnf (ResetOptions'WorkflowTaskId x__) = Control.DeepSeq.rnf x__ rnf (ResetOptions'BuildId x__) = Control.DeepSeq.rnf x__ _ResetOptions'FirstWorkflowTask :: Data.ProtoLens.Prism.Prism' ResetOptions'Target Proto.Google.Protobuf.Empty.Empty _ResetOptions'FirstWorkflowTask = Data.ProtoLens.Prism.prism' ResetOptions'FirstWorkflowTask (\ p__ -> case p__ of (ResetOptions'FirstWorkflowTask p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) _ResetOptions'LastWorkflowTask :: Data.ProtoLens.Prism.Prism' ResetOptions'Target Proto.Google.Protobuf.Empty.Empty _ResetOptions'LastWorkflowTask = Data.ProtoLens.Prism.prism' ResetOptions'LastWorkflowTask (\ p__ -> case p__ of (ResetOptions'LastWorkflowTask p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) _ResetOptions'WorkflowTaskId :: Data.ProtoLens.Prism.Prism' ResetOptions'Target Data.Int.Int64 _ResetOptions'WorkflowTaskId = Data.ProtoLens.Prism.prism' ResetOptions'WorkflowTaskId (\ p__ -> case p__ of (ResetOptions'WorkflowTaskId p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) _ResetOptions'BuildId :: Data.ProtoLens.Prism.Prism' ResetOptions'Target Data.Text.Text _ResetOptions'BuildId = Data.ProtoLens.Prism.prism' ResetOptions'BuildId (\ p__ -> case p__ of (ResetOptions'BuildId p__val) -> Prelude.Just p__val _otherwise -> Prelude.Nothing) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.initialInterval' @:: Lens' RetryPolicy Proto.Google.Protobuf.Duration.Duration@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'initialInterval' @:: Lens' RetryPolicy (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.backoffCoefficient' @:: Lens' RetryPolicy Prelude.Double@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maximumInterval' @:: Lens' RetryPolicy Proto.Google.Protobuf.Duration.Duration@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'maximumInterval' @:: Lens' RetryPolicy (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maximumAttempts' @:: Lens' RetryPolicy Data.Int.Int32@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.nonRetryableErrorTypes' @:: Lens' RetryPolicy [Data.Text.Text]@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.vec'nonRetryableErrorTypes' @:: Lens' RetryPolicy (Data.Vector.Vector Data.Text.Text)@ -} data RetryPolicy = RetryPolicy'_constructor {_RetryPolicy'initialInterval :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration), _RetryPolicy'backoffCoefficient :: !Prelude.Double, _RetryPolicy'maximumInterval :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration), _RetryPolicy'maximumAttempts :: !Data.Int.Int32, _RetryPolicy'nonRetryableErrorTypes :: !(Data.Vector.Vector Data.Text.Text), _RetryPolicy'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show RetryPolicy where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField RetryPolicy "initialInterval" Proto.Google.Protobuf.Duration.Duration where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'initialInterval (\ x__ y__ -> x__ {_RetryPolicy'initialInterval = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField RetryPolicy "maybe'initialInterval" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'initialInterval (\ x__ y__ -> x__ {_RetryPolicy'initialInterval = y__})) Prelude.id instance Data.ProtoLens.Field.HasField RetryPolicy "backoffCoefficient" Prelude.Double where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'backoffCoefficient (\ x__ y__ -> x__ {_RetryPolicy'backoffCoefficient = y__})) Prelude.id instance Data.ProtoLens.Field.HasField RetryPolicy "maximumInterval" Proto.Google.Protobuf.Duration.Duration where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'maximumInterval (\ x__ y__ -> x__ {_RetryPolicy'maximumInterval = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField RetryPolicy "maybe'maximumInterval" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'maximumInterval (\ x__ y__ -> x__ {_RetryPolicy'maximumInterval = y__})) Prelude.id instance Data.ProtoLens.Field.HasField RetryPolicy "maximumAttempts" Data.Int.Int32 where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'maximumAttempts (\ x__ y__ -> x__ {_RetryPolicy'maximumAttempts = y__})) Prelude.id instance Data.ProtoLens.Field.HasField RetryPolicy "nonRetryableErrorTypes" [Data.Text.Text] where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'nonRetryableErrorTypes (\ x__ y__ -> x__ {_RetryPolicy'nonRetryableErrorTypes = y__})) (Lens.Family2.Unchecked.lens Data.Vector.Generic.toList (\ _ y__ -> Data.Vector.Generic.fromList y__)) instance Data.ProtoLens.Field.HasField RetryPolicy "vec'nonRetryableErrorTypes" (Data.Vector.Vector Data.Text.Text) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _RetryPolicy'nonRetryableErrorTypes (\ x__ y__ -> x__ {_RetryPolicy'nonRetryableErrorTypes = y__})) Prelude.id instance Data.ProtoLens.Message RetryPolicy where messageName _ = Data.Text.pack "temporal.api.common.v1.RetryPolicy" packedMessageDescriptor _ = "\n\ \\vRetryPolicy\DC2D\n\ \\DLEinitial_interval\CAN\SOH \SOH(\v2\EM.google.protobuf.DurationR\SIinitialInterval\DC2/\n\ \\DC3backoff_coefficient\CAN\STX \SOH(\SOHR\DC2backoffCoefficient\DC2D\n\ \\DLEmaximum_interval\CAN\ETX \SOH(\v2\EM.google.protobuf.DurationR\SImaximumInterval\DC2)\n\ \\DLEmaximum_attempts\CAN\EOT \SOH(\ENQR\SImaximumAttempts\DC29\n\ \\EMnon_retryable_error_types\CAN\ENQ \ETX(\tR\SYNnonRetryableErrorTypes" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let initialInterval__field_descriptor = Data.ProtoLens.FieldDescriptor "initial_interval" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'initialInterval")) :: Data.ProtoLens.FieldDescriptor RetryPolicy backoffCoefficient__field_descriptor = Data.ProtoLens.FieldDescriptor "backoff_coefficient" (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: Data.ProtoLens.FieldTypeDescriptor Prelude.Double) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"backoffCoefficient")) :: Data.ProtoLens.FieldDescriptor RetryPolicy maximumInterval__field_descriptor = Data.ProtoLens.FieldDescriptor "maximum_interval" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'maximumInterval")) :: Data.ProtoLens.FieldDescriptor RetryPolicy maximumAttempts__field_descriptor = Data.ProtoLens.FieldDescriptor "maximum_attempts" (Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field :: Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"maximumAttempts")) :: Data.ProtoLens.FieldDescriptor RetryPolicy nonRetryableErrorTypes__field_descriptor = Data.ProtoLens.FieldDescriptor "non_retryable_error_types" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"nonRetryableErrorTypes")) :: Data.ProtoLens.FieldDescriptor RetryPolicy in Data.Map.fromList [(Data.ProtoLens.Tag 1, initialInterval__field_descriptor), (Data.ProtoLens.Tag 2, backoffCoefficient__field_descriptor), (Data.ProtoLens.Tag 3, maximumInterval__field_descriptor), (Data.ProtoLens.Tag 4, maximumAttempts__field_descriptor), (Data.ProtoLens.Tag 5, nonRetryableErrorTypes__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _RetryPolicy'_unknownFields (\ x__ y__ -> x__ {_RetryPolicy'_unknownFields = y__}) defMessage = RetryPolicy'_constructor {_RetryPolicy'initialInterval = Prelude.Nothing, _RetryPolicy'backoffCoefficient = Data.ProtoLens.fieldDefault, _RetryPolicy'maximumInterval = Prelude.Nothing, _RetryPolicy'maximumAttempts = Data.ProtoLens.fieldDefault, _RetryPolicy'nonRetryableErrorTypes = Data.Vector.Generic.empty, _RetryPolicy'_unknownFields = []} parseMessage = let loop :: RetryPolicy -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text -> Data.ProtoLens.Encoding.Bytes.Parser RetryPolicy loop x mutable'nonRetryableErrorTypes = do end <- Data.ProtoLens.Encoding.Bytes.atEnd if end then do frozen'nonRetryableErrorTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'nonRetryableErrorTypes) (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'nonRetryableErrorTypes") frozen'nonRetryableErrorTypes 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) "initial_interval" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"initialInterval") y x) mutable'nonRetryableErrorTypes 17 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Data.ProtoLens.Encoding.Bytes.wordToDouble Data.ProtoLens.Encoding.Bytes.getFixed64) "backoff_coefficient" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"backoffCoefficient") y x) mutable'nonRetryableErrorTypes 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) "maximum_interval" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"maximumInterval") y x) mutable'nonRetryableErrorTypes 32 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap Prelude.fromIntegral Data.ProtoLens.Encoding.Bytes.getVarInt) "maximum_attempts" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"maximumAttempts") y x) mutable'nonRetryableErrorTypes 42 -> do !y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getText (Prelude.fromIntegral len)) "non_retryable_error_types" v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO (Data.ProtoLens.Encoding.Growing.append mutable'nonRetryableErrorTypes y) loop x v wire -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire wire loop (Lens.Family2.over Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) mutable'nonRetryableErrorTypes in (Data.ProtoLens.Encoding.Bytes.) (do mutable'nonRetryableErrorTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO Data.ProtoLens.Encoding.Growing.new loop Data.ProtoLens.defMessage mutable'nonRetryableErrorTypes) "RetryPolicy" buildMessage = \ _x -> (Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'initialInterval") _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.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"backoffCoefficient") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 17) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putFixed64 Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'maximumInterval") _x of Prelude.Nothing -> Data.Monoid.mempty (Prelude.Just _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.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"maximumAttempts") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 32) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) ((Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.foldMapBuilder (\ _v -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 42) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'nonRetryableErrorTypes") _x)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) instance Control.DeepSeq.NFData RetryPolicy where rnf = \ x__ -> Control.DeepSeq.deepseq (_RetryPolicy'_unknownFields x__) (Control.DeepSeq.deepseq (_RetryPolicy'initialInterval x__) (Control.DeepSeq.deepseq (_RetryPolicy'backoffCoefficient x__) (Control.DeepSeq.deepseq (_RetryPolicy'maximumInterval x__) (Control.DeepSeq.deepseq (_RetryPolicy'maximumAttempts x__) (Control.DeepSeq.deepseq (_RetryPolicy'nonRetryableErrorTypes x__) ()))))) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.indexedFields' @:: Lens' SearchAttributes (Data.Map.Map Data.Text.Text Payload)@ -} data SearchAttributes = SearchAttributes'_constructor {_SearchAttributes'indexedFields :: !(Data.Map.Map Data.Text.Text Payload), _SearchAttributes'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show SearchAttributes where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField SearchAttributes "indexedFields" (Data.Map.Map Data.Text.Text Payload) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchAttributes'indexedFields (\ x__ y__ -> x__ {_SearchAttributes'indexedFields = y__})) Prelude.id instance Data.ProtoLens.Message SearchAttributes where messageName _ = Data.Text.pack "temporal.api.common.v1.SearchAttributes" packedMessageDescriptor _ = "\n\ \\DLESearchAttributes\DC2b\n\ \\SOindexed_fields\CAN\SOH \ETX(\v2;.temporal.api.common.v1.SearchAttributes.IndexedFieldsEntryR\rindexedFields\SUBa\n\ \\DC2IndexedFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let indexedFields__field_descriptor = Data.ProtoLens.FieldDescriptor "indexed_fields" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor SearchAttributes'IndexedFieldsEntry) (Data.ProtoLens.MapField (Data.ProtoLens.Field.field @"key") (Data.ProtoLens.Field.field @"value") (Data.ProtoLens.Field.field @"indexedFields")) :: Data.ProtoLens.FieldDescriptor SearchAttributes in Data.Map.fromList [(Data.ProtoLens.Tag 1, indexedFields__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _SearchAttributes'_unknownFields (\ x__ y__ -> x__ {_SearchAttributes'_unknownFields = y__}) defMessage = SearchAttributes'_constructor {_SearchAttributes'indexedFields = Data.Map.empty, _SearchAttributes'_unknownFields = []} parseMessage = let loop :: SearchAttributes -> Data.ProtoLens.Encoding.Bytes.Parser SearchAttributes 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 !(entry :: SearchAttributes'IndexedFieldsEntry) <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.isolate (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) "indexed_fields" (let key = Lens.Family2.view (Data.ProtoLens.Field.field @"key") entry value = Lens.Family2.view (Data.ProtoLens.Field.field @"value") entry in loop (Lens.Family2.over (Data.ProtoLens.Field.field @"indexedFields") (\ !t -> Data.Map.insert key value t) 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) "SearchAttributes" buildMessage = \ _x -> (Data.Monoid.<>) (Data.Monoid.mconcat (Prelude.map (\ _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 (Lens.Family2.set (Data.ProtoLens.Field.field @"key") (Prelude.fst _v) (Lens.Family2.set (Data.ProtoLens.Field.field @"value") (Prelude.snd _v) (Data.ProtoLens.defMessage :: SearchAttributes'IndexedFieldsEntry))))) (Data.Map.toList (Lens.Family2.view (Data.ProtoLens.Field.field @"indexedFields") _x)))) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData SearchAttributes where rnf = \ x__ -> Control.DeepSeq.deepseq (_SearchAttributes'_unknownFields x__) (Control.DeepSeq.deepseq (_SearchAttributes'indexedFields x__) ()) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.key' @:: Lens' SearchAttributes'IndexedFieldsEntry Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.value' @:: Lens' SearchAttributes'IndexedFieldsEntry Payload@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.maybe'value' @:: Lens' SearchAttributes'IndexedFieldsEntry (Prelude.Maybe Payload)@ -} data SearchAttributes'IndexedFieldsEntry = SearchAttributes'IndexedFieldsEntry'_constructor {_SearchAttributes'IndexedFieldsEntry'key :: !Data.Text.Text, _SearchAttributes'IndexedFieldsEntry'value :: !(Prelude.Maybe Payload), _SearchAttributes'IndexedFieldsEntry'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show SearchAttributes'IndexedFieldsEntry where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField SearchAttributes'IndexedFieldsEntry "key" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchAttributes'IndexedFieldsEntry'key (\ x__ y__ -> x__ {_SearchAttributes'IndexedFieldsEntry'key = y__})) Prelude.id instance Data.ProtoLens.Field.HasField SearchAttributes'IndexedFieldsEntry "value" Payload where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchAttributes'IndexedFieldsEntry'value (\ x__ y__ -> x__ {_SearchAttributes'IndexedFieldsEntry'value = y__})) (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) instance Data.ProtoLens.Field.HasField SearchAttributes'IndexedFieldsEntry "maybe'value" (Prelude.Maybe Payload) where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _SearchAttributes'IndexedFieldsEntry'value (\ x__ y__ -> x__ {_SearchAttributes'IndexedFieldsEntry'value = y__})) Prelude.id instance Data.ProtoLens.Message SearchAttributes'IndexedFieldsEntry where messageName _ = Data.Text.pack "temporal.api.common.v1.SearchAttributes.IndexedFieldsEntry" packedMessageDescriptor _ = "\n\ \\DC2IndexedFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let key__field_descriptor = Data.ProtoLens.FieldDescriptor "key" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"key")) :: Data.ProtoLens.FieldDescriptor SearchAttributes'IndexedFieldsEntry value__field_descriptor = Data.ProtoLens.FieldDescriptor "value" (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: Data.ProtoLens.FieldTypeDescriptor Payload) (Data.ProtoLens.OptionalField (Data.ProtoLens.Field.field @"maybe'value")) :: Data.ProtoLens.FieldDescriptor SearchAttributes'IndexedFieldsEntry in Data.Map.fromList [(Data.ProtoLens.Tag 1, key__field_descriptor), (Data.ProtoLens.Tag 2, value__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _SearchAttributes'IndexedFieldsEntry'_unknownFields (\ x__ y__ -> x__ {_SearchAttributes'IndexedFieldsEntry'_unknownFields = y__}) defMessage = SearchAttributes'IndexedFieldsEntry'_constructor {_SearchAttributes'IndexedFieldsEntry'key = Data.ProtoLens.fieldDefault, _SearchAttributes'IndexedFieldsEntry'value = Prelude.Nothing, _SearchAttributes'IndexedFieldsEntry'_unknownFields = []} parseMessage = let loop :: SearchAttributes'IndexedFieldsEntry -> Data.ProtoLens.Encoding.Bytes.Parser SearchAttributes'IndexedFieldsEntry 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.getText (Prelude.fromIntegral len)) "key" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") 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) "value" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") 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) "IndexedFieldsEntry" buildMessage = \ _x -> (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 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (case Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _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 SearchAttributes'IndexedFieldsEntry where rnf = \ x__ -> Control.DeepSeq.deepseq (_SearchAttributes'IndexedFieldsEntry'_unknownFields x__) (Control.DeepSeq.deepseq (_SearchAttributes'IndexedFieldsEntry'key x__) (Control.DeepSeq.deepseq (_SearchAttributes'IndexedFieldsEntry'value x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.buildId' @:: Lens' WorkerVersionCapabilities Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.useVersioning' @:: Lens' WorkerVersionCapabilities Prelude.Bool@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.deploymentSeriesName' @:: Lens' WorkerVersionCapabilities Data.Text.Text@ -} data WorkerVersionCapabilities = WorkerVersionCapabilities'_constructor {_WorkerVersionCapabilities'buildId :: !Data.Text.Text, _WorkerVersionCapabilities'useVersioning :: !Prelude.Bool, _WorkerVersionCapabilities'deploymentSeriesName :: !Data.Text.Text, _WorkerVersionCapabilities'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show WorkerVersionCapabilities where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField WorkerVersionCapabilities "buildId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkerVersionCapabilities'buildId (\ x__ y__ -> x__ {_WorkerVersionCapabilities'buildId = y__})) Prelude.id instance Data.ProtoLens.Field.HasField WorkerVersionCapabilities "useVersioning" Prelude.Bool where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkerVersionCapabilities'useVersioning (\ x__ y__ -> x__ {_WorkerVersionCapabilities'useVersioning = y__})) Prelude.id instance Data.ProtoLens.Field.HasField WorkerVersionCapabilities "deploymentSeriesName" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkerVersionCapabilities'deploymentSeriesName (\ x__ y__ -> x__ {_WorkerVersionCapabilities'deploymentSeriesName = y__})) Prelude.id instance Data.ProtoLens.Message WorkerVersionCapabilities where messageName _ = Data.Text.pack "temporal.api.common.v1.WorkerVersionCapabilities" packedMessageDescriptor _ = "\n\ \\EMWorkerVersionCapabilities\DC2\EM\n\ \\bbuild_id\CAN\SOH \SOH(\tR\abuildId\DC2%\n\ \\SOuse_versioning\CAN\STX \SOH(\bR\ruseVersioning\DC24\n\ \\SYNdeployment_series_name\CAN\EOT \SOH(\tR\DC4deploymentSeriesName" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let buildId__field_descriptor = Data.ProtoLens.FieldDescriptor "build_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"buildId")) :: Data.ProtoLens.FieldDescriptor WorkerVersionCapabilities useVersioning__field_descriptor = Data.ProtoLens.FieldDescriptor "use_versioning" (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"useVersioning")) :: Data.ProtoLens.FieldDescriptor WorkerVersionCapabilities deploymentSeriesName__field_descriptor = Data.ProtoLens.FieldDescriptor "deployment_series_name" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"deploymentSeriesName")) :: Data.ProtoLens.FieldDescriptor WorkerVersionCapabilities in Data.Map.fromList [(Data.ProtoLens.Tag 1, buildId__field_descriptor), (Data.ProtoLens.Tag 2, useVersioning__field_descriptor), (Data.ProtoLens.Tag 4, deploymentSeriesName__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _WorkerVersionCapabilities'_unknownFields (\ x__ y__ -> x__ {_WorkerVersionCapabilities'_unknownFields = y__}) defMessage = WorkerVersionCapabilities'_constructor {_WorkerVersionCapabilities'buildId = Data.ProtoLens.fieldDefault, _WorkerVersionCapabilities'useVersioning = Data.ProtoLens.fieldDefault, _WorkerVersionCapabilities'deploymentSeriesName = Data.ProtoLens.fieldDefault, _WorkerVersionCapabilities'_unknownFields = []} parseMessage = let loop :: WorkerVersionCapabilities -> Data.ProtoLens.Encoding.Bytes.Parser WorkerVersionCapabilities 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.getText (Prelude.fromIntegral len)) "build_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"buildId") y x) 16 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) "use_versioning" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"useVersioning") y x) 34 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getText (Prelude.fromIntegral len)) "deployment_series_name" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"deploymentSeriesName") 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) "WorkerVersionCapabilities" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"buildId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"useVersioning") _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 (\ b -> if b then 1 else 0) _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"deploymentSeriesName") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (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.Text.Encoding.encodeUtf8 _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) instance Control.DeepSeq.NFData WorkerVersionCapabilities where rnf = \ x__ -> Control.DeepSeq.deepseq (_WorkerVersionCapabilities'_unknownFields x__) (Control.DeepSeq.deepseq (_WorkerVersionCapabilities'buildId x__) (Control.DeepSeq.deepseq (_WorkerVersionCapabilities'useVersioning x__) (Control.DeepSeq.deepseq (_WorkerVersionCapabilities'deploymentSeriesName x__) ()))) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.buildId' @:: Lens' WorkerVersionStamp Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.useVersioning' @:: Lens' WorkerVersionStamp Prelude.Bool@ -} data WorkerVersionStamp = WorkerVersionStamp'_constructor {_WorkerVersionStamp'buildId :: !Data.Text.Text, _WorkerVersionStamp'useVersioning :: !Prelude.Bool, _WorkerVersionStamp'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show WorkerVersionStamp where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField WorkerVersionStamp "buildId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkerVersionStamp'buildId (\ x__ y__ -> x__ {_WorkerVersionStamp'buildId = y__})) Prelude.id instance Data.ProtoLens.Field.HasField WorkerVersionStamp "useVersioning" Prelude.Bool where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkerVersionStamp'useVersioning (\ x__ y__ -> x__ {_WorkerVersionStamp'useVersioning = y__})) Prelude.id instance Data.ProtoLens.Message WorkerVersionStamp where messageName _ = Data.Text.pack "temporal.api.common.v1.WorkerVersionStamp" packedMessageDescriptor _ = "\n\ \\DC2WorkerVersionStamp\DC2\EM\n\ \\bbuild_id\CAN\SOH \SOH(\tR\abuildId\DC2%\n\ \\SOuse_versioning\CAN\ETX \SOH(\bR\ruseVersioning" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let buildId__field_descriptor = Data.ProtoLens.FieldDescriptor "build_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"buildId")) :: Data.ProtoLens.FieldDescriptor WorkerVersionStamp useVersioning__field_descriptor = Data.ProtoLens.FieldDescriptor "use_versioning" (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"useVersioning")) :: Data.ProtoLens.FieldDescriptor WorkerVersionStamp in Data.Map.fromList [(Data.ProtoLens.Tag 1, buildId__field_descriptor), (Data.ProtoLens.Tag 3, useVersioning__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _WorkerVersionStamp'_unknownFields (\ x__ y__ -> x__ {_WorkerVersionStamp'_unknownFields = y__}) defMessage = WorkerVersionStamp'_constructor {_WorkerVersionStamp'buildId = Data.ProtoLens.fieldDefault, _WorkerVersionStamp'useVersioning = Data.ProtoLens.fieldDefault, _WorkerVersionStamp'_unknownFields = []} parseMessage = let loop :: WorkerVersionStamp -> Data.ProtoLens.Encoding.Bytes.Parser WorkerVersionStamp 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.getText (Prelude.fromIntegral len)) "build_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"buildId") y x) 24 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (Prelude.fmap ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) "use_versioning" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"useVersioning") 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) "WorkerVersionStamp" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"buildId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"useVersioning") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 24) ((Prelude..) Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData WorkerVersionStamp where rnf = \ x__ -> Control.DeepSeq.deepseq (_WorkerVersionStamp'_unknownFields x__) (Control.DeepSeq.deepseq (_WorkerVersionStamp'buildId x__) (Control.DeepSeq.deepseq (_WorkerVersionStamp'useVersioning x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.workflowId' @:: Lens' WorkflowExecution Data.Text.Text@ * 'Proto.Temporal.Api.Common.V1.Message_Fields.runId' @:: Lens' WorkflowExecution Data.Text.Text@ -} data WorkflowExecution = WorkflowExecution'_constructor {_WorkflowExecution'workflowId :: !Data.Text.Text, _WorkflowExecution'runId :: !Data.Text.Text, _WorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show WorkflowExecution where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField WorkflowExecution "workflowId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkflowExecution'workflowId (\ x__ y__ -> x__ {_WorkflowExecution'workflowId = y__})) Prelude.id instance Data.ProtoLens.Field.HasField WorkflowExecution "runId" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkflowExecution'runId (\ x__ y__ -> x__ {_WorkflowExecution'runId = y__})) Prelude.id instance Data.ProtoLens.Message WorkflowExecution where messageName _ = Data.Text.pack "temporal.api.common.v1.WorkflowExecution" packedMessageDescriptor _ = "\n\ \\DC1WorkflowExecution\DC2\US\n\ \\vworkflow_id\CAN\SOH \SOH(\tR\n\ \workflowId\DC2\NAK\n\ \\ACKrun_id\CAN\STX \SOH(\tR\ENQrunId" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let workflowId__field_descriptor = Data.ProtoLens.FieldDescriptor "workflow_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"workflowId")) :: Data.ProtoLens.FieldDescriptor WorkflowExecution runId__field_descriptor = Data.ProtoLens.FieldDescriptor "run_id" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"runId")) :: Data.ProtoLens.FieldDescriptor WorkflowExecution in Data.Map.fromList [(Data.ProtoLens.Tag 1, workflowId__field_descriptor), (Data.ProtoLens.Tag 2, runId__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _WorkflowExecution'_unknownFields (\ x__ y__ -> x__ {_WorkflowExecution'_unknownFields = y__}) defMessage = WorkflowExecution'_constructor {_WorkflowExecution'workflowId = Data.ProtoLens.fieldDefault, _WorkflowExecution'runId = Data.ProtoLens.fieldDefault, _WorkflowExecution'_unknownFields = []} parseMessage = let loop :: WorkflowExecution -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecution 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.getText (Prelude.fromIntegral len)) "workflow_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x) 18 -> do y <- (Data.ProtoLens.Encoding.Bytes.) (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt Data.ProtoLens.Encoding.Bytes.getText (Prelude.fromIntegral len)) "run_id" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") 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) "WorkflowExecution" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"workflowId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) ((Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"runId") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (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.Text.Encoding.encodeUtf8 _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x))) instance Control.DeepSeq.NFData WorkflowExecution where rnf = \ x__ -> Control.DeepSeq.deepseq (_WorkflowExecution'_unknownFields x__) (Control.DeepSeq.deepseq (_WorkflowExecution'workflowId x__) (Control.DeepSeq.deepseq (_WorkflowExecution'runId x__) ())) {- | Fields : * 'Proto.Temporal.Api.Common.V1.Message_Fields.name' @:: Lens' WorkflowType Data.Text.Text@ -} data WorkflowType = WorkflowType'_constructor {_WorkflowType'name :: !Data.Text.Text, _WorkflowType'_unknownFields :: !Data.ProtoLens.FieldSet} deriving stock (Prelude.Eq, Prelude.Ord) instance Prelude.Show WorkflowType where showsPrec _ __x __s = Prelude.showChar '{' (Prelude.showString (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) instance Data.ProtoLens.Field.HasField WorkflowType "name" Data.Text.Text where fieldOf _ = (Prelude..) (Lens.Family2.Unchecked.lens _WorkflowType'name (\ x__ y__ -> x__ {_WorkflowType'name = y__})) Prelude.id instance Data.ProtoLens.Message WorkflowType where messageName _ = Data.Text.pack "temporal.api.common.v1.WorkflowType" packedMessageDescriptor _ = "\n\ \\fWorkflowType\DC2\DC2\n\ \\EOTname\CAN\SOH \SOH(\tR\EOTname" packedFileDescriptor _ = packedFileDescriptor fieldsByTag = let name__field_descriptor = Data.ProtoLens.FieldDescriptor "name" (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) (Data.ProtoLens.PlainField Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"name")) :: Data.ProtoLens.FieldDescriptor WorkflowType in Data.Map.fromList [(Data.ProtoLens.Tag 1, name__field_descriptor)] unknownFields = Lens.Family2.Unchecked.lens _WorkflowType'_unknownFields (\ x__ y__ -> x__ {_WorkflowType'_unknownFields = y__}) defMessage = WorkflowType'_constructor {_WorkflowType'name = Data.ProtoLens.fieldDefault, _WorkflowType'_unknownFields = []} parseMessage = let loop :: WorkflowType -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowType 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.getText (Prelude.fromIntegral len)) "name" loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") 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) "WorkflowType" buildMessage = \ _x -> (Data.Monoid.<>) (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x in if (Prelude.==) _v Data.ProtoLens.fieldDefault then Data.Monoid.mempty else (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt 10) ((Prelude..) (\ bs -> (Data.Monoid.<>) (Data.ProtoLens.Encoding.Bytes.putVarInt (Prelude.fromIntegral (Data.ByteString.length bs))) (Data.ProtoLens.Encoding.Bytes.putBytes bs)) Data.Text.Encoding.encodeUtf8 _v)) (Data.ProtoLens.Encoding.Wire.buildFieldSet (Lens.Family2.view Data.ProtoLens.unknownFields _x)) instance Control.DeepSeq.NFData WorkflowType where rnf = \ x__ -> Control.DeepSeq.deepseq (_WorkflowType'_unknownFields x__) (Control.DeepSeq.deepseq (_WorkflowType'name x__) ()) packedFileDescriptor :: Data.ByteString.ByteString packedFileDescriptor = "\n\ \$temporal/api/common/v1/message.proto\DC2\SYNtemporal.api.common.v1\SUB\RSgoogle/protobuf/duration.proto\SUB\ESCgoogle/protobuf/empty.proto\SUB\"temporal/api/enums/v1/common.proto\SUB&temporal/api/enums/v1/event_type.proto\SUB!temporal/api/enums/v1/reset.proto\"h\n\ \\bDataBlob\DC2H\n\ \\rencoding_type\CAN\SOH \SOH(\SO2#.temporal.api.enums.v1.EncodingTypeR\fencodingType\DC2\DC2\n\ \\EOTdata\CAN\STX \SOH(\fR\EOTdata\"G\n\ \\bPayloads\DC2;\n\ \\bpayloads\CAN\SOH \ETX(\v2\US.temporal.api.common.v1.PayloadR\bpayloads\"\165\SOH\n\ \\aPayload\DC2I\n\ \\bmetadata\CAN\SOH \ETX(\v2-.temporal.api.common.v1.Payload.MetadataEntryR\bmetadata\DC2\DC2\n\ \\EOTdata\CAN\STX \SOH(\fR\EOTdata\SUB;\n\ \\rMetadataEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\ \\ENQvalue\CAN\STX \SOH(\fR\ENQvalue:\STX8\SOH\"\217\SOH\n\ \\DLESearchAttributes\DC2b\n\ \\SOindexed_fields\CAN\SOH \ETX(\v2;.temporal.api.common.v1.SearchAttributes.IndexedFieldsEntryR\rindexedFields\SUBa\n\ \\DC2IndexedFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH\"\164\SOH\n\ \\EOTMemo\DC2@\n\ \\ACKfields\CAN\SOH \ETX(\v2(.temporal.api.common.v1.Memo.FieldsEntryR\ACKfields\SUBZ\n\ \\vFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH\"\168\SOH\n\ \\ACKHeader\DC2B\n\ \\ACKfields\CAN\SOH \ETX(\v2*.temporal.api.common.v1.Header.FieldsEntryR\ACKfields\SUBZ\n\ \\vFieldsEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\ \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH\"K\n\ \\DC1WorkflowExecution\DC2\US\n\ \\vworkflow_id\CAN\SOH \SOH(\tR\n\ \workflowId\DC2\NAK\n\ \\ACKrun_id\CAN\STX \SOH(\tR\ENQrunId\"\"\n\ \\fWorkflowType\DC2\DC2\n\ \\EOTname\CAN\SOH \SOH(\tR\EOTname\"\"\n\ \\fActivityType\DC2\DC2\n\ \\EOTname\CAN\SOH \SOH(\tR\EOTname\"\176\STX\n\ \\vRetryPolicy\DC2D\n\ \\DLEinitial_interval\CAN\SOH \SOH(\v2\EM.google.protobuf.DurationR\SIinitialInterval\DC2/\n\ \\DC3backoff_coefficient\CAN\STX \SOH(\SOHR\DC2backoffCoefficient\DC2D\n\ \\DLEmaximum_interval\CAN\ETX \SOH(\v2\EM.google.protobuf.DurationR\SImaximumInterval\DC2)\n\ \\DLEmaximum_attempts\CAN\EOT \SOH(\ENQR\SImaximumAttempts\DC29\n\ \\EMnon_retryable_error_types\CAN\ENQ \ETX(\tR\SYNnonRetryableErrorTypes\"n\n\ \\DLEMeteringMetadata\DC2Z\n\ \*nonfirst_local_activity_execution_attempts\CAN\r \SOH(\rR&nonfirstLocalActivityExecutionAttempts\"V\n\ \\DC2WorkerVersionStamp\DC2\EM\n\ \\bbuild_id\CAN\SOH \SOH(\tR\abuildId\DC2%\n\ \\SOuse_versioning\CAN\ETX \SOH(\bR\ruseVersioning\"\147\SOH\n\ \\EMWorkerVersionCapabilities\DC2\EM\n\ \\bbuild_id\CAN\SOH \SOH(\tR\abuildId\DC2%\n\ \\SOuse_versioning\CAN\STX \SOH(\bR\ruseVersioning\DC24\n\ \\SYNdeployment_series_name\CAN\EOT \SOH(\tR\DC4deploymentSeriesName\"\227\ETX\n\ \\fResetOptions\DC2H\n\ \\DC3first_workflow_task\CAN\SOH \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\DC1firstWorkflowTask\DC2F\n\ \\DC2last_workflow_task\CAN\STX \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\DLElastWorkflowTask\DC2*\n\ \\DLEworkflow_task_id\CAN\ETX \SOH(\ETXH\NULR\SOworkflowTaskId\DC2\ESC\n\ \\bbuild_id\CAN\EOT \SOH(\tH\NULR\abuildId\DC2U\n\ \\DC2reset_reapply_type\CAN\n\ \ \SOH(\SO2'.temporal.api.enums.v1.ResetReapplyTypeR\DLEresetReapplyType\DC2(\n\ \\DLEcurrent_run_only\CAN\v \SOH(\bR\SOcurrentRunOnly\DC2m\n\ \\ESCreset_reapply_exclude_types\CAN\f \ETX(\SO2..temporal.api.enums.v1.ResetReapplyExcludeTypeR\CANresetReapplyExcludeTypesB\b\n\ \\ACKtarget\"\231\STX\n\ \\bCallback\DC2>\n\ \\ENQnexus\CAN\STX \SOH(\v2&.temporal.api.common.v1.Callback.NexusH\NULR\ENQnexus\DC2G\n\ \\binternal\CAN\ETX \SOH(\v2).temporal.api.common.v1.Callback.InternalH\NULR\binternal\SUB\160\SOH\n\ \\ENQNexus\DC2\DLE\n\ \\ETXurl\CAN\SOH \SOH(\tR\ETXurl\DC2J\n\ \\ACKheader\CAN\STX \ETX(\v22.temporal.api.common.v1.Callback.Nexus.HeaderEntryR\ACKheader\SUB9\n\ \\vHeaderEntry\DC2\DLE\n\ \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\ \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\SUB\RS\n\ \\bInternal\DC2\DC2\n\ \\EOTdata\CAN\SOH \SOH(\fR\EOTdataB\t\n\ \\avariantJ\EOT\b\SOH\DLE\STX\"\140\EOT\n\ \\EOTLink\DC2S\n\ \\SOworkflow_event\CAN\SOH \SOH(\v2*.temporal.api.common.v1.Link.WorkflowEventH\NULR\rworkflowEvent\DC2D\n\ \\tbatch_job\CAN\STX \SOH(\v2%.temporal.api.common.v1.Link.BatchJobH\NULR\bbatchJob\SUB\186\STX\n\ \\rWorkflowEvent\DC2\FS\n\ \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\ \\vworkflow_id\CAN\STX \SOH(\tR\n\ \workflowId\DC2\NAK\n\ \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2X\n\ \\tevent_ref\CANd \SOH(\v29.temporal.api.common.v1.Link.WorkflowEvent.EventReferenceH\NULR\beventRef\SUBl\n\ \\SOEventReference\DC2\EM\n\ \\bevent_id\CAN\SOH \SOH(\ETXR\aeventId\DC2?\n\ \\n\ \event_type\CAN\STX \SOH(\SO2 .temporal.api.enums.v1.EventTypeR\teventTypeB\v\n\ \\treference\SUB!\n\ \\bBatchJob\DC2\NAK\n\ \\ACKjob_id\CAN\SOH \SOH(\tR\ENQjobIdB\t\n\ \\avariant\"-\n\ \\bPriority\DC2!\n\ \\fpriority_key\CAN\SOH \SOH(\ENQR\vpriorityKeyB\137\SOH\n\ \\EMio.temporal.api.common.v1B\fMessageProtoP\SOHZ#go.temporal.io/api/common/v1;common\170\STX\CANTemporalio.Api.Common.V1\234\STX\ESCTemporalio::Api::Common::V1J\248^\n\ \\a\DC2\ENQ\SYN\NUL\153\STX\SOH\n\ \\241\b\n\ \\SOH\f\DC2\ETX\SYN\NUL\DC22\230\b The MIT License\n\ \\n\ \ Copyright (c) 2020 Temporal Technologies Inc. All rights reserved.\n\ \\n\ \ Permission is hereby granted, free of charge, to any person obtaining a copy\n\ \ of this software and associated documentation files (the \"Software\"), to deal\n\ \ in the Software without restriction, including without limitation the rights\n\ \ to use, copy, modify, merge, publish, distribute, sublicense, and/or sell\n\ \ copies of the Software, and to permit persons to whom the Software is\n\ \ furnished to do so, subject to the following conditions:\n\ \\n\ \ The above copyright notice and this permission notice shall be included in\n\ \ all copies or substantial portions of the Software.\n\ \\n\ \ THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\n\ \ IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\n\ \ FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE\n\ \ AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER\n\ \ LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,\n\ \ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN\n\ \ THE SOFTWARE.\n\ \\n\ \\b\n\ \\SOH\STX\DC2\ETX\CAN\NUL\US\n\ \\b\n\ \\SOH\b\DC2\ETX\SUB\NUL:\n\ \\t\n\ \\STX\b\v\DC2\ETX\SUB\NUL:\n\ \\b\n\ \\SOH\b\DC2\ETX\ESC\NUL2\n\ \\t\n\ \\STX\b\SOH\DC2\ETX\ESC\NUL2\n\ \\b\n\ \\SOH\b\DC2\ETX\FS\NUL\"\n\ \\t\n\ \\STX\b\n\ \\DC2\ETX\FS\NUL\"\n\ \\b\n\ \\SOH\b\DC2\ETX\GS\NUL-\n\ \\t\n\ \\STX\b\b\DC2\ETX\GS\NUL-\n\ \\b\n\ \\SOH\b\DC2\ETX\RS\NUL4\n\ \\t\n\ \\STX\b-\DC2\ETX\RS\NUL4\n\ \\b\n\ \\SOH\b\DC2\ETX\US\NUL5\n\ \\t\n\ \\STX\b%\DC2\ETX\US\NUL5\n\ \\t\n\ \\STX\ETX\NUL\DC2\ETX!\NUL(\n\ \\t\n\ \\STX\ETX\SOH\DC2\ETX\"\NUL%\n\ \\t\n\ \\STX\ETX\STX\DC2\ETX$\NUL,\n\ \\t\n\ \\STX\ETX\ETX\DC2\ETX%\NUL0\n\ \\t\n\ \\STX\ETX\EOT\DC2\ETX&\NUL+\n\ \\n\ \\n\ \\STX\EOT\NUL\DC2\EOT(\NUL+\SOH\n\ \\n\ \\n\ \\ETX\EOT\NUL\SOH\DC2\ETX(\b\DLE\n\ \\v\n\ \\EOT\EOT\NUL\STX\NUL\DC2\ETX)\EOT9\n\ \\f\n\ \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX)\EOT&\n\ \\f\n\ \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX)'4\n\ \\f\n\ \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX)78\n\ \\v\n\ \\EOT\EOT\NUL\STX\SOH\DC2\ETX*\EOT\DC3\n\ \\f\n\ \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX*\EOT\t\n\ \\f\n\ \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX*\n\ \\SO\n\ \\f\n\ \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX*\DC1\DC2\n\ \\ESC\n\ \\STX\EOT\SOH\DC2\EOT.\NUL0\SOH\SUB\SI See `Payload`\n\ \\n\ \\n\ \\n\ \\ETX\EOT\SOH\SOH\DC2\ETX.\b\DLE\n\ \\v\n\ \\EOT\EOT\SOH\STX\NUL\DC2\ETX/\EOT\"\n\ \\f\n\ \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX/\EOT\f\n\ \\f\n\ \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX/\r\DC4\n\ \\f\n\ \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX/\NAK\GS\n\ \\f\n\ \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX/ !\n\ \\239\SOH\n\ \\STX\EOT\STX\DC2\EOT5\NUL8\SOH\SUB\226\SOH Represents some binary (byte array) data (ex: activity input parameters or workflow result) with\n\ \ metadata which describes this binary data (format, encoding, encryption, etc). Serialization\n\ \ of the data may be user-defined.\n\ \\n\ \\n\ \\n\ \\ETX\EOT\STX\SOH\DC2\ETX5\b\SI\n\ \\v\n\ \\EOT\EOT\STX\STX\NUL\DC2\ETX6\EOT#\n\ \\f\n\ \\ENQ\EOT\STX\STX\NUL\ACK\DC2\ETX6\EOT\NAK\n\ \\f\n\ \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX6\SYN\RS\n\ \\f\n\ \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX6!\"\n\ \\v\n\ \\EOT\EOT\STX\STX\SOH\DC2\ETX7\EOT\DC3\n\ \\f\n\ \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX7\EOT\t\n\ \\f\n\ \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX7\n\ \\SO\n\ \\f\n\ \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX7\DC1\DC2\n\ \\163\SOH\n\ \\STX\EOT\ETX\DC2\EOT<\NUL>\SOH\SUB\150\SOH A user-defined set of *indexed* fields that are used/exposed when listing/searching workflows.\n\ \ The payload is not serialized in a user-defined way.\n\ \\n\ \\n\ \\n\ \\ETX\EOT\ETX\SOH\DC2\ETX<\b\CAN\n\ \\v\n\ \\EOT\EOT\ETX\STX\NUL\DC2\ETX=\EOT,\n\ \\f\n\ \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\ETX=\EOT\CAN\n\ \\f\n\ \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX=\EM'\n\ \\f\n\ \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX=*+\n\ \h\n\ \\STX\EOT\EOT\DC2\EOTA\NULC\SOH\SUB\\ A user-defined set of *unindexed* fields that are exposed when listing/searching workflows\n\ \\n\ \\n\ \\n\ \\ETX\EOT\EOT\SOH\DC2\ETXA\b\f\n\ \\v\n\ \\EOT\EOT\EOT\STX\NUL\DC2\ETXB\EOT$\n\ \\f\n\ \\ENQ\EOT\EOT\STX\NUL\ACK\DC2\ETXB\EOT\CAN\n\ \\f\n\ \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETXB\EM\US\n\ \\f\n\ \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETXB\"#\n\ \\176\SOH\n\ \\STX\EOT\ENQ\DC2\EOTG\NULI\SOH\SUB\163\SOH Contains metadata that can be attached to a variety of requests, like starting a workflow, and\n\ \ can be propagated between, for example, workflows and activities.\n\ \\n\ \\n\ \\n\ \\ETX\EOT\ENQ\SOH\DC2\ETXG\b\SO\n\ \\v\n\ \\EOT\EOT\ENQ\STX\NUL\DC2\ETXH\EOT$\n\ \\f\n\ \\ENQ\EOT\ENQ\STX\NUL\ACK\DC2\ETXH\EOT\CAN\n\ \\f\n\ \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\ETXH\EM\US\n\ \\f\n\ \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\ETXH\"#\n\ \\145\STX\n\ \\STX\EOT\ACK\DC2\EOTN\NULQ\SOH\SUB\132\STX Identifies a specific workflow within a namespace. Practically speaking, because run_id is a\n\ \ uuid, a workflow execution is globally unique. Note that many commands allow specifying an empty\n\ \ run id as a way of saying \"target the latest run of the workflow\".\n\ \\n\ \\n\ \\n\ \\ETX\EOT\ACK\SOH\DC2\ETXN\b\EM\n\ \\v\n\ \\EOT\EOT\ACK\STX\NUL\DC2\ETXO\EOT\ESC\n\ \\f\n\ \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\ETXO\EOT\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\ETXO\v\SYN\n\ \\f\n\ \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\ETXO\EM\SUB\n\ \\v\n\ \\EOT\EOT\ACK\STX\SOH\DC2\ETXP\EOT\SYN\n\ \\f\n\ \\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\ETXP\EOT\n\ \\n\ \\f\n\ \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\ETXP\v\DC1\n\ \\f\n\ \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\ETXP\DC4\NAK\n\ \\181\SOH\n\ \\STX\EOT\a\DC2\EOTU\NULW\SOH\SUB\168\SOH Represents the identifier used by a workflow author to define the workflow. Typically, the\n\ \ name of a function. This is sometimes referred to as the workflow's \"name\"\n\ \\n\ \\n\ \\n\ \\ETX\EOT\a\SOH\DC2\ETXU\b\DC4\n\ \\v\n\ \\EOT\EOT\a\STX\NUL\DC2\ETXV\EOT\DC4\n\ \\f\n\ \\ENQ\EOT\a\STX\NUL\ENQ\DC2\ETXV\EOT\n\ \\n\ \\f\n\ \\ENQ\EOT\a\STX\NUL\SOH\DC2\ETXV\v\SI\n\ \\f\n\ \\ENQ\EOT\a\STX\NUL\ETX\DC2\ETXV\DC2\DC3\n\ \\181\SOH\n\ \\STX\EOT\b\DC2\EOT[\NUL]\SOH\SUB\168\SOH Represents the identifier used by a activity author to define the activity. Typically, the\n\ \ name of a function. This is sometimes referred to as the activity's \"name\"\n\ \\n\ \\n\ \\n\ \\ETX\EOT\b\SOH\DC2\ETX[\b\DC4\n\ \\v\n\ \\EOT\EOT\b\STX\NUL\DC2\ETX\\\EOT\DC4\n\ \\f\n\ \\ENQ\EOT\b\STX\NUL\ENQ\DC2\ETX\\\EOT\n\ \\n\ \\f\n\ \\ENQ\EOT\b\STX\NUL\SOH\DC2\ETX\\\v\SI\n\ \\f\n\ \\ENQ\EOT\b\STX\NUL\ETX\DC2\ETX\\\DC2\DC3\n\ \V\n\ \\STX\EOT\t\DC2\EOT`\NULp\SOH\SUBJ How retries ought to be handled, usable by both workflows and activities\n\ \\n\ \\n\ \\n\ \\ETX\EOT\t\SOH\DC2\ETX`\b\DC3\n\ \n\n\ \\EOT\EOT\t\STX\NUL\DC2\ETXb\EOT2\SUBa Interval of the first retry. If retryBackoffCoefficient is 1.0 then it is used for all retries.\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\NUL\ACK\DC2\ETXb\EOT\FS\n\ \\f\n\ \\ENQ\EOT\t\STX\NUL\SOH\DC2\ETXb\GS-\n\ \\f\n\ \\ENQ\EOT\t\STX\NUL\ETX\DC2\ETXb01\n\ \\169\SOH\n\ \\EOT\EOT\t\STX\SOH\DC2\ETXf\EOT#\SUB\155\SOH Coefficient used to calculate the next retry interval.\n\ \ The next retry interval is previous interval multiplied by the coefficient.\n\ \ Must be 1 or larger.\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\SOH\ENQ\DC2\ETXf\EOT\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\SOH\SOH\DC2\ETXf\v\RS\n\ \\f\n\ \\ENQ\EOT\t\STX\SOH\ETX\DC2\ETXf!\"\n\ \\178\SOH\n\ \\EOT\EOT\t\STX\STX\DC2\ETXi\EOT2\SUB\164\SOH Maximum interval between retries. Exponential backoff leads to interval increase.\n\ \ This value is the cap of the increase. Default is 100x of the initial interval.\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\STX\ACK\DC2\ETXi\EOT\FS\n\ \\f\n\ \\ENQ\EOT\t\STX\STX\SOH\DC2\ETXi\GS-\n\ \\f\n\ \\ENQ\EOT\t\STX\STX\ETX\DC2\ETXi01\n\ \\159\SOH\n\ \\EOT\EOT\t\STX\ETX\DC2\ETXl\EOT\US\SUB\145\SOH Maximum number of attempts. When exceeded the retries stop even if not expired yet.\n\ \ 1 disables retries. 0 means unlimited (up to the timeouts)\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\ETX\ENQ\DC2\ETXl\EOT\t\n\ \\f\n\ \\ENQ\EOT\t\STX\ETX\SOH\DC2\ETXl\n\ \\SUB\n\ \\f\n\ \\ENQ\EOT\t\STX\ETX\ETX\DC2\ETXl\GS\RS\n\ \\192\SOH\n\ \\EOT\EOT\t\STX\EOT\DC2\ETXo\EOT2\SUB\178\SOH Non-Retryable errors types. Will stop retrying if the error type matches this list. Note that\n\ \ this is not a substring match, the error *type* (not message) must match exactly.\n\ \\n\ \\f\n\ \\ENQ\EOT\t\STX\EOT\EOT\DC2\ETXo\EOT\f\n\ \\f\n\ \\ENQ\EOT\t\STX\EOT\ENQ\DC2\ETXo\r\DC3\n\ \\f\n\ \\ENQ\EOT\t\STX\EOT\SOH\DC2\ETXo\DC4-\n\ \\f\n\ \\ENQ\EOT\t\STX\EOT\ETX\DC2\ETXo01\n\ \5\n\ \\STX\EOT\n\ \\DC2\EOTs\NUL{\SOH\SUB) Metadata relevant for metering purposes\n\ \\n\ \\n\ \\n\ \\ETX\EOT\n\ \\SOH\DC2\ETXs\b\CAN\n\ \\239\STX\n\ \\EOT\EOT\n\ \\STX\NUL\DC2\ETXz\EOT;\SUB\225\STX Count of local activities which have begun an execution attempt during this workflow task,\n\ \ and whose first attempt occurred in some previous task. This is used for metering\n\ \ purposes, and does not affect workflow state.\n\ \\n\ \ (-- api-linter: core::0141::forbidden-types=disabled\n\ \ aip.dev/not-precedent: Negative values make no sense to represent. --)\n\ \\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\NUL\ENQ\DC2\ETXz\EOT\n\ \\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\NUL\SOH\DC2\ETXz\v5\n\ \\f\n\ \\ENQ\EOT\n\ \\STX\NUL\ETX\DC2\ETXz8:\n\ \\157\SOH\n\ \\STX\EOT\v\DC2\ENQ\DEL\NUL\137\SOH\SOH\SUB\143\SOH Deprecated. This message is replaced with `Deployment` and `VersioningBehavior`.\n\ \ Identifies the version(s) of a worker that processed a task\n\ \\n\ \\n\ \\n\ \\ETX\EOT\v\SOH\DC2\ETX\DEL\b\SUB\n\ \\170\SOH\n\ \\EOT\EOT\v\STX\NUL\DC2\EOT\130\SOH\EOT\CAN\SUB\155\SOH An opaque whole-worker identifier. Replaces the deprecated `binary_checksum` field when this\n\ \ message is included in requests which previously used that.\n\ \\n\ \\r\n\ \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\130\SOH\EOT\n\ \\n\ \\r\n\ \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\130\SOH\v\DC3\n\ \\r\n\ \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\130\SOH\SYN\ETB\n\ \\173\SOH\n\ \\EOT\EOT\v\STX\SOH\DC2\EOT\134\SOH\EOT\FS\SUB\158\SOH If set, the worker is opting in to worker versioning. Otherwise, this is used only as a\n\ \ marker for workflow reset points and the BuildIDs search attribute.\n\ \\n\ \\r\n\ \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\134\SOH\EOT\b\n\ \\r\n\ \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\134\SOH\t\ETB\n\ \\r\n\ \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\134\SOH\SUB\ESC\n\ \\198\STX\n\ \\STX\EOT\f\DC2\ACK\143\SOH\NUL\155\SOH\SOH\SUB\183\STX Identifies the version that a worker is compatible with when polling or identifying itself,\n\ \ and whether or not this worker is opting into the build-id based versioning feature. This is\n\ \ used by matching to determine which workers ought to receive what tasks.\n\ \ Deprecated. Use WorkerDeploymentOptions instead.\n\ \\n\ \\v\n\ \\ETX\EOT\f\SOH\DC2\EOT\143\SOH\b!\n\ \1\n\ \\EOT\EOT\f\STX\NUL\DC2\EOT\145\SOH\EOT\CAN\SUB# An opaque whole-worker identifier\n\ \\n\ \\r\n\ \\ENQ\EOT\f\STX\NUL\ENQ\DC2\EOT\145\SOH\EOT\n\ \\n\ \\r\n\ \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\145\SOH\v\DC3\n\ \\r\n\ \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\145\SOH\SYN\ETB\n\ \t\n\ \\EOT\EOT\f\STX\SOH\DC2\EOT\149\SOH\EOT\FS\SUBf If set, the worker is opting in to worker versioning, and wishes to only receive appropriate\n\ \ tasks.\n\ \\n\ \\r\n\ \\ENQ\EOT\f\STX\SOH\ENQ\DC2\EOT\149\SOH\EOT\b\n\ \\r\n\ \\ENQ\EOT\f\STX\SOH\SOH\DC2\EOT\149\SOH\t\ETB\n\ \\r\n\ \\ENQ\EOT\f\STX\SOH\ETX\DC2\EOT\149\SOH\SUB\ESC\n\ \U\n\ \\EOT\EOT\f\STX\STX\DC2\EOT\152\SOH\EOT&\SUBG Must be sent if user has set a deployment series name (versioning-3).\n\ \\n\ \\r\n\ \\ENQ\EOT\f\STX\STX\ENQ\DC2\EOT\152\SOH\EOT\n\ \\n\ \\r\n\ \\ENQ\EOT\f\STX\STX\SOH\DC2\EOT\152\SOH\v!\n\ \\r\n\ \\ENQ\EOT\f\STX\STX\ETX\DC2\EOT\152\SOH$%\n\ \\141\SOH\n\ \\STX\EOT\r\DC2\ACK\159\SOH\NUL\188\SOH\SOH\SUB\DEL Describes where and how to reset a workflow, used for batch reset currently\n\ \ and may be used for single-workflow reset later.\n\ \\n\ \\v\n\ \\ETX\EOT\r\SOH\DC2\EOT\159\SOH\b\DC4\n\ \2\n\ \\EOT\EOT\r\b\NUL\DC2\ACK\161\SOH\EOT\176\SOH\ENQ\SUB\" Which workflow task to reset to.\n\ \\n\ \\r\n\ \\ENQ\EOT\r\b\NUL\SOH\DC2\EOT\161\SOH\n\ \\DLE\n\ \M\n\ \\EOT\EOT\r\STX\NUL\DC2\EOT\163\SOH\b6\SUB? Resets to the first workflow task completed or started event.\n\ \\n\ \\r\n\ \\ENQ\EOT\r\STX\NUL\ACK\DC2\EOT\163\SOH\b\GS\n\ \\r\n\ \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\163\SOH\RS1\n\ \\r\n\ \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\163\SOH45\n\ \L\n\ \\EOT\EOT\r\STX\SOH\DC2\EOT\165\SOH\b5\SUB> Resets to the last workflow task completed or started event.\n\ \\n\ \\r\n\ \\ENQ\EOT\r\STX\SOH\ACK\DC2\EOT\165\SOH\b\GS\n\ \\r\n\ \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\165\SOH\RS0\n\ \\r\n\ \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\165\SOH34\n\ \\241\SOH\n\ \\EOT\EOT\r\STX\STX\DC2\EOT\169\SOH\b#\SUB\226\SOH The id of a specific `WORKFLOW_TASK_COMPLETED`,`WORKFLOW_TASK_TIMED_OUT`, `WORKFLOW_TASK_FAILED`, or\n\ \ `WORKFLOW_TASK_STARTED` event to reset to.\n\ \ Note that this option doesn't make sense when used as part of a batch request.\n\ \\n\ \\r\n\ \\ENQ\EOT\r\STX\STX\ENQ\DC2\EOT\169\SOH\b\r\n\ \\r\n\ \\ENQ\EOT\r\STX\STX\SOH\DC2\EOT\169\SOH\SO\RS\n\ \\r\n\ \\ENQ\EOT\r\STX\STX\ETX\DC2\EOT\169\SOH!\"\n\ \\171\STX\n\ \\EOT\EOT\r\STX\ETX\DC2\EOT\175\SOH\b\FS\SUB\156\STX Resets to the first workflow task processed by this build id.\n\ \ If the workflow was not processed by the build id, or the workflow task can't be\n\ \ determined, no reset will be performed.\n\ \ Note that by default, this reset is allowed to be to a prior run in a chain of\n\ \ continue-as-new.\n\ \\n\ \\r\n\ \\ENQ\EOT\r\STX\ETX\ENQ\DC2\EOT\175\SOH\b\SO\n\ \\r\n\ \\ENQ\EOT\r\STX\ETX\SOH\DC2\EOT\175\SOH\SI\ETB\n\ \\r\n\ \\ENQ\EOT\r\STX\ETX\ETX\DC2\EOT\175\SOH\SUB\ESC\n\ \\\\n\ \\EOT\EOT\r\STX\EOT\DC2\EOT\180\SOH\EOTC\SUBN Event types to be reapplied (deprecated)\n\ \ Default: RESET_REAPPLY_TYPE_SIGNAL\n\ \\n\ \\r\n\ \\ENQ\EOT\r\STX\EOT\ACK\DC2\EOT\180\SOH\EOT*\n\ \\r\n\ \\ENQ\EOT\r\STX\EOT\SOH\DC2\EOT\180\SOH+=\n\ \\r\n\ \\ENQ\EOT\r\STX\EOT\ETX\DC2\EOT\180\SOH@B\n\ \\138\SOH\n\ \\EOT\EOT\r\STX\ENQ\DC2\EOT\184\SOH\EOT\US\SUB| If true, limit the reset to only within the current run. (Applies to build_id targets and\n\ \ possibly others in the future.)\n\ \\n\ \\r\n\ \\ENQ\EOT\r\STX\ENQ\ENQ\DC2\EOT\184\SOH\EOT\b\n\ \\r\n\ \\ENQ\EOT\r\STX\ENQ\SOH\DC2\EOT\184\SOH\t\EM\n\ \\r\n\ \\ENQ\EOT\r\STX\ENQ\ETX\DC2\EOT\184\SOH\FS\RS\n\ \/\n\ \\EOT\EOT\r\STX\ACK\DC2\EOT\187\SOH\EOT\\\SUB! Event types not to be reapplied\n\ \\n\ \\r\n\ \\ENQ\EOT\r\STX\ACK\EOT\DC2\EOT\187\SOH\EOT\f\n\ \\r\n\ \\ENQ\EOT\r\STX\ACK\ACK\DC2\EOT\187\SOH\r:\n\ \\r\n\ \\ENQ\EOT\r\STX\ACK\SOH\DC2\EOT\187\SOH;V\n\ \\r\n\ \\ENQ\EOT\r\STX\ACK\ETX\DC2\EOT\187\SOHY[\n\ \a\n\ \\STX\EOT\SO\DC2\ACK\191\SOH\NUL\213\SOH\SOH\SUBS Callback to attach to various events in the system, e.g. workflow run completion.\n\ \\n\ \\v\n\ \\ETX\EOT\SO\SOH\DC2\EOT\191\SOH\b\DLE\n\ \\SO\n\ \\EOT\EOT\SO\ETX\NUL\DC2\ACK\192\SOH\EOT\197\SOH\ENQ\n\ \\r\n\ \\ENQ\EOT\SO\ETX\NUL\SOH\DC2\EOT\192\SOH\f\DC1\n\ \\US\n\ \\ACK\EOT\SO\ETX\NUL\STX\NUL\DC2\EOT\194\SOH\b\ETB\SUB\SI Callback URL.\n\ \\n\ \\SI\n\ \\a\EOT\SO\ETX\NUL\STX\NUL\ENQ\DC2\EOT\194\SOH\b\SO\n\ \\SI\n\ \\a\EOT\SO\ETX\NUL\STX\NUL\SOH\DC2\EOT\194\SOH\SI\DC2\n\ \\SI\n\ \\a\EOT\SO\ETX\NUL\STX\NUL\ETX\DC2\EOT\194\SOH\NAK\SYN\n\ \7\n\ \\ACK\EOT\SO\ETX\NUL\STX\SOH\DC2\EOT\196\SOH\b'\SUB' Header to attach to callback request.\n\ \\n\ \\SI\n\ \\a\EOT\SO\ETX\NUL\STX\SOH\ACK\DC2\EOT\196\SOH\b\ESC\n\ \\SI\n\ \\a\EOT\SO\ETX\NUL\STX\SOH\SOH\DC2\EOT\196\SOH\FS\"\n\ \\SI\n\ \\a\EOT\SO\ETX\NUL\STX\SOH\ETX\DC2\EOT\196\SOH%&\n\ \\222\STX\n\ \\EOT\EOT\SO\ETX\SOH\DC2\ACK\203\SOH\EOT\206\SOH\ENQ\SUB\205\STX Callbacks to be delivered internally within the system.\n\ \ This variant is not settable in the API and will be rejected by the service with an INVALID_ARGUMENT error.\n\ \ The only reason that this is exposed is because callbacks are replicated across clusters via the\n\ \ WorkflowExecutionStarted event, which is defined in the public API.\n\ \\n\ \\r\n\ \\ENQ\EOT\SO\ETX\SOH\SOH\DC2\EOT\203\SOH\f\DC4\n\ \'\n\ \\ACK\EOT\SO\ETX\SOH\STX\NUL\DC2\EOT\205\SOH\b\ETB\SUB\ETB Opaque internal data.\n\ \\n\ \\SI\n\ \\a\EOT\SO\ETX\SOH\STX\NUL\ENQ\DC2\EOT\205\SOH\b\r\n\ \\SI\n\ \\a\EOT\SO\ETX\SOH\STX\NUL\SOH\DC2\EOT\205\SOH\SO\DC2\n\ \\SI\n\ \\a\EOT\SO\ETX\SOH\STX\NUL\ETX\DC2\EOT\205\SOH\NAK\SYN\n\ \B\n\ \\ETX\EOT\SO\t\DC2\EOT\208\SOH\EOT\SI\"5 For a generic callback mechanism to be added later.\n\ \\n\ \\f\n\ \\EOT\EOT\SO\t\NUL\DC2\EOT\208\SOH\r\SO\n\ \\r\n\ \\ENQ\EOT\SO\t\NUL\SOH\DC2\EOT\208\SOH\r\SO\n\ \\r\n\ \\ENQ\EOT\SO\t\NUL\STX\DC2\EOT\208\SOH\r\SO\n\ \\SO\n\ \\EOT\EOT\SO\b\NUL\DC2\ACK\209\SOH\EOT\212\SOH\ENQ\n\ \\r\n\ \\ENQ\EOT\SO\b\NUL\SOH\DC2\EOT\209\SOH\n\ \\DC1\n\ \\f\n\ \\EOT\EOT\SO\STX\NUL\DC2\EOT\210\SOH\b\CAN\n\ \\r\n\ \\ENQ\EOT\SO\STX\NUL\ACK\DC2\EOT\210\SOH\b\r\n\ \\r\n\ \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\210\SOH\SO\DC3\n\ \\r\n\ \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\210\SOH\SYN\ETB\n\ \\f\n\ \\EOT\EOT\SO\STX\SOH\DC2\EOT\211\SOH\b\RS\n\ \\r\n\ \\ENQ\EOT\SO\STX\SOH\ACK\DC2\EOT\211\SOH\b\DLE\n\ \\r\n\ \\ENQ\EOT\SO\STX\SOH\SOH\DC2\EOT\211\SOH\DC1\EM\n\ \\r\n\ \\ENQ\EOT\SO\STX\SOH\ETX\DC2\EOT\211\SOH\FS\GS\n\ \\212\STX\n\ \\STX\EOT\SI\DC2\ACK\219\SOH\NUL\248\SOH\SOH\SUB\197\STX Link can be associated with history events. It might contain information about an external entity\n\ \ related to the history event. For example, workflow A makes a Nexus call that starts workflow B:\n\ \ in this case, a history event in workflow A could contain a Link to the workflow started event in\n\ \ workflow B, and vice-versa.\n\ \\n\ \\v\n\ \\ETX\EOT\SI\SOH\DC2\EOT\219\SOH\b\f\n\ \\SO\n\ \\EOT\EOT\SI\ETX\NUL\DC2\ACK\220\SOH\EOT\235\SOH\ENQ\n\ \\r\n\ \\ENQ\EOT\SI\ETX\NUL\SOH\DC2\EOT\220\SOH\f\EM\n\ \\DLE\n\ \\ACK\EOT\SI\ETX\NUL\ETX\NUL\DC2\ACK\221\SOH\b\224\SOH\t\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\ETX\NUL\SOH\DC2\EOT\221\SOH\DLE\RS\n\ \\DLE\n\ \\b\EOT\SI\ETX\NUL\ETX\NUL\STX\NUL\DC2\EOT\222\SOH\f\US\n\ \\DC1\n\ \\t\EOT\SI\ETX\NUL\ETX\NUL\STX\NUL\ENQ\DC2\EOT\222\SOH\f\DC1\n\ \\DC1\n\ \\t\EOT\SI\ETX\NUL\ETX\NUL\STX\NUL\SOH\DC2\EOT\222\SOH\DC2\SUB\n\ \\DC1\n\ \\t\EOT\SI\ETX\NUL\ETX\NUL\STX\NUL\ETX\DC2\EOT\222\SOH\GS\RS\n\ \\DLE\n\ \\b\EOT\SI\ETX\NUL\ETX\NUL\STX\SOH\DC2\EOT\223\SOH\f;\n\ \\DC1\n\ \\t\EOT\SI\ETX\NUL\ETX\NUL\STX\SOH\ACK\DC2\EOT\223\SOH\f+\n\ \\DC1\n\ \\t\EOT\SI\ETX\NUL\ETX\NUL\STX\SOH\SOH\DC2\EOT\223\SOH,6\n\ \\DC1\n\ \\t\EOT\SI\ETX\NUL\ETX\NUL\STX\SOH\ETX\DC2\EOT\223\SOH9:\n\ \\SO\n\ \\ACK\EOT\SI\ETX\NUL\STX\NUL\DC2\EOT\226\SOH\b\GS\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\NUL\ENQ\DC2\EOT\226\SOH\b\SO\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\NUL\SOH\DC2\EOT\226\SOH\SI\CAN\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\NUL\ETX\DC2\EOT\226\SOH\ESC\FS\n\ \\SO\n\ \\ACK\EOT\SI\ETX\NUL\STX\SOH\DC2\EOT\227\SOH\b\US\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\SOH\ENQ\DC2\EOT\227\SOH\b\SO\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\SOH\SOH\DC2\EOT\227\SOH\SI\SUB\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\SOH\ETX\DC2\EOT\227\SOH\GS\RS\n\ \\SO\n\ \\ACK\EOT\SI\ETX\NUL\STX\STX\DC2\EOT\228\SOH\b\SUB\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\STX\ENQ\DC2\EOT\228\SOH\b\SO\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\STX\SOH\DC2\EOT\228\SOH\SI\NAK\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\STX\ETX\DC2\EOT\228\SOH\CAN\EM\n\ \\155\SOH\n\ \\ACK\EOT\SI\ETX\NUL\b\NUL\DC2\ACK\232\SOH\b\234\SOH\t\SUB\136\SOH Additional information about the workflow event.\n\ \ Eg: the caller workflow can send the history event details that made the Nexus call.\n\ \\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\b\NUL\SOH\DC2\EOT\232\SOH\SO\ETB\n\ \\SO\n\ \\ACK\EOT\SI\ETX\NUL\STX\ETX\DC2\EOT\233\SOH\f+\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\ETX\ACK\DC2\EOT\233\SOH\f\SUB\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\ETX\SOH\DC2\EOT\233\SOH\ESC$\n\ \\SI\n\ \\a\EOT\SI\ETX\NUL\STX\ETX\ETX\DC2\EOT\233\SOH'*\n\ \\249\SOH\n\ \\EOT\EOT\SI\ETX\SOH\DC2\ACK\240\SOH\EOT\242\SOH\ENQ\SUB\232\SOH A link to a built-in batch job.\n\ \ Batch jobs can be used to perform operations on a set of workflows (e.g. terminate, signal, cancel, etc).\n\ \ This link can be put on workflow history events generated by actions taken by a batch job.\n\ \\n\ \\r\n\ \\ENQ\EOT\SI\ETX\SOH\SOH\DC2\EOT\240\SOH\f\DC4\n\ \\SO\n\ \\ACK\EOT\SI\ETX\SOH\STX\NUL\DC2\EOT\241\SOH\b\SUB\n\ \\SI\n\ \\a\EOT\SI\ETX\SOH\STX\NUL\ENQ\DC2\EOT\241\SOH\b\SO\n\ \\SI\n\ \\a\EOT\SI\ETX\SOH\STX\NUL\SOH\DC2\EOT\241\SOH\SI\NAK\n\ \\SI\n\ \\a\EOT\SI\ETX\SOH\STX\NUL\ETX\DC2\EOT\241\SOH\CAN\EM\n\ \\SO\n\ \\EOT\EOT\SI\b\NUL\DC2\ACK\244\SOH\EOT\247\SOH\ENQ\n\ \\r\n\ \\ENQ\EOT\SI\b\NUL\SOH\DC2\EOT\244\SOH\n\ \\DC1\n\ \\f\n\ \\EOT\EOT\SI\STX\NUL\DC2\EOT\245\SOH\b)\n\ \\r\n\ \\ENQ\EOT\SI\STX\NUL\ACK\DC2\EOT\245\SOH\b\NAK\n\ \\r\n\ \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\245\SOH\SYN$\n\ \\r\n\ \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\245\SOH'(\n\ \\f\n\ \\EOT\EOT\SI\STX\SOH\DC2\EOT\246\SOH\b\US\n\ \\r\n\ \\ENQ\EOT\SI\STX\SOH\ACK\DC2\EOT\246\SOH\b\DLE\n\ \\r\n\ \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\246\SOH\DC1\SUB\n\ \\r\n\ \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\246\SOH\GS\RS\n\ \\161\b\n\ \\STX\EOT\DLE\DC2\ACK\141\STX\NUL\153\STX\SOH\SUB\146\b Priority contains metadata that controls relative ordering of task processing\n\ \ when tasks are backlogged in a queue. Initially, Priority will be used in\n\ \ activity and workflow task queues, which are typically where backlogs exist.\n\ \ Other queues in the server (such as transfer and timer queues) and rate\n\ \ limiting decisions do not use Priority, but may in the future.\n\ \\n\ \ Priority is attached to workflows and activities. Activities and child\n\ \ workflows inherit Priority from the workflow that created them, but may\n\ \ override fields when they are started or modified. For each field of a\n\ \ Priority on an activity/workflow, not present or equal to zero/empty string\n\ \ means to inherit the value from the calling workflow, or if there is no\n\ \ calling workflow, then use the default (documented below).\n\ \\n\ \ Despite being named \"Priority\", this message will also contains fields that\n\ \ control \"fairness\" mechanisms.\n\ \\n\ \ The overall semantics of Priority are:\n\ \ 1. First, consider \"priority_key\": lower number goes first.\n\ \ (more will be added here later)\n\ \\n\ \\v\n\ \\ETX\EOT\DLE\SOH\DC2\EOT\141\STX\b\DLE\n\ \\211\ETX\n\ \\EOT\EOT\DLE\STX\NUL\DC2\EOT\152\STX\EOT\ESC\SUB\196\ETX Priority key is a positive integer from 1 to n, where smaller integers\n\ \ correspond to higher priorities (tasks run sooner). In general, tasks in\n\ \ a queue should be processed in close to priority order, although small\n\ \ deviations are possible.\n\ \\n\ \ The maximum priority value (minimum priority) is determined by server\n\ \ configuration, and defaults to 5.\n\ \\n\ \ The default priority is (min+max)/2. With the default max of 5 and min of\n\ \ 1, that comes out to 3.\n\ \\n\ \\r\n\ \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\152\STX\EOT\t\n\ \\r\n\ \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\152\STX\n\ \\SYN\n\ \\r\n\ \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\152\STX\EM\SUBb\ACKproto3"