{-# OPTIONS_GHC -Wno-prepositive-qualified-module -Wno-identities #-}
{-# 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.OrcaLoadReport (
OrcaLoadReport(), OrcaLoadReport'NamedMetricsEntry(),
OrcaLoadReport'RequestCostEntry(),
OrcaLoadReport'UtilizationEntry()
) 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
data OrcaLoadReport
= OrcaLoadReport'_constructor {OrcaLoadReport -> Double
_OrcaLoadReport'cpuUtilization :: !Prelude.Double,
OrcaLoadReport -> Double
_OrcaLoadReport'memUtilization :: !Prelude.Double,
OrcaLoadReport -> Word64
_OrcaLoadReport'rps :: !Data.Word.Word64,
OrcaLoadReport -> Map Text Double
_OrcaLoadReport'requestCost :: !(Data.Map.Map Data.Text.Text Prelude.Double),
OrcaLoadReport -> Map Text Double
_OrcaLoadReport'utilization :: !(Data.Map.Map Data.Text.Text Prelude.Double),
OrcaLoadReport -> Double
_OrcaLoadReport'rpsFractional :: !Prelude.Double,
OrcaLoadReport -> Double
_OrcaLoadReport'eps :: !Prelude.Double,
OrcaLoadReport -> Map Text Double
_OrcaLoadReport'namedMetrics :: !(Data.Map.Map Data.Text.Text Prelude.Double),
OrcaLoadReport -> Double
_OrcaLoadReport'applicationUtilization :: !Prelude.Double,
OrcaLoadReport -> FieldSet
_OrcaLoadReport'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (OrcaLoadReport -> OrcaLoadReport -> Bool
(OrcaLoadReport -> OrcaLoadReport -> Bool)
-> (OrcaLoadReport -> OrcaLoadReport -> Bool) -> Eq OrcaLoadReport
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OrcaLoadReport -> OrcaLoadReport -> Bool
== :: OrcaLoadReport -> OrcaLoadReport -> Bool
$c/= :: OrcaLoadReport -> OrcaLoadReport -> Bool
/= :: OrcaLoadReport -> OrcaLoadReport -> Bool
Prelude.Eq, Eq OrcaLoadReport
Eq OrcaLoadReport =>
(OrcaLoadReport -> OrcaLoadReport -> Ordering)
-> (OrcaLoadReport -> OrcaLoadReport -> Bool)
-> (OrcaLoadReport -> OrcaLoadReport -> Bool)
-> (OrcaLoadReport -> OrcaLoadReport -> Bool)
-> (OrcaLoadReport -> OrcaLoadReport -> Bool)
-> (OrcaLoadReport -> OrcaLoadReport -> OrcaLoadReport)
-> (OrcaLoadReport -> OrcaLoadReport -> OrcaLoadReport)
-> Ord OrcaLoadReport
OrcaLoadReport -> OrcaLoadReport -> Bool
OrcaLoadReport -> OrcaLoadReport -> Ordering
OrcaLoadReport -> OrcaLoadReport -> OrcaLoadReport
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: OrcaLoadReport -> OrcaLoadReport -> Ordering
compare :: OrcaLoadReport -> OrcaLoadReport -> Ordering
$c< :: OrcaLoadReport -> OrcaLoadReport -> Bool
< :: OrcaLoadReport -> OrcaLoadReport -> Bool
$c<= :: OrcaLoadReport -> OrcaLoadReport -> Bool
<= :: OrcaLoadReport -> OrcaLoadReport -> Bool
$c> :: OrcaLoadReport -> OrcaLoadReport -> Bool
> :: OrcaLoadReport -> OrcaLoadReport -> Bool
$c>= :: OrcaLoadReport -> OrcaLoadReport -> Bool
>= :: OrcaLoadReport -> OrcaLoadReport -> Bool
$cmax :: OrcaLoadReport -> OrcaLoadReport -> OrcaLoadReport
max :: OrcaLoadReport -> OrcaLoadReport -> OrcaLoadReport
$cmin :: OrcaLoadReport -> OrcaLoadReport -> OrcaLoadReport
min :: OrcaLoadReport -> OrcaLoadReport -> OrcaLoadReport
Prelude.Ord)
instance Prelude.Show OrcaLoadReport where
showsPrec :: Int -> OrcaLoadReport -> ShowS
showsPrec Int
_ OrcaLoadReport
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(OrcaLoadReport -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort OrcaLoadReport
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField OrcaLoadReport "cpuUtilization" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cpuUtilization"
-> (Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport
fieldOf Proxy# "cpuUtilization"
_
= ((Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Double)
-> (OrcaLoadReport -> Double -> OrcaLoadReport)
-> Lens OrcaLoadReport OrcaLoadReport Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Double
_OrcaLoadReport'cpuUtilization
(\ OrcaLoadReport
x__ Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'cpuUtilization = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "memUtilization" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memUtilization"
-> (Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport
fieldOf Proxy# "memUtilization"
_
= ((Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Double)
-> (OrcaLoadReport -> Double -> OrcaLoadReport)
-> Lens OrcaLoadReport OrcaLoadReport Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Double
_OrcaLoadReport'memUtilization
(\ OrcaLoadReport
x__ Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'memUtilization = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "rps" Data.Word.Word64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rps"
-> (Word64 -> f Word64) -> OrcaLoadReport -> f OrcaLoadReport
fieldOf Proxy# "rps"
_
= ((Word64 -> f Word64) -> OrcaLoadReport -> f OrcaLoadReport)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Word64)
-> (OrcaLoadReport -> Word64 -> OrcaLoadReport)
-> Lens OrcaLoadReport OrcaLoadReport Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Word64
_OrcaLoadReport'rps (\ OrcaLoadReport
x__ Word64
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'rps = y__}))
(Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "requestCost" (Data.Map.Map Data.Text.Text Prelude.Double) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestCost"
-> (Map Text Double -> f (Map Text Double))
-> OrcaLoadReport
-> f OrcaLoadReport
fieldOf Proxy# "requestCost"
_
= ((Map Text Double -> f (Map Text Double))
-> OrcaLoadReport -> f OrcaLoadReport)
-> ((Map Text Double -> f (Map Text Double))
-> Map Text Double -> f (Map Text Double))
-> (Map Text Double -> f (Map Text Double))
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Map Text Double)
-> (OrcaLoadReport -> Map Text Double -> OrcaLoadReport)
-> Lens
OrcaLoadReport OrcaLoadReport (Map Text Double) (Map Text Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Map Text Double
_OrcaLoadReport'requestCost
(\ OrcaLoadReport
x__ Map Text Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'requestCost = y__}))
(Map Text Double -> f (Map Text Double))
-> Map Text Double -> f (Map Text Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "utilization" (Data.Map.Map Data.Text.Text Prelude.Double) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "utilization"
-> (Map Text Double -> f (Map Text Double))
-> OrcaLoadReport
-> f OrcaLoadReport
fieldOf Proxy# "utilization"
_
= ((Map Text Double -> f (Map Text Double))
-> OrcaLoadReport -> f OrcaLoadReport)
-> ((Map Text Double -> f (Map Text Double))
-> Map Text Double -> f (Map Text Double))
-> (Map Text Double -> f (Map Text Double))
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Map Text Double)
-> (OrcaLoadReport -> Map Text Double -> OrcaLoadReport)
-> Lens
OrcaLoadReport OrcaLoadReport (Map Text Double) (Map Text Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Map Text Double
_OrcaLoadReport'utilization
(\ OrcaLoadReport
x__ Map Text Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'utilization = y__}))
(Map Text Double -> f (Map Text Double))
-> Map Text Double -> f (Map Text Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "rpsFractional" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rpsFractional"
-> (Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport
fieldOf Proxy# "rpsFractional"
_
= ((Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Double)
-> (OrcaLoadReport -> Double -> OrcaLoadReport)
-> Lens OrcaLoadReport OrcaLoadReport Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Double
_OrcaLoadReport'rpsFractional
(\ OrcaLoadReport
x__ Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'rpsFractional = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "eps" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "eps"
-> (Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport
fieldOf Proxy# "eps"
_
= ((Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Double)
-> (OrcaLoadReport -> Double -> OrcaLoadReport)
-> Lens OrcaLoadReport OrcaLoadReport Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Double
_OrcaLoadReport'eps (\ OrcaLoadReport
x__ Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'eps = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "namedMetrics" (Data.Map.Map Data.Text.Text Prelude.Double) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namedMetrics"
-> (Map Text Double -> f (Map Text Double))
-> OrcaLoadReport
-> f OrcaLoadReport
fieldOf Proxy# "namedMetrics"
_
= ((Map Text Double -> f (Map Text Double))
-> OrcaLoadReport -> f OrcaLoadReport)
-> ((Map Text Double -> f (Map Text Double))
-> Map Text Double -> f (Map Text Double))
-> (Map Text Double -> f (Map Text Double))
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Map Text Double)
-> (OrcaLoadReport -> Map Text Double -> OrcaLoadReport)
-> Lens
OrcaLoadReport OrcaLoadReport (Map Text Double) (Map Text Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Map Text Double
_OrcaLoadReport'namedMetrics
(\ OrcaLoadReport
x__ Map Text Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'namedMetrics = y__}))
(Map Text Double -> f (Map Text Double))
-> Map Text Double -> f (Map Text Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport "applicationUtilization" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "applicationUtilization"
-> (Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport
fieldOf Proxy# "applicationUtilization"
_
= ((Double -> f Double) -> OrcaLoadReport -> f OrcaLoadReport)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport
-> f OrcaLoadReport
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport -> Double)
-> (OrcaLoadReport -> Double -> OrcaLoadReport)
-> Lens OrcaLoadReport OrcaLoadReport Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> Double
_OrcaLoadReport'applicationUtilization
(\ OrcaLoadReport
x__ Double
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'applicationUtilization = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message OrcaLoadReport where
messageName :: Proxy OrcaLoadReport -> Text
messageName Proxy OrcaLoadReport
_ = String -> Text
Data.Text.pack String
"xds.data.orca.v3.OrcaLoadReport"
packedMessageDescriptor :: Proxy OrcaLoadReport -> ByteString
packedMessageDescriptor Proxy OrcaLoadReport
_
= ByteString
"\n\
\\SOOrcaLoadReport\DC2'\n\
\\SIcpu_utilization\CAN\SOH \SOH(\SOHR\SOcpuUtilization\DC2'\n\
\\SImem_utilization\CAN\STX \SOH(\SOHR\SOmemUtilization\DC2\DC4\n\
\\ETXrps\CAN\ETX \SOH(\EOTR\ETXrpsB\STX\CAN\SOH\DC2T\n\
\\frequest_cost\CAN\EOT \ETX(\v21.xds.data.orca.v3.OrcaLoadReport.RequestCostEntryR\vrequestCost\DC2S\n\
\\vutilization\CAN\ENQ \ETX(\v21.xds.data.orca.v3.OrcaLoadReport.UtilizationEntryR\vutilization\DC2%\n\
\\SOrps_fractional\CAN\ACK \SOH(\SOHR\rrpsFractional\DC2\DLE\n\
\\ETXeps\CAN\a \SOH(\SOHR\ETXeps\DC2W\n\
\\rnamed_metrics\CAN\b \ETX(\v22.xds.data.orca.v3.OrcaLoadReport.NamedMetricsEntryR\fnamedMetrics\DC27\n\
\\ETBapplication_utilization\CAN\t \SOH(\SOHR\SYNapplicationUtilization\SUB>\n\
\\DLERequestCostEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH\SUB>\n\
\\DLEUtilizationEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH\SUB?\n\
\\DC1NamedMetricsEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH"
packedFileDescriptor :: Proxy OrcaLoadReport -> ByteString
packedFileDescriptor Proxy OrcaLoadReport
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor OrcaLoadReport)
fieldsByTag
= let
cpuUtilization__field_descriptor :: FieldDescriptor OrcaLoadReport
cpuUtilization__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport Double
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"cpu_utilization"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens OrcaLoadReport OrcaLoadReport Double Double
-> FieldAccessor OrcaLoadReport Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cpuUtilization")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
memUtilization__field_descriptor :: FieldDescriptor OrcaLoadReport
memUtilization__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport Double
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"mem_utilization"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens OrcaLoadReport OrcaLoadReport Double Double
-> FieldAccessor OrcaLoadReport Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"memUtilization")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
rps__field_descriptor :: FieldDescriptor OrcaLoadReport
rps__field_descriptor
= String
-> FieldTypeDescriptor Word64
-> FieldAccessor OrcaLoadReport Word64
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"rps"
(ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.UInt64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
(WireDefault Word64
-> Lens OrcaLoadReport OrcaLoadReport Word64 Word64
-> FieldAccessor OrcaLoadReport Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"rps")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
requestCost__field_descriptor :: FieldDescriptor OrcaLoadReport
requestCost__field_descriptor
= String
-> FieldTypeDescriptor OrcaLoadReport'RequestCostEntry
-> FieldAccessor OrcaLoadReport OrcaLoadReport'RequestCostEntry
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"request_cost"
(MessageOrGroup
-> FieldTypeDescriptor OrcaLoadReport'RequestCostEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OrcaLoadReport'RequestCostEntry)
(Lens' OrcaLoadReport'RequestCostEntry Text
-> Lens' OrcaLoadReport'RequestCostEntry Double
-> Lens
OrcaLoadReport OrcaLoadReport (Map Text Double) (Map Text Double)
-> FieldAccessor OrcaLoadReport OrcaLoadReport'RequestCostEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestCost")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
utilization__field_descriptor :: FieldDescriptor OrcaLoadReport
utilization__field_descriptor
= String
-> FieldTypeDescriptor OrcaLoadReport'UtilizationEntry
-> FieldAccessor OrcaLoadReport OrcaLoadReport'UtilizationEntry
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"utilization"
(MessageOrGroup
-> FieldTypeDescriptor OrcaLoadReport'UtilizationEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OrcaLoadReport'UtilizationEntry)
(Lens' OrcaLoadReport'UtilizationEntry Text
-> Lens' OrcaLoadReport'UtilizationEntry Double
-> Lens
OrcaLoadReport OrcaLoadReport (Map Text Double) (Map Text Double)
-> FieldAccessor OrcaLoadReport OrcaLoadReport'UtilizationEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"utilization")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
rpsFractional__field_descriptor :: FieldDescriptor OrcaLoadReport
rpsFractional__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport Double
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"rps_fractional"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens OrcaLoadReport OrcaLoadReport Double Double
-> FieldAccessor OrcaLoadReport Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"rpsFractional")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
eps__field_descriptor :: FieldDescriptor OrcaLoadReport
eps__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport Double
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"eps"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens OrcaLoadReport OrcaLoadReport Double Double
-> FieldAccessor OrcaLoadReport Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"eps")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
namedMetrics__field_descriptor :: FieldDescriptor OrcaLoadReport
namedMetrics__field_descriptor
= String
-> FieldTypeDescriptor OrcaLoadReport'NamedMetricsEntry
-> FieldAccessor OrcaLoadReport OrcaLoadReport'NamedMetricsEntry
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"named_metrics"
(MessageOrGroup
-> FieldTypeDescriptor OrcaLoadReport'NamedMetricsEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OrcaLoadReport'NamedMetricsEntry)
(Lens' OrcaLoadReport'NamedMetricsEntry Text
-> Lens' OrcaLoadReport'NamedMetricsEntry Double
-> Lens
OrcaLoadReport OrcaLoadReport (Map Text Double) (Map Text Double)
-> FieldAccessor OrcaLoadReport OrcaLoadReport'NamedMetricsEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"namedMetrics")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
applicationUtilization__field_descriptor :: FieldDescriptor OrcaLoadReport
applicationUtilization__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport Double
-> FieldDescriptor OrcaLoadReport
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"application_utilization"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens OrcaLoadReport OrcaLoadReport Double Double
-> FieldAccessor OrcaLoadReport Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"applicationUtilization")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport
in
[(Tag, FieldDescriptor OrcaLoadReport)]
-> Map Tag (FieldDescriptor OrcaLoadReport)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor OrcaLoadReport
cpuUtilization__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor OrcaLoadReport
memUtilization__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor OrcaLoadReport
rps__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor OrcaLoadReport
requestCost__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor OrcaLoadReport
utilization__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor OrcaLoadReport
rpsFractional__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor OrcaLoadReport
eps__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor OrcaLoadReport
namedMetrics__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor OrcaLoadReport
applicationUtilization__field_descriptor)]
unknownFields :: Lens' OrcaLoadReport FieldSet
unknownFields
= (OrcaLoadReport -> FieldSet)
-> (OrcaLoadReport -> FieldSet -> OrcaLoadReport)
-> Lens' OrcaLoadReport FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport -> FieldSet
_OrcaLoadReport'_unknownFields
(\ OrcaLoadReport
x__ FieldSet
y__ -> OrcaLoadReport
x__ {_OrcaLoadReport'_unknownFields = y__})
defMessage :: OrcaLoadReport
defMessage
= OrcaLoadReport'_constructor
{_OrcaLoadReport'cpuUtilization :: Double
_OrcaLoadReport'cpuUtilization = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'memUtilization :: Double
_OrcaLoadReport'memUtilization = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'rps :: Word64
_OrcaLoadReport'rps = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'requestCost :: Map Text Double
_OrcaLoadReport'requestCost = Map Text Double
forall k a. Map k a
Data.Map.empty,
_OrcaLoadReport'utilization :: Map Text Double
_OrcaLoadReport'utilization = Map Text Double
forall k a. Map k a
Data.Map.empty,
_OrcaLoadReport'rpsFractional :: Double
_OrcaLoadReport'rpsFractional = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'eps :: Double
_OrcaLoadReport'eps = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'namedMetrics :: Map Text Double
_OrcaLoadReport'namedMetrics = Map Text Double
forall k a. Map k a
Data.Map.empty,
_OrcaLoadReport'applicationUtilization :: Double
_OrcaLoadReport'applicationUtilization = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'_unknownFields :: FieldSet
_OrcaLoadReport'_unknownFields = []}
parseMessage :: Parser OrcaLoadReport
parseMessage
= let
loop ::
OrcaLoadReport
-> Data.ProtoLens.Encoding.Bytes.Parser OrcaLoadReport
loop :: OrcaLoadReport -> Parser OrcaLoadReport
loop OrcaLoadReport
x
= do end <- Parser Bool
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 (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
9 -> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"cpu_utilization"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"cpuUtilization") y x)
Word64
17
-> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"mem_utilization"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"memUtilization") y x)
Word64
24
-> do y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt String
"rps"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"rps") y x)
Word64
34
-> do !(entry :: OrcaLoadReport'RequestCostEntry) <- Parser OrcaLoadReport'RequestCostEntry
-> String -> Parser OrcaLoadReport'RequestCostEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral
len)
Data.ProtoLens.parseMessage)
String
"request_cost"
(let
key = FoldLike
Text
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
Text
Text
-> OrcaLoadReport'RequestCostEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") OrcaLoadReport'RequestCostEntry
entry
value
= FoldLike
Double
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
Double
Double
-> OrcaLoadReport'RequestCostEntry -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") OrcaLoadReport'RequestCostEntry
entry
in
loop
(Lens.Family2.over
(Data.ProtoLens.Field.field @"requestCost")
(\ !Map Text Double
t -> Text -> Double -> Map Text Double -> Map Text Double
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Double
value Map Text Double
t) x))
Word64
42
-> do !(entry :: OrcaLoadReport'UtilizationEntry) <- Parser OrcaLoadReport'UtilizationEntry
-> String -> Parser OrcaLoadReport'UtilizationEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral
len)
Data.ProtoLens.parseMessage)
String
"utilization"
(let
key = FoldLike
Text
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
Text
Text
-> OrcaLoadReport'UtilizationEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") OrcaLoadReport'UtilizationEntry
entry
value
= FoldLike
Double
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
Double
Double
-> OrcaLoadReport'UtilizationEntry -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") OrcaLoadReport'UtilizationEntry
entry
in
loop
(Lens.Family2.over
(Data.ProtoLens.Field.field @"utilization")
(\ !Map Text Double
t -> Text -> Double -> Map Text Double -> Map Text Double
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Double
value Map Text Double
t) x))
Word64
49
-> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"rps_fractional"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"rpsFractional") y x)
Word64
57
-> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"eps"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"eps") y x)
Word64
66
-> do !(entry :: OrcaLoadReport'NamedMetricsEntry) <- Parser OrcaLoadReport'NamedMetricsEntry
-> String -> Parser OrcaLoadReport'NamedMetricsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral
len)
Data.ProtoLens.parseMessage)
String
"named_metrics"
(let
key = FoldLike
Text
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
Text
Text
-> OrcaLoadReport'NamedMetricsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") OrcaLoadReport'NamedMetricsEntry
entry
value
= FoldLike
Double
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
Double
Double
-> OrcaLoadReport'NamedMetricsEntry -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") OrcaLoadReport'NamedMetricsEntry
entry
in
loop
(Lens.Family2.over
(Data.ProtoLens.Field.field @"namedMetrics")
(\ !Map Text Double
t -> Text -> Double -> Map Text Double -> Map Text Double
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Double
value Map Text Double
t) x))
Word64
73
-> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"application_utilization"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"applicationUtilization") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser OrcaLoadReport -> String -> Parser OrcaLoadReport
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do OrcaLoadReport -> Parser OrcaLoadReport
loop OrcaLoadReport
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"OrcaLoadReport"
buildMessage :: OrcaLoadReport -> Builder
buildMessage
= \ OrcaLoadReport
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Double
_v
= FoldLike Double OrcaLoadReport OrcaLoadReport Double Double
-> OrcaLoadReport -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cpuUtilization") OrcaLoadReport
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
9)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Double
_v
= FoldLike Double OrcaLoadReport OrcaLoadReport Double Double
-> OrcaLoadReport -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"memUtilization") OrcaLoadReport
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
17)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let _v :: Word64
_v = FoldLike Word64 OrcaLoadReport OrcaLoadReport Word64 Word64
-> OrcaLoadReport -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"rps") OrcaLoadReport
_x
in
if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
(((Text, Double) -> Builder) -> [(Text, Double)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
(\ (Text, Double)
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (OrcaLoadReport'RequestCostEntry -> ByteString)
-> OrcaLoadReport'RequestCostEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
OrcaLoadReport'RequestCostEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
(Setter
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
Text
Text
-> Text
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") ((Text, Double) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Double)
_v)
(Setter
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
Double
Double
-> Double
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") ((Text, Double) -> Double
forall a b. (a, b) -> b
Prelude.snd (Text, Double)
_v)
(OrcaLoadReport'RequestCostEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
OrcaLoadReport'RequestCostEntry)))))
(Map Text Double -> [(Text, Double)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
(FoldLike
(Map Text Double)
OrcaLoadReport
OrcaLoadReport
(Map Text Double)
(Map Text Double)
-> OrcaLoadReport -> Map Text Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestCost") OrcaLoadReport
_x))))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
(((Text, Double) -> Builder) -> [(Text, Double)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
(\ (Text, Double)
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
((ByteString -> Builder)
-> (OrcaLoadReport'UtilizationEntry -> ByteString)
-> OrcaLoadReport'UtilizationEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
OrcaLoadReport'UtilizationEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
(Setter
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
Text
Text
-> Text
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") ((Text, Double) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Double)
_v)
(Setter
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
Double
Double
-> Double
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
((Text, Double) -> Double
forall a b. (a, b) -> b
Prelude.snd (Text, Double)
_v)
(OrcaLoadReport'UtilizationEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
OrcaLoadReport'UtilizationEntry)))))
(Map Text Double -> [(Text, Double)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
(FoldLike
(Map Text Double)
OrcaLoadReport
OrcaLoadReport
(Map Text Double)
(Map Text Double)
-> OrcaLoadReport -> Map Text Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"utilization") OrcaLoadReport
_x))))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Double
_v
= FoldLike Double OrcaLoadReport OrcaLoadReport Double Double
-> OrcaLoadReport -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"rpsFractional") OrcaLoadReport
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
49)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let _v :: Double
_v = FoldLike Double OrcaLoadReport OrcaLoadReport Double Double
-> OrcaLoadReport -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"eps") OrcaLoadReport
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
57)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
(((Text, Double) -> Builder) -> [(Text, Double)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
(\ (Text, Double)
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
((ByteString -> Builder)
-> (OrcaLoadReport'NamedMetricsEntry -> ByteString)
-> OrcaLoadReport'NamedMetricsEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
OrcaLoadReport'NamedMetricsEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
(Setter
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
Text
Text
-> Text
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
((Text, Double) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Double)
_v)
(Setter
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
Double
Double
-> Double
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
((Text, Double) -> Double
forall a b. (a, b) -> b
Prelude.snd (Text, Double)
_v)
(OrcaLoadReport'NamedMetricsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
OrcaLoadReport'NamedMetricsEntry)))))
(Map Text Double -> [(Text, Double)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
(FoldLike
(Map Text Double)
OrcaLoadReport
OrcaLoadReport
(Map Text Double)
(Map Text Double)
-> OrcaLoadReport -> Map Text Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"namedMetrics") OrcaLoadReport
_x))))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Double
_v
= FoldLike Double OrcaLoadReport OrcaLoadReport Double Double
-> OrcaLoadReport -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"applicationUtilization")
OrcaLoadReport
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
73)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet OrcaLoadReport OrcaLoadReport FieldSet FieldSet
-> OrcaLoadReport -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet OrcaLoadReport OrcaLoadReport FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' OrcaLoadReport FieldSet
Data.ProtoLens.unknownFields OrcaLoadReport
_x))))))))))
instance Control.DeepSeq.NFData OrcaLoadReport where
rnf :: OrcaLoadReport -> ()
rnf
= \ OrcaLoadReport
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> FieldSet
_OrcaLoadReport'_unknownFields OrcaLoadReport
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Double
_OrcaLoadReport'cpuUtilization OrcaLoadReport
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Double
_OrcaLoadReport'memUtilization OrcaLoadReport
x__)
(Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Word64
_OrcaLoadReport'rps OrcaLoadReport
x__)
(Map Text Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Map Text Double
_OrcaLoadReport'requestCost OrcaLoadReport
x__)
(Map Text Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Map Text Double
_OrcaLoadReport'utilization OrcaLoadReport
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Double
_OrcaLoadReport'rpsFractional OrcaLoadReport
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Double
_OrcaLoadReport'eps OrcaLoadReport
x__)
(Map Text Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Map Text Double
_OrcaLoadReport'namedMetrics OrcaLoadReport
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport -> Double
_OrcaLoadReport'applicationUtilization OrcaLoadReport
x__) ())))))))))
data OrcaLoadReport'NamedMetricsEntry
= OrcaLoadReport'NamedMetricsEntry'_constructor {OrcaLoadReport'NamedMetricsEntry -> Text
_OrcaLoadReport'NamedMetricsEntry'key :: !Data.Text.Text,
OrcaLoadReport'NamedMetricsEntry -> Double
_OrcaLoadReport'NamedMetricsEntry'value :: !Prelude.Double,
OrcaLoadReport'NamedMetricsEntry -> FieldSet
_OrcaLoadReport'NamedMetricsEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
(OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool)
-> (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool)
-> Eq OrcaLoadReport'NamedMetricsEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
== :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
$c/= :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
/= :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
Prelude.Eq, Eq OrcaLoadReport'NamedMetricsEntry
Eq OrcaLoadReport'NamedMetricsEntry =>
(OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Ordering)
-> (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool)
-> (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool)
-> (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool)
-> (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool)
-> (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry)
-> (OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry)
-> Ord OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Ordering
OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Ordering
compare :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Ordering
$c< :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
< :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
$c<= :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
<= :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
$c> :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
> :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
$c>= :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
>= :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry -> Bool
$cmax :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
max :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
$cmin :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
min :: OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
-> OrcaLoadReport'NamedMetricsEntry
Prelude.Ord)
instance Prelude.Show OrcaLoadReport'NamedMetricsEntry where
showsPrec :: Int -> OrcaLoadReport'NamedMetricsEntry -> ShowS
showsPrec Int
_ OrcaLoadReport'NamedMetricsEntry
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(OrcaLoadReport'NamedMetricsEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort OrcaLoadReport'NamedMetricsEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField OrcaLoadReport'NamedMetricsEntry "key" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> OrcaLoadReport'NamedMetricsEntry
-> f OrcaLoadReport'NamedMetricsEntry
fieldOf Proxy# "key"
_
= ((Text -> f Text)
-> OrcaLoadReport'NamedMetricsEntry
-> f OrcaLoadReport'NamedMetricsEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> OrcaLoadReport'NamedMetricsEntry
-> f OrcaLoadReport'NamedMetricsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport'NamedMetricsEntry -> Text)
-> (OrcaLoadReport'NamedMetricsEntry
-> Text -> OrcaLoadReport'NamedMetricsEntry)
-> Lens' OrcaLoadReport'NamedMetricsEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'NamedMetricsEntry -> Text
_OrcaLoadReport'NamedMetricsEntry'key
(\ OrcaLoadReport'NamedMetricsEntry
x__ Text
y__ -> OrcaLoadReport'NamedMetricsEntry
x__ {_OrcaLoadReport'NamedMetricsEntry'key = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport'NamedMetricsEntry "value" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Double -> f Double)
-> OrcaLoadReport'NamedMetricsEntry
-> f OrcaLoadReport'NamedMetricsEntry
fieldOf Proxy# "value"
_
= ((Double -> f Double)
-> OrcaLoadReport'NamedMetricsEntry
-> f OrcaLoadReport'NamedMetricsEntry)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport'NamedMetricsEntry
-> f OrcaLoadReport'NamedMetricsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport'NamedMetricsEntry -> Double)
-> (OrcaLoadReport'NamedMetricsEntry
-> Double -> OrcaLoadReport'NamedMetricsEntry)
-> Lens' OrcaLoadReport'NamedMetricsEntry Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'NamedMetricsEntry -> Double
_OrcaLoadReport'NamedMetricsEntry'value
(\ OrcaLoadReport'NamedMetricsEntry
x__ Double
y__ -> OrcaLoadReport'NamedMetricsEntry
x__ {_OrcaLoadReport'NamedMetricsEntry'value = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message OrcaLoadReport'NamedMetricsEntry where
messageName :: Proxy OrcaLoadReport'NamedMetricsEntry -> Text
messageName Proxy OrcaLoadReport'NamedMetricsEntry
_
= String -> Text
Data.Text.pack
String
"xds.data.orca.v3.OrcaLoadReport.NamedMetricsEntry"
packedMessageDescriptor :: Proxy OrcaLoadReport'NamedMetricsEntry -> ByteString
packedMessageDescriptor Proxy OrcaLoadReport'NamedMetricsEntry
_
= ByteString
"\n\
\\DC1NamedMetricsEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH"
packedFileDescriptor :: Proxy OrcaLoadReport'NamedMetricsEntry -> ByteString
packedFileDescriptor Proxy OrcaLoadReport'NamedMetricsEntry
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor OrcaLoadReport'NamedMetricsEntry)
fieldsByTag
= let
key__field_descriptor :: FieldDescriptor OrcaLoadReport'NamedMetricsEntry
key__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor OrcaLoadReport'NamedMetricsEntry Text
-> FieldDescriptor OrcaLoadReport'NamedMetricsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"key"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens' OrcaLoadReport'NamedMetricsEntry Text
-> FieldAccessor OrcaLoadReport'NamedMetricsEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport'NamedMetricsEntry
value__field_descriptor :: FieldDescriptor OrcaLoadReport'NamedMetricsEntry
value__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport'NamedMetricsEntry Double
-> FieldDescriptor OrcaLoadReport'NamedMetricsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"value"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens' OrcaLoadReport'NamedMetricsEntry Double
-> FieldAccessor OrcaLoadReport'NamedMetricsEntry Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport'NamedMetricsEntry
in
[(Tag, FieldDescriptor OrcaLoadReport'NamedMetricsEntry)]
-> Map Tag (FieldDescriptor OrcaLoadReport'NamedMetricsEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor OrcaLoadReport'NamedMetricsEntry
key__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor OrcaLoadReport'NamedMetricsEntry
value__field_descriptor)]
unknownFields :: Lens' OrcaLoadReport'NamedMetricsEntry FieldSet
unknownFields
= (OrcaLoadReport'NamedMetricsEntry -> FieldSet)
-> (OrcaLoadReport'NamedMetricsEntry
-> FieldSet -> OrcaLoadReport'NamedMetricsEntry)
-> Lens' OrcaLoadReport'NamedMetricsEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'NamedMetricsEntry -> FieldSet
_OrcaLoadReport'NamedMetricsEntry'_unknownFields
(\ OrcaLoadReport'NamedMetricsEntry
x__ FieldSet
y__
-> OrcaLoadReport'NamedMetricsEntry
x__ {_OrcaLoadReport'NamedMetricsEntry'_unknownFields = y__})
defMessage :: OrcaLoadReport'NamedMetricsEntry
defMessage
= OrcaLoadReport'NamedMetricsEntry'_constructor
{_OrcaLoadReport'NamedMetricsEntry'key :: Text
_OrcaLoadReport'NamedMetricsEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'NamedMetricsEntry'value :: Double
_OrcaLoadReport'NamedMetricsEntry'value = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'NamedMetricsEntry'_unknownFields :: FieldSet
_OrcaLoadReport'NamedMetricsEntry'_unknownFields = []}
parseMessage :: Parser OrcaLoadReport'NamedMetricsEntry
parseMessage
= let
loop ::
OrcaLoadReport'NamedMetricsEntry
-> Data.ProtoLens.Encoding.Bytes.Parser OrcaLoadReport'NamedMetricsEntry
loop :: OrcaLoadReport'NamedMetricsEntry
-> Parser OrcaLoadReport'NamedMetricsEntry
loop OrcaLoadReport'NamedMetricsEntry
x
= do end <- Parser Bool
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 (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"key"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x)
Word64
17
-> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"value"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser OrcaLoadReport'NamedMetricsEntry
-> String -> Parser OrcaLoadReport'NamedMetricsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do OrcaLoadReport'NamedMetricsEntry
-> Parser OrcaLoadReport'NamedMetricsEntry
loop OrcaLoadReport'NamedMetricsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"NamedMetricsEntry"
buildMessage :: OrcaLoadReport'NamedMetricsEntry -> Builder
buildMessage
= \ OrcaLoadReport'NamedMetricsEntry
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let _v :: Text
_v = FoldLike
Text
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
Text
Text
-> OrcaLoadReport'NamedMetricsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") OrcaLoadReport'NamedMetricsEntry
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Double
_v = FoldLike
Double
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
Double
Double
-> OrcaLoadReport'NamedMetricsEntry -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") OrcaLoadReport'NamedMetricsEntry
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
17)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
FieldSet
FieldSet
-> OrcaLoadReport'NamedMetricsEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
OrcaLoadReport'NamedMetricsEntry
OrcaLoadReport'NamedMetricsEntry
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' OrcaLoadReport'NamedMetricsEntry FieldSet
Data.ProtoLens.unknownFields OrcaLoadReport'NamedMetricsEntry
_x)))
instance Control.DeepSeq.NFData OrcaLoadReport'NamedMetricsEntry where
rnf :: OrcaLoadReport'NamedMetricsEntry -> ()
rnf
= \ OrcaLoadReport'NamedMetricsEntry
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'NamedMetricsEntry -> FieldSet
_OrcaLoadReport'NamedMetricsEntry'_unknownFields OrcaLoadReport'NamedMetricsEntry
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'NamedMetricsEntry -> Text
_OrcaLoadReport'NamedMetricsEntry'key OrcaLoadReport'NamedMetricsEntry
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'NamedMetricsEntry -> Double
_OrcaLoadReport'NamedMetricsEntry'value OrcaLoadReport'NamedMetricsEntry
x__) ()))
data OrcaLoadReport'RequestCostEntry
= OrcaLoadReport'RequestCostEntry'_constructor {OrcaLoadReport'RequestCostEntry -> Text
_OrcaLoadReport'RequestCostEntry'key :: !Data.Text.Text,
OrcaLoadReport'RequestCostEntry -> Double
_OrcaLoadReport'RequestCostEntry'value :: !Prelude.Double,
OrcaLoadReport'RequestCostEntry -> FieldSet
_OrcaLoadReport'RequestCostEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
(OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool)
-> (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool)
-> Eq OrcaLoadReport'RequestCostEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
== :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
$c/= :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
/= :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
Prelude.Eq, Eq OrcaLoadReport'RequestCostEntry
Eq OrcaLoadReport'RequestCostEntry =>
(OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Ordering)
-> (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool)
-> (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool)
-> (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool)
-> (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool)
-> (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry)
-> (OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry)
-> Ord OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Ordering
OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Ordering
compare :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Ordering
$c< :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
< :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
$c<= :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
<= :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
$c> :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
> :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
$c>= :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
>= :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry -> Bool
$cmax :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
max :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
$cmin :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
min :: OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
-> OrcaLoadReport'RequestCostEntry
Prelude.Ord)
instance Prelude.Show OrcaLoadReport'RequestCostEntry where
showsPrec :: Int -> OrcaLoadReport'RequestCostEntry -> ShowS
showsPrec Int
_ OrcaLoadReport'RequestCostEntry
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(OrcaLoadReport'RequestCostEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort OrcaLoadReport'RequestCostEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField OrcaLoadReport'RequestCostEntry "key" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> OrcaLoadReport'RequestCostEntry
-> f OrcaLoadReport'RequestCostEntry
fieldOf Proxy# "key"
_
= ((Text -> f Text)
-> OrcaLoadReport'RequestCostEntry
-> f OrcaLoadReport'RequestCostEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> OrcaLoadReport'RequestCostEntry
-> f OrcaLoadReport'RequestCostEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport'RequestCostEntry -> Text)
-> (OrcaLoadReport'RequestCostEntry
-> Text -> OrcaLoadReport'RequestCostEntry)
-> Lens' OrcaLoadReport'RequestCostEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'RequestCostEntry -> Text
_OrcaLoadReport'RequestCostEntry'key
(\ OrcaLoadReport'RequestCostEntry
x__ Text
y__ -> OrcaLoadReport'RequestCostEntry
x__ {_OrcaLoadReport'RequestCostEntry'key = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport'RequestCostEntry "value" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Double -> f Double)
-> OrcaLoadReport'RequestCostEntry
-> f OrcaLoadReport'RequestCostEntry
fieldOf Proxy# "value"
_
= ((Double -> f Double)
-> OrcaLoadReport'RequestCostEntry
-> f OrcaLoadReport'RequestCostEntry)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport'RequestCostEntry
-> f OrcaLoadReport'RequestCostEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport'RequestCostEntry -> Double)
-> (OrcaLoadReport'RequestCostEntry
-> Double -> OrcaLoadReport'RequestCostEntry)
-> Lens' OrcaLoadReport'RequestCostEntry Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'RequestCostEntry -> Double
_OrcaLoadReport'RequestCostEntry'value
(\ OrcaLoadReport'RequestCostEntry
x__ Double
y__ -> OrcaLoadReport'RequestCostEntry
x__ {_OrcaLoadReport'RequestCostEntry'value = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message OrcaLoadReport'RequestCostEntry where
messageName :: Proxy OrcaLoadReport'RequestCostEntry -> Text
messageName Proxy OrcaLoadReport'RequestCostEntry
_
= String -> Text
Data.Text.pack String
"xds.data.orca.v3.OrcaLoadReport.RequestCostEntry"
packedMessageDescriptor :: Proxy OrcaLoadReport'RequestCostEntry -> ByteString
packedMessageDescriptor Proxy OrcaLoadReport'RequestCostEntry
_
= ByteString
"\n\
\\DLERequestCostEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH"
packedFileDescriptor :: Proxy OrcaLoadReport'RequestCostEntry -> ByteString
packedFileDescriptor Proxy OrcaLoadReport'RequestCostEntry
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor OrcaLoadReport'RequestCostEntry)
fieldsByTag
= let
key__field_descriptor :: FieldDescriptor OrcaLoadReport'RequestCostEntry
key__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor OrcaLoadReport'RequestCostEntry Text
-> FieldDescriptor OrcaLoadReport'RequestCostEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"key"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens' OrcaLoadReport'RequestCostEntry Text
-> FieldAccessor OrcaLoadReport'RequestCostEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport'RequestCostEntry
value__field_descriptor :: FieldDescriptor OrcaLoadReport'RequestCostEntry
value__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport'RequestCostEntry Double
-> FieldDescriptor OrcaLoadReport'RequestCostEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"value"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens' OrcaLoadReport'RequestCostEntry Double
-> FieldAccessor OrcaLoadReport'RequestCostEntry Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport'RequestCostEntry
in
[(Tag, FieldDescriptor OrcaLoadReport'RequestCostEntry)]
-> Map Tag (FieldDescriptor OrcaLoadReport'RequestCostEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor OrcaLoadReport'RequestCostEntry
key__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor OrcaLoadReport'RequestCostEntry
value__field_descriptor)]
unknownFields :: Lens' OrcaLoadReport'RequestCostEntry FieldSet
unknownFields
= (OrcaLoadReport'RequestCostEntry -> FieldSet)
-> (OrcaLoadReport'RequestCostEntry
-> FieldSet -> OrcaLoadReport'RequestCostEntry)
-> Lens' OrcaLoadReport'RequestCostEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'RequestCostEntry -> FieldSet
_OrcaLoadReport'RequestCostEntry'_unknownFields
(\ OrcaLoadReport'RequestCostEntry
x__ FieldSet
y__
-> OrcaLoadReport'RequestCostEntry
x__ {_OrcaLoadReport'RequestCostEntry'_unknownFields = y__})
defMessage :: OrcaLoadReport'RequestCostEntry
defMessage
= OrcaLoadReport'RequestCostEntry'_constructor
{_OrcaLoadReport'RequestCostEntry'key :: Text
_OrcaLoadReport'RequestCostEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'RequestCostEntry'value :: Double
_OrcaLoadReport'RequestCostEntry'value = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'RequestCostEntry'_unknownFields :: FieldSet
_OrcaLoadReport'RequestCostEntry'_unknownFields = []}
parseMessage :: Parser OrcaLoadReport'RequestCostEntry
parseMessage
= let
loop ::
OrcaLoadReport'RequestCostEntry
-> Data.ProtoLens.Encoding.Bytes.Parser OrcaLoadReport'RequestCostEntry
loop :: OrcaLoadReport'RequestCostEntry
-> Parser OrcaLoadReport'RequestCostEntry
loop OrcaLoadReport'RequestCostEntry
x
= do end <- Parser Bool
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 (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"key"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x)
Word64
17
-> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"value"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser OrcaLoadReport'RequestCostEntry
-> String -> Parser OrcaLoadReport'RequestCostEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do OrcaLoadReport'RequestCostEntry
-> Parser OrcaLoadReport'RequestCostEntry
loop OrcaLoadReport'RequestCostEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"RequestCostEntry"
buildMessage :: OrcaLoadReport'RequestCostEntry -> Builder
buildMessage
= \ OrcaLoadReport'RequestCostEntry
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let _v :: Text
_v = FoldLike
Text
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
Text
Text
-> OrcaLoadReport'RequestCostEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") OrcaLoadReport'RequestCostEntry
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Double
_v = FoldLike
Double
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
Double
Double
-> OrcaLoadReport'RequestCostEntry -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") OrcaLoadReport'RequestCostEntry
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
17)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
FieldSet
FieldSet
-> OrcaLoadReport'RequestCostEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
OrcaLoadReport'RequestCostEntry
OrcaLoadReport'RequestCostEntry
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' OrcaLoadReport'RequestCostEntry FieldSet
Data.ProtoLens.unknownFields OrcaLoadReport'RequestCostEntry
_x)))
instance Control.DeepSeq.NFData OrcaLoadReport'RequestCostEntry where
rnf :: OrcaLoadReport'RequestCostEntry -> ()
rnf
= \ OrcaLoadReport'RequestCostEntry
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'RequestCostEntry -> FieldSet
_OrcaLoadReport'RequestCostEntry'_unknownFields OrcaLoadReport'RequestCostEntry
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'RequestCostEntry -> Text
_OrcaLoadReport'RequestCostEntry'key OrcaLoadReport'RequestCostEntry
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'RequestCostEntry -> Double
_OrcaLoadReport'RequestCostEntry'value OrcaLoadReport'RequestCostEntry
x__) ()))
data OrcaLoadReport'UtilizationEntry
= OrcaLoadReport'UtilizationEntry'_constructor {OrcaLoadReport'UtilizationEntry -> Text
_OrcaLoadReport'UtilizationEntry'key :: !Data.Text.Text,
OrcaLoadReport'UtilizationEntry -> Double
_OrcaLoadReport'UtilizationEntry'value :: !Prelude.Double,
OrcaLoadReport'UtilizationEntry -> FieldSet
_OrcaLoadReport'UtilizationEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
(OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool)
-> (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool)
-> Eq OrcaLoadReport'UtilizationEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
== :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
$c/= :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
/= :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
Prelude.Eq, Eq OrcaLoadReport'UtilizationEntry
Eq OrcaLoadReport'UtilizationEntry =>
(OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Ordering)
-> (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool)
-> (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool)
-> (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool)
-> (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool)
-> (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry)
-> (OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry)
-> Ord OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Ordering
OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Ordering
compare :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Ordering
$c< :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
< :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
$c<= :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
<= :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
$c> :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
> :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
$c>= :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
>= :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry -> Bool
$cmax :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
max :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
$cmin :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
min :: OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
-> OrcaLoadReport'UtilizationEntry
Prelude.Ord)
instance Prelude.Show OrcaLoadReport'UtilizationEntry where
showsPrec :: Int -> OrcaLoadReport'UtilizationEntry -> ShowS
showsPrec Int
_ OrcaLoadReport'UtilizationEntry
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(OrcaLoadReport'UtilizationEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort OrcaLoadReport'UtilizationEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField OrcaLoadReport'UtilizationEntry "key" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> OrcaLoadReport'UtilizationEntry
-> f OrcaLoadReport'UtilizationEntry
fieldOf Proxy# "key"
_
= ((Text -> f Text)
-> OrcaLoadReport'UtilizationEntry
-> f OrcaLoadReport'UtilizationEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> OrcaLoadReport'UtilizationEntry
-> f OrcaLoadReport'UtilizationEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport'UtilizationEntry -> Text)
-> (OrcaLoadReport'UtilizationEntry
-> Text -> OrcaLoadReport'UtilizationEntry)
-> Lens' OrcaLoadReport'UtilizationEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'UtilizationEntry -> Text
_OrcaLoadReport'UtilizationEntry'key
(\ OrcaLoadReport'UtilizationEntry
x__ Text
y__ -> OrcaLoadReport'UtilizationEntry
x__ {_OrcaLoadReport'UtilizationEntry'key = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OrcaLoadReport'UtilizationEntry "value" Prelude.Double where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Double -> f Double)
-> OrcaLoadReport'UtilizationEntry
-> f OrcaLoadReport'UtilizationEntry
fieldOf Proxy# "value"
_
= ((Double -> f Double)
-> OrcaLoadReport'UtilizationEntry
-> f OrcaLoadReport'UtilizationEntry)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> OrcaLoadReport'UtilizationEntry
-> f OrcaLoadReport'UtilizationEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((OrcaLoadReport'UtilizationEntry -> Double)
-> (OrcaLoadReport'UtilizationEntry
-> Double -> OrcaLoadReport'UtilizationEntry)
-> Lens' OrcaLoadReport'UtilizationEntry Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'UtilizationEntry -> Double
_OrcaLoadReport'UtilizationEntry'value
(\ OrcaLoadReport'UtilizationEntry
x__ Double
y__ -> OrcaLoadReport'UtilizationEntry
x__ {_OrcaLoadReport'UtilizationEntry'value = y__}))
(Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message OrcaLoadReport'UtilizationEntry where
messageName :: Proxy OrcaLoadReport'UtilizationEntry -> Text
messageName Proxy OrcaLoadReport'UtilizationEntry
_
= String -> Text
Data.Text.pack String
"xds.data.orca.v3.OrcaLoadReport.UtilizationEntry"
packedMessageDescriptor :: Proxy OrcaLoadReport'UtilizationEntry -> ByteString
packedMessageDescriptor Proxy OrcaLoadReport'UtilizationEntry
_
= ByteString
"\n\
\\DLEUtilizationEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH"
packedFileDescriptor :: Proxy OrcaLoadReport'UtilizationEntry -> ByteString
packedFileDescriptor Proxy OrcaLoadReport'UtilizationEntry
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor OrcaLoadReport'UtilizationEntry)
fieldsByTag
= let
key__field_descriptor :: FieldDescriptor OrcaLoadReport'UtilizationEntry
key__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor OrcaLoadReport'UtilizationEntry Text
-> FieldDescriptor OrcaLoadReport'UtilizationEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"key"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens' OrcaLoadReport'UtilizationEntry Text
-> FieldAccessor OrcaLoadReport'UtilizationEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport'UtilizationEntry
value__field_descriptor :: FieldDescriptor OrcaLoadReport'UtilizationEntry
value__field_descriptor
= String
-> FieldTypeDescriptor Double
-> FieldAccessor OrcaLoadReport'UtilizationEntry Double
-> FieldDescriptor OrcaLoadReport'UtilizationEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"value"
(ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(WireDefault Double
-> Lens' OrcaLoadReport'UtilizationEntry Double
-> FieldAccessor OrcaLoadReport'UtilizationEntry Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
Data.ProtoLens.FieldDescriptor OrcaLoadReport'UtilizationEntry
in
[(Tag, FieldDescriptor OrcaLoadReport'UtilizationEntry)]
-> Map Tag (FieldDescriptor OrcaLoadReport'UtilizationEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor OrcaLoadReport'UtilizationEntry
key__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor OrcaLoadReport'UtilizationEntry
value__field_descriptor)]
unknownFields :: Lens' OrcaLoadReport'UtilizationEntry FieldSet
unknownFields
= (OrcaLoadReport'UtilizationEntry -> FieldSet)
-> (OrcaLoadReport'UtilizationEntry
-> FieldSet -> OrcaLoadReport'UtilizationEntry)
-> Lens' OrcaLoadReport'UtilizationEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
OrcaLoadReport'UtilizationEntry -> FieldSet
_OrcaLoadReport'UtilizationEntry'_unknownFields
(\ OrcaLoadReport'UtilizationEntry
x__ FieldSet
y__
-> OrcaLoadReport'UtilizationEntry
x__ {_OrcaLoadReport'UtilizationEntry'_unknownFields = y__})
defMessage :: OrcaLoadReport'UtilizationEntry
defMessage
= OrcaLoadReport'UtilizationEntry'_constructor
{_OrcaLoadReport'UtilizationEntry'key :: Text
_OrcaLoadReport'UtilizationEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'UtilizationEntry'value :: Double
_OrcaLoadReport'UtilizationEntry'value = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_OrcaLoadReport'UtilizationEntry'_unknownFields :: FieldSet
_OrcaLoadReport'UtilizationEntry'_unknownFields = []}
parseMessage :: Parser OrcaLoadReport'UtilizationEntry
parseMessage
= let
loop ::
OrcaLoadReport'UtilizationEntry
-> Data.ProtoLens.Encoding.Bytes.Parser OrcaLoadReport'UtilizationEntry
loop :: OrcaLoadReport'UtilizationEntry
-> Parser OrcaLoadReport'UtilizationEntry
loop OrcaLoadReport'UtilizationEntry
x
= do end <- Parser Bool
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 (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"key"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x)
Word64
17
-> do y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
String
"value"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser OrcaLoadReport'UtilizationEntry
-> String -> Parser OrcaLoadReport'UtilizationEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do OrcaLoadReport'UtilizationEntry
-> Parser OrcaLoadReport'UtilizationEntry
loop OrcaLoadReport'UtilizationEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"UtilizationEntry"
buildMessage :: OrcaLoadReport'UtilizationEntry -> Builder
buildMessage
= \ OrcaLoadReport'UtilizationEntry
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let _v :: Text
_v = FoldLike
Text
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
Text
Text
-> OrcaLoadReport'UtilizationEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") OrcaLoadReport'UtilizationEntry
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Double
_v = FoldLike
Double
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
Double
Double
-> OrcaLoadReport'UtilizationEntry -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") OrcaLoadReport'UtilizationEntry
_x
in
if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
17)
((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord Double
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
FieldSet
FieldSet
-> OrcaLoadReport'UtilizationEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
OrcaLoadReport'UtilizationEntry
OrcaLoadReport'UtilizationEntry
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' OrcaLoadReport'UtilizationEntry FieldSet
Data.ProtoLens.unknownFields OrcaLoadReport'UtilizationEntry
_x)))
instance Control.DeepSeq.NFData OrcaLoadReport'UtilizationEntry where
rnf :: OrcaLoadReport'UtilizationEntry -> ()
rnf
= \ OrcaLoadReport'UtilizationEntry
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'UtilizationEntry -> FieldSet
_OrcaLoadReport'UtilizationEntry'_unknownFields OrcaLoadReport'UtilizationEntry
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'UtilizationEntry -> Text
_OrcaLoadReport'UtilizationEntry'key OrcaLoadReport'UtilizationEntry
x__)
(Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(OrcaLoadReport'UtilizationEntry -> Double
_OrcaLoadReport'UtilizationEntry'value OrcaLoadReport'UtilizationEntry
x__) ()))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
= ByteString
"\n\
\\SYNorca_load_report.proto\DC2\DLExds.data.orca.v3\"\175\ENQ\n\
\\SOOrcaLoadReport\DC2'\n\
\\SIcpu_utilization\CAN\SOH \SOH(\SOHR\SOcpuUtilization\DC2'\n\
\\SImem_utilization\CAN\STX \SOH(\SOHR\SOmemUtilization\DC2\DC4\n\
\\ETXrps\CAN\ETX \SOH(\EOTR\ETXrpsB\STX\CAN\SOH\DC2T\n\
\\frequest_cost\CAN\EOT \ETX(\v21.xds.data.orca.v3.OrcaLoadReport.RequestCostEntryR\vrequestCost\DC2S\n\
\\vutilization\CAN\ENQ \ETX(\v21.xds.data.orca.v3.OrcaLoadReport.UtilizationEntryR\vutilization\DC2%\n\
\\SOrps_fractional\CAN\ACK \SOH(\SOHR\rrpsFractional\DC2\DLE\n\
\\ETXeps\CAN\a \SOH(\SOHR\ETXeps\DC2W\n\
\\rnamed_metrics\CAN\b \ETX(\v22.xds.data.orca.v3.OrcaLoadReport.NamedMetricsEntryR\fnamedMetrics\DC27\n\
\\ETBapplication_utilization\CAN\t \SOH(\SOHR\SYNapplicationUtilization\SUB>\n\
\\DLERequestCostEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH\SUB>\n\
\\DLEUtilizationEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOH\SUB?\n\
\\DC1NamedMetricsEntry\DC2\DLE\n\
\\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
\\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue:\STX8\SOHJ\156\DC1\n\
\\ACK\DC2\EOT\NUL\NUL1\SOH\n\
\\b\n\
\\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
\\b\n\
\\SOH\STX\DC2\ETX\STX\NUL\EM\n\
\\134\SOH\n\
\\STX\EOT\NUL\DC2\EOT\a\NUL1\SOH2z See section `ORCA load report format` of the design document in\n\
\ :ref:`https://github.com/envoyproxy/envoy/issues/6614`.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\NUL\SOH\DC2\ETX\a\b\SYN\n\
\\250\SOH\n\
\\EOT\EOT\NUL\STX\NUL\DC2\ETX\f\STX\GS\SUB\236\SOH CPU utilization expressed as a fraction of available CPU resources. This\n\
\ should be derived from the latest sample or measurement. The value may be\n\
\ larger than 1.0 when the usage exceeds the reporter dependent notion of\n\
\ soft limits.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\f\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\f\t\CAN\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\f\ESC\FS\n\
\\152\SOH\n\
\\EOT\EOT\NUL\STX\SOH\DC2\ETX\DLE\STX\GS\SUB\138\SOH Memory utilization expressed as a fraction of available memory\n\
\ resources. This should be derived from the latest sample or measurement.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\DLE\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DLE\t\CAN\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DLE\ESC\FS\n\
\\176\SOH\n\
\\EOT\EOT\NUL\STX\STX\DC2\ETX\NAK\STX%\SUB\162\SOH Total RPS being served by an endpoint. This should cover all services that an endpoint is\n\
\ responsible for.\n\
\ Deprecated -- use ``rps_fractional`` field instead.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\NAK\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\NAK\t\f\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\NAK\SI\DLE\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\b\DC2\ETX\NAK\DC1$\n\
\\r\n\
\\ACK\EOT\NUL\STX\STX\b\ETX\DC2\ETX\NAK\DC2#\n\
\\142\SOH\n\
\\EOT\EOT\NUL\STX\ETX\DC2\ETX\EM\STX'\SUB\128\SOH Application specific requests costs. Each value is an absolute cost (e.g. 3487 bytes of\n\
\ storage) associated with the request.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX\EM\STX\NAK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\EM\SYN\"\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\EM%&\n\
\\160\SOH\n\
\\EOT\EOT\NUL\STX\EOT\DC2\ETX\GS\STX&\SUB\146\SOH Resource utilization values. Each value is expressed as a fraction of total resources\n\
\ available, derived from the latest sample or measurement.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX\GS\STX\NAK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX\GS\SYN!\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX\GS$%\n\
\z\n\
\\EOT\EOT\NUL\STX\ENQ\DC2\ETX!\STX\FS\SUBm Total RPS being served by an endpoint. This should cover all services that an endpoint is\n\
\ responsible for.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETX!\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX!\t\ETB\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX!\SUB\ESC\n\
\\138\SOH\n\
\\EOT\EOT\NUL\STX\ACK\DC2\ETX%\STX\DC1\SUB} Total EPS (errors/second) being served by an endpoint. This should cover\n\
\ all services that an endpoint is responsible for.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETX%\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX%\t\f\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX%\SI\DLE\n\
\3\n\
\\EOT\EOT\NUL\STX\a\DC2\ETX(\STX(\SUB& Application specific opaque metrics.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\ACK\DC2\ETX(\STX\NAK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\SOH\DC2\ETX(\SYN#\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\ETX\DC2\ETX(&'\n\
\\148\ETX\n\
\\EOT\EOT\NUL\STX\b\DC2\ETX0\STX%\SUB\134\ETX Application specific utilization expressed as a fraction of available\n\
\ resources. For example, an application may report the max of CPU and memory\n\
\ utilization for better load balancing if it is both CPU and memory bound.\n\
\ This should be derived from the latest sample or measurement.\n\
\ The value may be larger than 1.0 when the usage exceeds the reporter\n\
\ dependent notion of soft limits.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\ENQ\DC2\ETX0\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\SOH\DC2\ETX0\t \n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\ETX\DC2\ETX0#$b\ACKproto3"