{- This file was auto-generated from opentelemetry/proto/trace/v1/trace_config.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Opentelemetry.Proto.Trace.V1.TraceConfig (
        ConstantSampler(), ConstantSampler'ConstantDecision(..),
        ConstantSampler'ConstantDecision(),
        ConstantSampler'ConstantDecision'UnrecognizedValue,
        RateLimitingSampler(), TraceConfig(), TraceConfig'Sampler(..),
        _TraceConfig'ConstantSampler, _TraceConfig'TraceIdRatioBased,
        _TraceConfig'RateLimitingSampler, TraceIdRatioBased()
    ) 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
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.decision' @:: Lens' ConstantSampler ConstantSampler'ConstantDecision@ -}
data ConstantSampler
  = ConstantSampler'_constructor {ConstantSampler -> ConstantSampler'ConstantDecision
_ConstantSampler'decision :: !ConstantSampler'ConstantDecision,
                                  ConstantSampler -> FieldSet
_ConstantSampler'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ConstantSampler -> ConstantSampler -> Bool
(ConstantSampler -> ConstantSampler -> Bool)
-> (ConstantSampler -> ConstantSampler -> Bool)
-> Eq ConstantSampler
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ConstantSampler -> ConstantSampler -> Bool
$c/= :: ConstantSampler -> ConstantSampler -> Bool
== :: ConstantSampler -> ConstantSampler -> Bool
$c== :: ConstantSampler -> ConstantSampler -> Bool
Prelude.Eq, Eq ConstantSampler
Eq ConstantSampler
-> (ConstantSampler -> ConstantSampler -> Ordering)
-> (ConstantSampler -> ConstantSampler -> Bool)
-> (ConstantSampler -> ConstantSampler -> Bool)
-> (ConstantSampler -> ConstantSampler -> Bool)
-> (ConstantSampler -> ConstantSampler -> Bool)
-> (ConstantSampler -> ConstantSampler -> ConstantSampler)
-> (ConstantSampler -> ConstantSampler -> ConstantSampler)
-> Ord ConstantSampler
ConstantSampler -> ConstantSampler -> Bool
ConstantSampler -> ConstantSampler -> Ordering
ConstantSampler -> ConstantSampler -> ConstantSampler
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
min :: ConstantSampler -> ConstantSampler -> ConstantSampler
$cmin :: ConstantSampler -> ConstantSampler -> ConstantSampler
max :: ConstantSampler -> ConstantSampler -> ConstantSampler
$cmax :: ConstantSampler -> ConstantSampler -> ConstantSampler
>= :: ConstantSampler -> ConstantSampler -> Bool
$c>= :: ConstantSampler -> ConstantSampler -> Bool
> :: ConstantSampler -> ConstantSampler -> Bool
$c> :: ConstantSampler -> ConstantSampler -> Bool
<= :: ConstantSampler -> ConstantSampler -> Bool
$c<= :: ConstantSampler -> ConstantSampler -> Bool
< :: ConstantSampler -> ConstantSampler -> Bool
$c< :: ConstantSampler -> ConstantSampler -> Bool
compare :: ConstantSampler -> ConstantSampler -> Ordering
$ccompare :: ConstantSampler -> ConstantSampler -> Ordering
$cp1Ord :: Eq ConstantSampler
Prelude.Ord)
instance Prelude.Show ConstantSampler where
  showsPrec :: Int -> ConstantSampler -> ShowS
showsPrec Int
_ ConstantSampler
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ConstantSampler -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ConstantSampler
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ConstantSampler "decision" ConstantSampler'ConstantDecision where
  fieldOf :: Proxy# "decision"
-> (ConstantSampler'ConstantDecision
    -> f ConstantSampler'ConstantDecision)
-> ConstantSampler
-> f ConstantSampler
fieldOf Proxy# "decision"
_
    = ((ConstantSampler'ConstantDecision
  -> f ConstantSampler'ConstantDecision)
 -> ConstantSampler -> f ConstantSampler)
-> ((ConstantSampler'ConstantDecision
     -> f ConstantSampler'ConstantDecision)
    -> ConstantSampler'ConstantDecision
    -> f ConstantSampler'ConstantDecision)
-> (ConstantSampler'ConstantDecision
    -> f ConstantSampler'ConstantDecision)
-> ConstantSampler
-> f ConstantSampler
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConstantSampler -> ConstantSampler'ConstantDecision)
-> (ConstantSampler
    -> ConstantSampler'ConstantDecision -> ConstantSampler)
-> Lens
     ConstantSampler
     ConstantSampler
     ConstantSampler'ConstantDecision
     ConstantSampler'ConstantDecision
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConstantSampler -> ConstantSampler'ConstantDecision
_ConstantSampler'decision
           (\ ConstantSampler
x__ ConstantSampler'ConstantDecision
y__ -> ConstantSampler
x__ {_ConstantSampler'decision :: ConstantSampler'ConstantDecision
_ConstantSampler'decision = ConstantSampler'ConstantDecision
y__}))
        (ConstantSampler'ConstantDecision
 -> f ConstantSampler'ConstantDecision)
-> ConstantSampler'ConstantDecision
-> f ConstantSampler'ConstantDecision
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ConstantSampler where
  messageName :: Proxy ConstantSampler -> Text
messageName Proxy ConstantSampler
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.trace.v1.ConstantSampler"
  packedMessageDescriptor :: Proxy ConstantSampler -> ByteString
packedMessageDescriptor Proxy ConstantSampler
_
    = ByteString
"\n\
      \\SIConstantSampler\DC2Z\n\
      \\bdecision\CAN\SOH \SOH(\SO2>.opentelemetry.proto.trace.v1.ConstantSampler.ConstantDecisionR\bdecision\"D\n\
      \\DLEConstantDecision\DC2\SO\n\
      \\n\
      \ALWAYS_OFF\DLE\NUL\DC2\r\n\
      \\tALWAYS_ON\DLE\SOH\DC2\DC1\n\
      \\rALWAYS_PARENT\DLE\STX"
  packedFileDescriptor :: Proxy ConstantSampler -> ByteString
packedFileDescriptor Proxy ConstantSampler
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ConstantSampler)
fieldsByTag
    = let
        decision__field_descriptor :: FieldDescriptor ConstantSampler
decision__field_descriptor
          = String
-> FieldTypeDescriptor ConstantSampler'ConstantDecision
-> FieldAccessor ConstantSampler ConstantSampler'ConstantDecision
-> FieldDescriptor ConstantSampler
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"decision"
              (ScalarField ConstantSampler'ConstantDecision
-> FieldTypeDescriptor ConstantSampler'ConstantDecision
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ConstantSampler'ConstantDecision
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor ConstantSampler'ConstantDecision)
              (WireDefault ConstantSampler'ConstantDecision
-> Lens
     ConstantSampler
     ConstantSampler
     ConstantSampler'ConstantDecision
     ConstantSampler'ConstantDecision
-> FieldAccessor ConstantSampler ConstantSampler'ConstantDecision
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ConstantSampler'ConstantDecision
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "decision" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"decision")) ::
              Data.ProtoLens.FieldDescriptor ConstantSampler
      in
        [(Tag, FieldDescriptor ConstantSampler)]
-> Map Tag (FieldDescriptor ConstantSampler)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ConstantSampler
decision__field_descriptor)]
  unknownFields :: LensLike' f ConstantSampler FieldSet
unknownFields
    = (ConstantSampler -> FieldSet)
-> (ConstantSampler -> FieldSet -> ConstantSampler)
-> Lens' ConstantSampler FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ConstantSampler -> FieldSet
_ConstantSampler'_unknownFields
        (\ ConstantSampler
x__ FieldSet
y__ -> ConstantSampler
x__ {_ConstantSampler'_unknownFields :: FieldSet
_ConstantSampler'_unknownFields = FieldSet
y__})
  defMessage :: ConstantSampler
defMessage
    = ConstantSampler'_constructor :: ConstantSampler'ConstantDecision -> FieldSet -> ConstantSampler
ConstantSampler'_constructor
        {_ConstantSampler'decision :: ConstantSampler'ConstantDecision
_ConstantSampler'decision = ConstantSampler'ConstantDecision
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConstantSampler'_unknownFields :: FieldSet
_ConstantSampler'_unknownFields = []}
  parseMessage :: Parser ConstantSampler
parseMessage
    = let
        loop ::
          ConstantSampler
          -> Data.ProtoLens.Encoding.Bytes.Parser ConstantSampler
        loop :: ConstantSampler -> Parser ConstantSampler
loop ConstantSampler
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      ConstantSampler -> Parser ConstantSampler
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter ConstantSampler ConstantSampler FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ConstantSampler -> ConstantSampler
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter ConstantSampler ConstantSampler FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) ConstantSampler
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
8 -> do ConstantSampler'ConstantDecision
y <- Parser ConstantSampler'ConstantDecision
-> String -> Parser ConstantSampler'ConstantDecision
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ConstantSampler'ConstantDecision)
-> Parser Int -> Parser ConstantSampler'ConstantDecision
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ConstantSampler'ConstantDecision
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"decision"
                                ConstantSampler -> Parser ConstantSampler
loop
                                  (Setter
  ConstantSampler
  ConstantSampler
  ConstantSampler'ConstantDecision
  ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler
-> ConstantSampler
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "decision" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"decision") ConstantSampler'ConstantDecision
y ConstantSampler
x)
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ConstantSampler -> Parser ConstantSampler
loop
                                  (Setter ConstantSampler ConstantSampler FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ConstantSampler -> ConstantSampler
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter ConstantSampler ConstantSampler FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ConstantSampler
x)
      in
        Parser ConstantSampler -> String -> Parser ConstantSampler
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ConstantSampler -> Parser ConstantSampler
loop ConstantSampler
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ConstantSampler"
  buildMessage :: ConstantSampler -> Builder
buildMessage
    = \ ConstantSampler
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ConstantSampler'ConstantDecision
_v = FoldLike
  ConstantSampler'ConstantDecision
  ConstantSampler
  ConstantSampler
  ConstantSampler'ConstantDecision
  ConstantSampler'ConstantDecision
-> ConstantSampler -> ConstantSampler'ConstantDecision
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "decision" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"decision") ConstantSampler
_x
              in
                if ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ConstantSampler'ConstantDecision
_v ConstantSampler'ConstantDecision
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
8)
                      ((Int -> Builder)
-> (ConstantSampler'ConstantDecision -> Int)
-> ConstantSampler'ConstantDecision
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         ((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                         ConstantSampler'ConstantDecision -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ConstantSampler'ConstantDecision
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet ConstantSampler ConstantSampler FieldSet FieldSet
-> ConstantSampler -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ConstantSampler ConstantSampler FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields ConstantSampler
_x))
instance Control.DeepSeq.NFData ConstantSampler where
  rnf :: ConstantSampler -> ()
rnf
    = \ ConstantSampler
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ConstantSampler -> FieldSet
_ConstantSampler'_unknownFields ConstantSampler
x__)
             (ConstantSampler'ConstantDecision -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ConstantSampler -> ConstantSampler'ConstantDecision
_ConstantSampler'decision ConstantSampler
x__) ())
newtype ConstantSampler'ConstantDecision'UnrecognizedValue
  = ConstantSampler'ConstantDecision'UnrecognizedValue Data.Int.Int32
  deriving stock (ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
(ConstantSampler'ConstantDecision'UnrecognizedValue
 -> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool)
-> Eq ConstantSampler'ConstantDecision'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
$c/= :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
== :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
$c== :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
Prelude.Eq, Eq ConstantSampler'ConstantDecision'UnrecognizedValue
Eq ConstantSampler'ConstantDecision'UnrecognizedValue
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue -> Ordering)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue
    -> ConstantSampler'ConstantDecision'UnrecognizedValue)
-> Ord ConstantSampler'ConstantDecision'UnrecognizedValue
ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Ordering
ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
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
min :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
$cmin :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
max :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
$cmax :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue
>= :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
$c>= :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
> :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
$c> :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
<= :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
$c<= :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
< :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
$c< :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Bool
compare :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Ordering
$ccompare :: ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision'UnrecognizedValue -> Ordering
$cp1Ord :: Eq ConstantSampler'ConstantDecision'UnrecognizedValue
Prelude.Ord, Int -> ConstantSampler'ConstantDecision'UnrecognizedValue -> ShowS
[ConstantSampler'ConstantDecision'UnrecognizedValue] -> ShowS
ConstantSampler'ConstantDecision'UnrecognizedValue -> String
(Int
 -> ConstantSampler'ConstantDecision'UnrecognizedValue -> ShowS)
-> (ConstantSampler'ConstantDecision'UnrecognizedValue -> String)
-> ([ConstantSampler'ConstantDecision'UnrecognizedValue] -> ShowS)
-> Show ConstantSampler'ConstantDecision'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ConstantSampler'ConstantDecision'UnrecognizedValue] -> ShowS
$cshowList :: [ConstantSampler'ConstantDecision'UnrecognizedValue] -> ShowS
show :: ConstantSampler'ConstantDecision'UnrecognizedValue -> String
$cshow :: ConstantSampler'ConstantDecision'UnrecognizedValue -> String
showsPrec :: Int -> ConstantSampler'ConstantDecision'UnrecognizedValue -> ShowS
$cshowsPrec :: Int -> ConstantSampler'ConstantDecision'UnrecognizedValue -> ShowS
Prelude.Show)
data ConstantSampler'ConstantDecision
  = ConstantSampler'ALWAYS_OFF |
    ConstantSampler'ALWAYS_ON |
    ConstantSampler'ALWAYS_PARENT |
    ConstantSampler'ConstantDecision'Unrecognized !ConstantSampler'ConstantDecision'UnrecognizedValue
  deriving stock (Int -> ConstantSampler'ConstantDecision -> ShowS
[ConstantSampler'ConstantDecision] -> ShowS
ConstantSampler'ConstantDecision -> String
(Int -> ConstantSampler'ConstantDecision -> ShowS)
-> (ConstantSampler'ConstantDecision -> String)
-> ([ConstantSampler'ConstantDecision] -> ShowS)
-> Show ConstantSampler'ConstantDecision
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ConstantSampler'ConstantDecision] -> ShowS
$cshowList :: [ConstantSampler'ConstantDecision] -> ShowS
show :: ConstantSampler'ConstantDecision -> String
$cshow :: ConstantSampler'ConstantDecision -> String
showsPrec :: Int -> ConstantSampler'ConstantDecision -> ShowS
$cshowsPrec :: Int -> ConstantSampler'ConstantDecision -> ShowS
Prelude.Show, ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
(ConstantSampler'ConstantDecision
 -> ConstantSampler'ConstantDecision -> Bool)
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision -> Bool)
-> Eq ConstantSampler'ConstantDecision
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
$c/= :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
== :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
$c== :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
Prelude.Eq, Eq ConstantSampler'ConstantDecision
Eq ConstantSampler'ConstantDecision
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision -> Ordering)
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision -> Bool)
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision -> Bool)
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision -> Bool)
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision -> Bool)
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision)
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision)
-> Ord ConstantSampler'ConstantDecision
ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Ordering
ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
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
min :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
$cmin :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
max :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
$cmax :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
>= :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
$c>= :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
> :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
$c> :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
<= :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
$c<= :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
< :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
$c< :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Bool
compare :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Ordering
$ccompare :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision -> Ordering
$cp1Ord :: Eq ConstantSampler'ConstantDecision
Prelude.Ord)
instance Data.ProtoLens.MessageEnum ConstantSampler'ConstantDecision where
  maybeToEnum :: Int -> Maybe ConstantSampler'ConstantDecision
maybeToEnum Int
0 = ConstantSampler'ConstantDecision
-> Maybe ConstantSampler'ConstantDecision
forall a. a -> Maybe a
Prelude.Just ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF
  maybeToEnum Int
1 = ConstantSampler'ConstantDecision
-> Maybe ConstantSampler'ConstantDecision
forall a. a -> Maybe a
Prelude.Just ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON
  maybeToEnum Int
2 = ConstantSampler'ConstantDecision
-> Maybe ConstantSampler'ConstantDecision
forall a. a -> Maybe a
Prelude.Just ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT
  maybeToEnum Int
k
    = ConstantSampler'ConstantDecision
-> Maybe ConstantSampler'ConstantDecision
forall a. a -> Maybe a
Prelude.Just
        (ConstantSampler'ConstantDecision'UnrecognizedValue
-> ConstantSampler'ConstantDecision
ConstantSampler'ConstantDecision'Unrecognized
           (Int32 -> ConstantSampler'ConstantDecision'UnrecognizedValue
ConstantSampler'ConstantDecision'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: ConstantSampler'ConstantDecision -> String
showEnum ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF = String
"ALWAYS_OFF"
  showEnum ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON = String
"ALWAYS_ON"
  showEnum ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT = String
"ALWAYS_PARENT"
  showEnum
    (ConstantSampler'ConstantDecision'Unrecognized (ConstantSampler'ConstantDecision'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe ConstantSampler'ConstantDecision
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"ALWAYS_OFF"
    = ConstantSampler'ConstantDecision
-> Maybe ConstantSampler'ConstantDecision
forall a. a -> Maybe a
Prelude.Just ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"ALWAYS_ON"
    = ConstantSampler'ConstantDecision
-> Maybe ConstantSampler'ConstantDecision
forall a. a -> Maybe a
Prelude.Just ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"ALWAYS_PARENT"
    = ConstantSampler'ConstantDecision
-> Maybe ConstantSampler'ConstantDecision
forall a. a -> Maybe a
Prelude.Just ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe ConstantSampler'ConstantDecision)
-> Maybe ConstantSampler'ConstantDecision
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe ConstantSampler'ConstantDecision
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded ConstantSampler'ConstantDecision where
  minBound :: ConstantSampler'ConstantDecision
minBound = ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF
  maxBound :: ConstantSampler'ConstantDecision
maxBound = ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT
instance Prelude.Enum ConstantSampler'ConstantDecision where
  toEnum :: Int -> ConstantSampler'ConstantDecision
toEnum Int
k__
    = ConstantSampler'ConstantDecision
-> (ConstantSampler'ConstantDecision
    -> ConstantSampler'ConstantDecision)
-> Maybe ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> ConstantSampler'ConstantDecision
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum ConstantDecision: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
forall a. a -> a
Prelude.id (Int -> Maybe ConstantSampler'ConstantDecision
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: ConstantSampler'ConstantDecision -> Int
fromEnum ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF = Int
0
  fromEnum ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON = Int
1
  fromEnum ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT = Int
2
  fromEnum
    (ConstantSampler'ConstantDecision'Unrecognized (ConstantSampler'ConstantDecision'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
succ ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT
    = String -> ConstantSampler'ConstantDecision
forall a. HasCallStack => String -> a
Prelude.error
        String
"ConstantSampler'ConstantDecision.succ: bad argument ConstantSampler'ALWAYS_PARENT. This value would be out of bounds."
  succ ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF = ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON
  succ ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON = ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT
  succ (ConstantSampler'ConstantDecision'Unrecognized ConstantSampler'ConstantDecision'UnrecognizedValue
_)
    = String -> ConstantSampler'ConstantDecision
forall a. HasCallStack => String -> a
Prelude.error
        String
"ConstantSampler'ConstantDecision.succ: bad argument: unrecognized value"
  pred :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
pred ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF
    = String -> ConstantSampler'ConstantDecision
forall a. HasCallStack => String -> a
Prelude.error
        String
"ConstantSampler'ConstantDecision.pred: bad argument ConstantSampler'ALWAYS_OFF. This value would be out of bounds."
  pred ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON = ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF
  pred ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_PARENT = ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_ON
  pred (ConstantSampler'ConstantDecision'Unrecognized ConstantSampler'ConstantDecision'UnrecognizedValue
_)
    = String -> ConstantSampler'ConstantDecision
forall a. HasCallStack => String -> a
Prelude.error
        String
"ConstantSampler'ConstantDecision.pred: bad argument: unrecognized value"
  enumFrom :: ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
enumFrom = ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
enumFromTo = ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
enumFromThen = ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
enumFromThenTo = ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> ConstantSampler'ConstantDecision
-> [ConstantSampler'ConstantDecision]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault ConstantSampler'ConstantDecision where
  fieldDefault :: ConstantSampler'ConstantDecision
fieldDefault = ConstantSampler'ConstantDecision
ConstantSampler'ALWAYS_OFF
instance Control.DeepSeq.NFData ConstantSampler'ConstantDecision where
  rnf :: ConstantSampler'ConstantDecision -> ()
rnf ConstantSampler'ConstantDecision
x__ = ConstantSampler'ConstantDecision -> () -> ()
Prelude.seq ConstantSampler'ConstantDecision
x__ ()
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.qps' @:: Lens' RateLimitingSampler Data.Int.Int64@ -}
data RateLimitingSampler
  = RateLimitingSampler'_constructor {RateLimitingSampler -> Int64
_RateLimitingSampler'qps :: !Data.Int.Int64,
                                      RateLimitingSampler -> FieldSet
_RateLimitingSampler'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RateLimitingSampler -> RateLimitingSampler -> Bool
(RateLimitingSampler -> RateLimitingSampler -> Bool)
-> (RateLimitingSampler -> RateLimitingSampler -> Bool)
-> Eq RateLimitingSampler
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RateLimitingSampler -> RateLimitingSampler -> Bool
$c/= :: RateLimitingSampler -> RateLimitingSampler -> Bool
== :: RateLimitingSampler -> RateLimitingSampler -> Bool
$c== :: RateLimitingSampler -> RateLimitingSampler -> Bool
Prelude.Eq, Eq RateLimitingSampler
Eq RateLimitingSampler
-> (RateLimitingSampler -> RateLimitingSampler -> Ordering)
-> (RateLimitingSampler -> RateLimitingSampler -> Bool)
-> (RateLimitingSampler -> RateLimitingSampler -> Bool)
-> (RateLimitingSampler -> RateLimitingSampler -> Bool)
-> (RateLimitingSampler -> RateLimitingSampler -> Bool)
-> (RateLimitingSampler
    -> RateLimitingSampler -> RateLimitingSampler)
-> (RateLimitingSampler
    -> RateLimitingSampler -> RateLimitingSampler)
-> Ord RateLimitingSampler
RateLimitingSampler -> RateLimitingSampler -> Bool
RateLimitingSampler -> RateLimitingSampler -> Ordering
RateLimitingSampler -> RateLimitingSampler -> RateLimitingSampler
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
min :: RateLimitingSampler -> RateLimitingSampler -> RateLimitingSampler
$cmin :: RateLimitingSampler -> RateLimitingSampler -> RateLimitingSampler
max :: RateLimitingSampler -> RateLimitingSampler -> RateLimitingSampler
$cmax :: RateLimitingSampler -> RateLimitingSampler -> RateLimitingSampler
>= :: RateLimitingSampler -> RateLimitingSampler -> Bool
$c>= :: RateLimitingSampler -> RateLimitingSampler -> Bool
> :: RateLimitingSampler -> RateLimitingSampler -> Bool
$c> :: RateLimitingSampler -> RateLimitingSampler -> Bool
<= :: RateLimitingSampler -> RateLimitingSampler -> Bool
$c<= :: RateLimitingSampler -> RateLimitingSampler -> Bool
< :: RateLimitingSampler -> RateLimitingSampler -> Bool
$c< :: RateLimitingSampler -> RateLimitingSampler -> Bool
compare :: RateLimitingSampler -> RateLimitingSampler -> Ordering
$ccompare :: RateLimitingSampler -> RateLimitingSampler -> Ordering
$cp1Ord :: Eq RateLimitingSampler
Prelude.Ord)
instance Prelude.Show RateLimitingSampler where
  showsPrec :: Int -> RateLimitingSampler -> ShowS
showsPrec Int
_ RateLimitingSampler
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RateLimitingSampler -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RateLimitingSampler
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RateLimitingSampler "qps" Data.Int.Int64 where
  fieldOf :: Proxy# "qps"
-> (Int64 -> f Int64)
-> RateLimitingSampler
-> f RateLimitingSampler
fieldOf Proxy# "qps"
_
    = ((Int64 -> f Int64)
 -> RateLimitingSampler -> f RateLimitingSampler)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RateLimitingSampler
-> f RateLimitingSampler
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RateLimitingSampler -> Int64)
-> (RateLimitingSampler -> Int64 -> RateLimitingSampler)
-> Lens RateLimitingSampler RateLimitingSampler Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RateLimitingSampler -> Int64
_RateLimitingSampler'qps
           (\ RateLimitingSampler
x__ Int64
y__ -> RateLimitingSampler
x__ {_RateLimitingSampler'qps :: Int64
_RateLimitingSampler'qps = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RateLimitingSampler where
  messageName :: Proxy RateLimitingSampler -> Text
messageName Proxy RateLimitingSampler
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.trace.v1.RateLimitingSampler"
  packedMessageDescriptor :: Proxy RateLimitingSampler -> ByteString
packedMessageDescriptor Proxy RateLimitingSampler
_
    = ByteString
"\n\
      \\DC3RateLimitingSampler\DC2\DLE\n\
      \\ETXqps\CAN\SOH \SOH(\ETXR\ETXqps"
  packedFileDescriptor :: Proxy RateLimitingSampler -> ByteString
packedFileDescriptor Proxy RateLimitingSampler
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RateLimitingSampler)
fieldsByTag
    = let
        qps__field_descriptor :: FieldDescriptor RateLimitingSampler
qps__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor RateLimitingSampler Int64
-> FieldDescriptor RateLimitingSampler
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"qps"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens RateLimitingSampler RateLimitingSampler Int64 Int64
-> FieldAccessor RateLimitingSampler Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "qps" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"qps")) ::
              Data.ProtoLens.FieldDescriptor RateLimitingSampler
      in
        [(Tag, FieldDescriptor RateLimitingSampler)]
-> Map Tag (FieldDescriptor RateLimitingSampler)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RateLimitingSampler
qps__field_descriptor)]
  unknownFields :: LensLike' f RateLimitingSampler FieldSet
unknownFields
    = (RateLimitingSampler -> FieldSet)
-> (RateLimitingSampler -> FieldSet -> RateLimitingSampler)
-> Lens' RateLimitingSampler FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RateLimitingSampler -> FieldSet
_RateLimitingSampler'_unknownFields
        (\ RateLimitingSampler
x__ FieldSet
y__ -> RateLimitingSampler
x__ {_RateLimitingSampler'_unknownFields :: FieldSet
_RateLimitingSampler'_unknownFields = FieldSet
y__})
  defMessage :: RateLimitingSampler
defMessage
    = RateLimitingSampler'_constructor :: Int64 -> FieldSet -> RateLimitingSampler
RateLimitingSampler'_constructor
        {_RateLimitingSampler'qps :: Int64
_RateLimitingSampler'qps = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RateLimitingSampler'_unknownFields :: FieldSet
_RateLimitingSampler'_unknownFields = []}
  parseMessage :: Parser RateLimitingSampler
parseMessage
    = let
        loop ::
          RateLimitingSampler
          -> Data.ProtoLens.Encoding.Bytes.Parser RateLimitingSampler
        loop :: RateLimitingSampler -> Parser RateLimitingSampler
loop RateLimitingSampler
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      RateLimitingSampler -> Parser RateLimitingSampler
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter RateLimitingSampler RateLimitingSampler FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> RateLimitingSampler
-> RateLimitingSampler
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter RateLimitingSampler RateLimitingSampler FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) RateLimitingSampler
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
8 -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"qps"
                                RateLimitingSampler -> Parser RateLimitingSampler
loop (Setter RateLimitingSampler RateLimitingSampler Int64 Int64
-> Int64 -> RateLimitingSampler -> RateLimitingSampler
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "qps" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"qps") Int64
y RateLimitingSampler
x)
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                RateLimitingSampler -> Parser RateLimitingSampler
loop
                                  (Setter RateLimitingSampler RateLimitingSampler FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> RateLimitingSampler
-> RateLimitingSampler
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter RateLimitingSampler RateLimitingSampler FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) RateLimitingSampler
x)
      in
        Parser RateLimitingSampler -> String -> Parser RateLimitingSampler
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RateLimitingSampler -> Parser RateLimitingSampler
loop RateLimitingSampler
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"RateLimitingSampler"
  buildMessage :: RateLimitingSampler -> Builder
buildMessage
    = \ RateLimitingSampler
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Int64
_v = FoldLike Int64 RateLimitingSampler RateLimitingSampler Int64 Int64
-> RateLimitingSampler -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "qps" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"qps") RateLimitingSampler
_x
              in
                if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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
8)
                      ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet RateLimitingSampler RateLimitingSampler FieldSet FieldSet
-> RateLimitingSampler -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet RateLimitingSampler RateLimitingSampler FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields RateLimitingSampler
_x))
instance Control.DeepSeq.NFData RateLimitingSampler where
  rnf :: RateLimitingSampler -> ()
rnf
    = \ RateLimitingSampler
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RateLimitingSampler -> FieldSet
_RateLimitingSampler'_unknownFields RateLimitingSampler
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (RateLimitingSampler -> Int64
_RateLimitingSampler'qps RateLimitingSampler
x__) ())
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maxNumberOfAttributes' @:: Lens' TraceConfig Data.Int.Int64@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maxNumberOfTimedEvents' @:: Lens' TraceConfig Data.Int.Int64@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maxNumberOfAttributesPerTimedEvent' @:: Lens' TraceConfig Data.Int.Int64@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maxNumberOfLinks' @:: Lens' TraceConfig Data.Int.Int64@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maxNumberOfAttributesPerLink' @:: Lens' TraceConfig Data.Int.Int64@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maybe'sampler' @:: Lens' TraceConfig (Prelude.Maybe TraceConfig'Sampler)@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maybe'constantSampler' @:: Lens' TraceConfig (Prelude.Maybe ConstantSampler)@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.constantSampler' @:: Lens' TraceConfig ConstantSampler@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maybe'traceIdRatioBased' @:: Lens' TraceConfig (Prelude.Maybe TraceIdRatioBased)@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.traceIdRatioBased' @:: Lens' TraceConfig TraceIdRatioBased@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.maybe'rateLimitingSampler' @:: Lens' TraceConfig (Prelude.Maybe RateLimitingSampler)@
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.rateLimitingSampler' @:: Lens' TraceConfig RateLimitingSampler@ -}
data TraceConfig
  = TraceConfig'_constructor {TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributes :: !Data.Int.Int64,
                              TraceConfig -> Int64
_TraceConfig'maxNumberOfTimedEvents :: !Data.Int.Int64,
                              TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributesPerTimedEvent :: !Data.Int.Int64,
                              TraceConfig -> Int64
_TraceConfig'maxNumberOfLinks :: !Data.Int.Int64,
                              TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributesPerLink :: !Data.Int.Int64,
                              TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler :: !(Prelude.Maybe TraceConfig'Sampler),
                              TraceConfig -> FieldSet
_TraceConfig'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TraceConfig -> TraceConfig -> Bool
(TraceConfig -> TraceConfig -> Bool)
-> (TraceConfig -> TraceConfig -> Bool) -> Eq TraceConfig
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TraceConfig -> TraceConfig -> Bool
$c/= :: TraceConfig -> TraceConfig -> Bool
== :: TraceConfig -> TraceConfig -> Bool
$c== :: TraceConfig -> TraceConfig -> Bool
Prelude.Eq, Eq TraceConfig
Eq TraceConfig
-> (TraceConfig -> TraceConfig -> Ordering)
-> (TraceConfig -> TraceConfig -> Bool)
-> (TraceConfig -> TraceConfig -> Bool)
-> (TraceConfig -> TraceConfig -> Bool)
-> (TraceConfig -> TraceConfig -> Bool)
-> (TraceConfig -> TraceConfig -> TraceConfig)
-> (TraceConfig -> TraceConfig -> TraceConfig)
-> Ord TraceConfig
TraceConfig -> TraceConfig -> Bool
TraceConfig -> TraceConfig -> Ordering
TraceConfig -> TraceConfig -> TraceConfig
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
min :: TraceConfig -> TraceConfig -> TraceConfig
$cmin :: TraceConfig -> TraceConfig -> TraceConfig
max :: TraceConfig -> TraceConfig -> TraceConfig
$cmax :: TraceConfig -> TraceConfig -> TraceConfig
>= :: TraceConfig -> TraceConfig -> Bool
$c>= :: TraceConfig -> TraceConfig -> Bool
> :: TraceConfig -> TraceConfig -> Bool
$c> :: TraceConfig -> TraceConfig -> Bool
<= :: TraceConfig -> TraceConfig -> Bool
$c<= :: TraceConfig -> TraceConfig -> Bool
< :: TraceConfig -> TraceConfig -> Bool
$c< :: TraceConfig -> TraceConfig -> Bool
compare :: TraceConfig -> TraceConfig -> Ordering
$ccompare :: TraceConfig -> TraceConfig -> Ordering
$cp1Ord :: Eq TraceConfig
Prelude.Ord)
instance Prelude.Show TraceConfig where
  showsPrec :: Int -> TraceConfig -> ShowS
showsPrec Int
_ TraceConfig
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (TraceConfig -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TraceConfig
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data TraceConfig'Sampler
  = TraceConfig'ConstantSampler !ConstantSampler |
    TraceConfig'TraceIdRatioBased !TraceIdRatioBased |
    TraceConfig'RateLimitingSampler !RateLimitingSampler
  deriving stock (Int -> TraceConfig'Sampler -> ShowS
[TraceConfig'Sampler] -> ShowS
TraceConfig'Sampler -> String
(Int -> TraceConfig'Sampler -> ShowS)
-> (TraceConfig'Sampler -> String)
-> ([TraceConfig'Sampler] -> ShowS)
-> Show TraceConfig'Sampler
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TraceConfig'Sampler] -> ShowS
$cshowList :: [TraceConfig'Sampler] -> ShowS
show :: TraceConfig'Sampler -> String
$cshow :: TraceConfig'Sampler -> String
showsPrec :: Int -> TraceConfig'Sampler -> ShowS
$cshowsPrec :: Int -> TraceConfig'Sampler -> ShowS
Prelude.Show, TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
(TraceConfig'Sampler -> TraceConfig'Sampler -> Bool)
-> (TraceConfig'Sampler -> TraceConfig'Sampler -> Bool)
-> Eq TraceConfig'Sampler
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
$c/= :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
== :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
$c== :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
Prelude.Eq, Eq TraceConfig'Sampler
Eq TraceConfig'Sampler
-> (TraceConfig'Sampler -> TraceConfig'Sampler -> Ordering)
-> (TraceConfig'Sampler -> TraceConfig'Sampler -> Bool)
-> (TraceConfig'Sampler -> TraceConfig'Sampler -> Bool)
-> (TraceConfig'Sampler -> TraceConfig'Sampler -> Bool)
-> (TraceConfig'Sampler -> TraceConfig'Sampler -> Bool)
-> (TraceConfig'Sampler
    -> TraceConfig'Sampler -> TraceConfig'Sampler)
-> (TraceConfig'Sampler
    -> TraceConfig'Sampler -> TraceConfig'Sampler)
-> Ord TraceConfig'Sampler
TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
TraceConfig'Sampler -> TraceConfig'Sampler -> Ordering
TraceConfig'Sampler -> TraceConfig'Sampler -> TraceConfig'Sampler
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
min :: TraceConfig'Sampler -> TraceConfig'Sampler -> TraceConfig'Sampler
$cmin :: TraceConfig'Sampler -> TraceConfig'Sampler -> TraceConfig'Sampler
max :: TraceConfig'Sampler -> TraceConfig'Sampler -> TraceConfig'Sampler
$cmax :: TraceConfig'Sampler -> TraceConfig'Sampler -> TraceConfig'Sampler
>= :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
$c>= :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
> :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
$c> :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
<= :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
$c<= :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
< :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
$c< :: TraceConfig'Sampler -> TraceConfig'Sampler -> Bool
compare :: TraceConfig'Sampler -> TraceConfig'Sampler -> Ordering
$ccompare :: TraceConfig'Sampler -> TraceConfig'Sampler -> Ordering
$cp1Ord :: Eq TraceConfig'Sampler
Prelude.Ord)
instance Data.ProtoLens.Field.HasField TraceConfig "maxNumberOfAttributes" Data.Int.Int64 where
  fieldOf :: Proxy# "maxNumberOfAttributes"
-> (Int64 -> f Int64) -> TraceConfig -> f TraceConfig
fieldOf Proxy# "maxNumberOfAttributes"
_
    = ((Int64 -> f Int64) -> TraceConfig -> f TraceConfig)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Int64)
-> (TraceConfig -> Int64 -> TraceConfig)
-> Lens TraceConfig TraceConfig Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributes
           (\ TraceConfig
x__ Int64
y__ -> TraceConfig
x__ {_TraceConfig'maxNumberOfAttributes :: Int64
_TraceConfig'maxNumberOfAttributes = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TraceConfig "maxNumberOfTimedEvents" Data.Int.Int64 where
  fieldOf :: Proxy# "maxNumberOfTimedEvents"
-> (Int64 -> f Int64) -> TraceConfig -> f TraceConfig
fieldOf Proxy# "maxNumberOfTimedEvents"
_
    = ((Int64 -> f Int64) -> TraceConfig -> f TraceConfig)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Int64)
-> (TraceConfig -> Int64 -> TraceConfig)
-> Lens TraceConfig TraceConfig Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Int64
_TraceConfig'maxNumberOfTimedEvents
           (\ TraceConfig
x__ Int64
y__ -> TraceConfig
x__ {_TraceConfig'maxNumberOfTimedEvents :: Int64
_TraceConfig'maxNumberOfTimedEvents = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TraceConfig "maxNumberOfAttributesPerTimedEvent" Data.Int.Int64 where
  fieldOf :: Proxy# "maxNumberOfAttributesPerTimedEvent"
-> (Int64 -> f Int64) -> TraceConfig -> f TraceConfig
fieldOf Proxy# "maxNumberOfAttributesPerTimedEvent"
_
    = ((Int64 -> f Int64) -> TraceConfig -> f TraceConfig)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Int64)
-> (TraceConfig -> Int64 -> TraceConfig)
-> Lens TraceConfig TraceConfig Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributesPerTimedEvent
           (\ TraceConfig
x__ Int64
y__
              -> TraceConfig
x__ {_TraceConfig'maxNumberOfAttributesPerTimedEvent :: Int64
_TraceConfig'maxNumberOfAttributesPerTimedEvent = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TraceConfig "maxNumberOfLinks" Data.Int.Int64 where
  fieldOf :: Proxy# "maxNumberOfLinks"
-> (Int64 -> f Int64) -> TraceConfig -> f TraceConfig
fieldOf Proxy# "maxNumberOfLinks"
_
    = ((Int64 -> f Int64) -> TraceConfig -> f TraceConfig)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Int64)
-> (TraceConfig -> Int64 -> TraceConfig)
-> Lens TraceConfig TraceConfig Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Int64
_TraceConfig'maxNumberOfLinks
           (\ TraceConfig
x__ Int64
y__ -> TraceConfig
x__ {_TraceConfig'maxNumberOfLinks :: Int64
_TraceConfig'maxNumberOfLinks = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TraceConfig "maxNumberOfAttributesPerLink" Data.Int.Int64 where
  fieldOf :: Proxy# "maxNumberOfAttributesPerLink"
-> (Int64 -> f Int64) -> TraceConfig -> f TraceConfig
fieldOf Proxy# "maxNumberOfAttributesPerLink"
_
    = ((Int64 -> f Int64) -> TraceConfig -> f TraceConfig)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Int64)
-> (TraceConfig -> Int64 -> TraceConfig)
-> Lens TraceConfig TraceConfig Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributesPerLink
           (\ TraceConfig
x__ Int64
y__
              -> TraceConfig
x__ {_TraceConfig'maxNumberOfAttributesPerLink :: Int64
_TraceConfig'maxNumberOfAttributesPerLink = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TraceConfig "maybe'sampler" (Prelude.Maybe TraceConfig'Sampler) where
  fieldOf :: Proxy# "maybe'sampler"
-> (Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> TraceConfig
-> f TraceConfig
fieldOf Proxy# "maybe'sampler"
_
    = ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
 -> TraceConfig -> f TraceConfig)
-> ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
    -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> (Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Maybe TraceConfig'Sampler)
-> (TraceConfig -> Maybe TraceConfig'Sampler -> TraceConfig)
-> Lens
     TraceConfig
     TraceConfig
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler
           (\ TraceConfig
x__ Maybe TraceConfig'Sampler
y__ -> TraceConfig
x__ {_TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
y__}))
        (Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TraceConfig "maybe'constantSampler" (Prelude.Maybe ConstantSampler) where
  fieldOf :: Proxy# "maybe'constantSampler"
-> (Maybe ConstantSampler -> f (Maybe ConstantSampler))
-> TraceConfig
-> f TraceConfig
fieldOf Proxy# "maybe'constantSampler"
_
    = ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
 -> TraceConfig -> f TraceConfig)
-> ((Maybe ConstantSampler -> f (Maybe ConstantSampler))
    -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> (Maybe ConstantSampler -> f (Maybe ConstantSampler))
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Maybe TraceConfig'Sampler)
-> (TraceConfig -> Maybe TraceConfig'Sampler -> TraceConfig)
-> Lens
     TraceConfig
     TraceConfig
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler
           (\ TraceConfig
x__ Maybe TraceConfig'Sampler
y__ -> TraceConfig
x__ {_TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
y__}))
        ((Maybe TraceConfig'Sampler -> Maybe ConstantSampler)
-> (Maybe TraceConfig'Sampler
    -> Maybe ConstantSampler -> Maybe TraceConfig'Sampler)
-> Lens
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
     (Maybe ConstantSampler)
     (Maybe ConstantSampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe TraceConfig'Sampler
x__
              -> case Maybe TraceConfig'Sampler
x__ of
                   (Prelude.Just (TraceConfig'ConstantSampler ConstantSampler
x__val))
                     -> ConstantSampler -> Maybe ConstantSampler
forall a. a -> Maybe a
Prelude.Just ConstantSampler
x__val
                   Maybe TraceConfig'Sampler
_otherwise -> Maybe ConstantSampler
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe TraceConfig'Sampler
_ Maybe ConstantSampler
y__ -> (ConstantSampler -> TraceConfig'Sampler)
-> Maybe ConstantSampler -> Maybe TraceConfig'Sampler
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ConstantSampler -> TraceConfig'Sampler
TraceConfig'ConstantSampler Maybe ConstantSampler
y__))
instance Data.ProtoLens.Field.HasField TraceConfig "constantSampler" ConstantSampler where
  fieldOf :: Proxy# "constantSampler"
-> (ConstantSampler -> f ConstantSampler)
-> TraceConfig
-> f TraceConfig
fieldOf Proxy# "constantSampler"
_
    = ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
 -> TraceConfig -> f TraceConfig)
-> ((ConstantSampler -> f ConstantSampler)
    -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> (ConstantSampler -> f ConstantSampler)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Maybe TraceConfig'Sampler)
-> (TraceConfig -> Maybe TraceConfig'Sampler -> TraceConfig)
-> Lens
     TraceConfig
     TraceConfig
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler
           (\ TraceConfig
x__ Maybe TraceConfig'Sampler
y__ -> TraceConfig
x__ {_TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
y__}))
        (((Maybe ConstantSampler -> f (Maybe ConstantSampler))
 -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> ((ConstantSampler -> f ConstantSampler)
    -> Maybe ConstantSampler -> f (Maybe ConstantSampler))
-> (ConstantSampler -> f ConstantSampler)
-> Maybe TraceConfig'Sampler
-> f (Maybe TraceConfig'Sampler)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe TraceConfig'Sampler -> Maybe ConstantSampler)
-> (Maybe TraceConfig'Sampler
    -> Maybe ConstantSampler -> Maybe TraceConfig'Sampler)
-> Lens
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
     (Maybe ConstantSampler)
     (Maybe ConstantSampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe TraceConfig'Sampler
x__
                 -> case Maybe TraceConfig'Sampler
x__ of
                      (Prelude.Just (TraceConfig'ConstantSampler ConstantSampler
x__val))
                        -> ConstantSampler -> Maybe ConstantSampler
forall a. a -> Maybe a
Prelude.Just ConstantSampler
x__val
                      Maybe TraceConfig'Sampler
_otherwise -> Maybe ConstantSampler
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe TraceConfig'Sampler
_ Maybe ConstantSampler
y__ -> (ConstantSampler -> TraceConfig'Sampler)
-> Maybe ConstantSampler -> Maybe TraceConfig'Sampler
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ConstantSampler -> TraceConfig'Sampler
TraceConfig'ConstantSampler Maybe ConstantSampler
y__))
           (ConstantSampler -> Lens' (Maybe ConstantSampler) ConstantSampler
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ConstantSampler
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField TraceConfig "maybe'traceIdRatioBased" (Prelude.Maybe TraceIdRatioBased) where
  fieldOf :: Proxy# "maybe'traceIdRatioBased"
-> (Maybe TraceIdRatioBased -> f (Maybe TraceIdRatioBased))
-> TraceConfig
-> f TraceConfig
fieldOf Proxy# "maybe'traceIdRatioBased"
_
    = ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
 -> TraceConfig -> f TraceConfig)
-> ((Maybe TraceIdRatioBased -> f (Maybe TraceIdRatioBased))
    -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> (Maybe TraceIdRatioBased -> f (Maybe TraceIdRatioBased))
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Maybe TraceConfig'Sampler)
-> (TraceConfig -> Maybe TraceConfig'Sampler -> TraceConfig)
-> Lens
     TraceConfig
     TraceConfig
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler
           (\ TraceConfig
x__ Maybe TraceConfig'Sampler
y__ -> TraceConfig
x__ {_TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
y__}))
        ((Maybe TraceConfig'Sampler -> Maybe TraceIdRatioBased)
-> (Maybe TraceConfig'Sampler
    -> Maybe TraceIdRatioBased -> Maybe TraceConfig'Sampler)
-> Lens
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
     (Maybe TraceIdRatioBased)
     (Maybe TraceIdRatioBased)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe TraceConfig'Sampler
x__
              -> case Maybe TraceConfig'Sampler
x__ of
                   (Prelude.Just (TraceConfig'TraceIdRatioBased TraceIdRatioBased
x__val))
                     -> TraceIdRatioBased -> Maybe TraceIdRatioBased
forall a. a -> Maybe a
Prelude.Just TraceIdRatioBased
x__val
                   Maybe TraceConfig'Sampler
_otherwise -> Maybe TraceIdRatioBased
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe TraceConfig'Sampler
_ Maybe TraceIdRatioBased
y__ -> (TraceIdRatioBased -> TraceConfig'Sampler)
-> Maybe TraceIdRatioBased -> Maybe TraceConfig'Sampler
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TraceIdRatioBased -> TraceConfig'Sampler
TraceConfig'TraceIdRatioBased Maybe TraceIdRatioBased
y__))
instance Data.ProtoLens.Field.HasField TraceConfig "traceIdRatioBased" TraceIdRatioBased where
  fieldOf :: Proxy# "traceIdRatioBased"
-> (TraceIdRatioBased -> f TraceIdRatioBased)
-> TraceConfig
-> f TraceConfig
fieldOf Proxy# "traceIdRatioBased"
_
    = ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
 -> TraceConfig -> f TraceConfig)
-> ((TraceIdRatioBased -> f TraceIdRatioBased)
    -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> (TraceIdRatioBased -> f TraceIdRatioBased)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Maybe TraceConfig'Sampler)
-> (TraceConfig -> Maybe TraceConfig'Sampler -> TraceConfig)
-> Lens
     TraceConfig
     TraceConfig
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler
           (\ TraceConfig
x__ Maybe TraceConfig'Sampler
y__ -> TraceConfig
x__ {_TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
y__}))
        (((Maybe TraceIdRatioBased -> f (Maybe TraceIdRatioBased))
 -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> ((TraceIdRatioBased -> f TraceIdRatioBased)
    -> Maybe TraceIdRatioBased -> f (Maybe TraceIdRatioBased))
-> (TraceIdRatioBased -> f TraceIdRatioBased)
-> Maybe TraceConfig'Sampler
-> f (Maybe TraceConfig'Sampler)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe TraceConfig'Sampler -> Maybe TraceIdRatioBased)
-> (Maybe TraceConfig'Sampler
    -> Maybe TraceIdRatioBased -> Maybe TraceConfig'Sampler)
-> Lens
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
     (Maybe TraceIdRatioBased)
     (Maybe TraceIdRatioBased)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe TraceConfig'Sampler
x__
                 -> case Maybe TraceConfig'Sampler
x__ of
                      (Prelude.Just (TraceConfig'TraceIdRatioBased TraceIdRatioBased
x__val))
                        -> TraceIdRatioBased -> Maybe TraceIdRatioBased
forall a. a -> Maybe a
Prelude.Just TraceIdRatioBased
x__val
                      Maybe TraceConfig'Sampler
_otherwise -> Maybe TraceIdRatioBased
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe TraceConfig'Sampler
_ Maybe TraceIdRatioBased
y__ -> (TraceIdRatioBased -> TraceConfig'Sampler)
-> Maybe TraceIdRatioBased -> Maybe TraceConfig'Sampler
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TraceIdRatioBased -> TraceConfig'Sampler
TraceConfig'TraceIdRatioBased Maybe TraceIdRatioBased
y__))
           (TraceIdRatioBased
-> Lens' (Maybe TraceIdRatioBased) TraceIdRatioBased
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TraceIdRatioBased
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField TraceConfig "maybe'rateLimitingSampler" (Prelude.Maybe RateLimitingSampler) where
  fieldOf :: Proxy# "maybe'rateLimitingSampler"
-> (Maybe RateLimitingSampler -> f (Maybe RateLimitingSampler))
-> TraceConfig
-> f TraceConfig
fieldOf Proxy# "maybe'rateLimitingSampler"
_
    = ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
 -> TraceConfig -> f TraceConfig)
-> ((Maybe RateLimitingSampler -> f (Maybe RateLimitingSampler))
    -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> (Maybe RateLimitingSampler -> f (Maybe RateLimitingSampler))
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Maybe TraceConfig'Sampler)
-> (TraceConfig -> Maybe TraceConfig'Sampler -> TraceConfig)
-> Lens
     TraceConfig
     TraceConfig
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler
           (\ TraceConfig
x__ Maybe TraceConfig'Sampler
y__ -> TraceConfig
x__ {_TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
y__}))
        ((Maybe TraceConfig'Sampler -> Maybe RateLimitingSampler)
-> (Maybe TraceConfig'Sampler
    -> Maybe RateLimitingSampler -> Maybe TraceConfig'Sampler)
-> Lens
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
     (Maybe RateLimitingSampler)
     (Maybe RateLimitingSampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe TraceConfig'Sampler
x__
              -> case Maybe TraceConfig'Sampler
x__ of
                   (Prelude.Just (TraceConfig'RateLimitingSampler RateLimitingSampler
x__val))
                     -> RateLimitingSampler -> Maybe RateLimitingSampler
forall a. a -> Maybe a
Prelude.Just RateLimitingSampler
x__val
                   Maybe TraceConfig'Sampler
_otherwise -> Maybe RateLimitingSampler
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe TraceConfig'Sampler
_ Maybe RateLimitingSampler
y__ -> (RateLimitingSampler -> TraceConfig'Sampler)
-> Maybe RateLimitingSampler -> Maybe TraceConfig'Sampler
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RateLimitingSampler -> TraceConfig'Sampler
TraceConfig'RateLimitingSampler Maybe RateLimitingSampler
y__))
instance Data.ProtoLens.Field.HasField TraceConfig "rateLimitingSampler" RateLimitingSampler where
  fieldOf :: Proxy# "rateLimitingSampler"
-> (RateLimitingSampler -> f RateLimitingSampler)
-> TraceConfig
-> f TraceConfig
fieldOf Proxy# "rateLimitingSampler"
_
    = ((Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
 -> TraceConfig -> f TraceConfig)
-> ((RateLimitingSampler -> f RateLimitingSampler)
    -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> (RateLimitingSampler -> f RateLimitingSampler)
-> TraceConfig
-> f TraceConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceConfig -> Maybe TraceConfig'Sampler)
-> (TraceConfig -> Maybe TraceConfig'Sampler -> TraceConfig)
-> Lens
     TraceConfig
     TraceConfig
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler
           (\ TraceConfig
x__ Maybe TraceConfig'Sampler
y__ -> TraceConfig
x__ {_TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
y__}))
        (((Maybe RateLimitingSampler -> f (Maybe RateLimitingSampler))
 -> Maybe TraceConfig'Sampler -> f (Maybe TraceConfig'Sampler))
-> ((RateLimitingSampler -> f RateLimitingSampler)
    -> Maybe RateLimitingSampler -> f (Maybe RateLimitingSampler))
-> (RateLimitingSampler -> f RateLimitingSampler)
-> Maybe TraceConfig'Sampler
-> f (Maybe TraceConfig'Sampler)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe TraceConfig'Sampler -> Maybe RateLimitingSampler)
-> (Maybe TraceConfig'Sampler
    -> Maybe RateLimitingSampler -> Maybe TraceConfig'Sampler)
-> Lens
     (Maybe TraceConfig'Sampler)
     (Maybe TraceConfig'Sampler)
     (Maybe RateLimitingSampler)
     (Maybe RateLimitingSampler)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe TraceConfig'Sampler
x__
                 -> case Maybe TraceConfig'Sampler
x__ of
                      (Prelude.Just (TraceConfig'RateLimitingSampler RateLimitingSampler
x__val))
                        -> RateLimitingSampler -> Maybe RateLimitingSampler
forall a. a -> Maybe a
Prelude.Just RateLimitingSampler
x__val
                      Maybe TraceConfig'Sampler
_otherwise -> Maybe RateLimitingSampler
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe TraceConfig'Sampler
_ Maybe RateLimitingSampler
y__ -> (RateLimitingSampler -> TraceConfig'Sampler)
-> Maybe RateLimitingSampler -> Maybe TraceConfig'Sampler
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RateLimitingSampler -> TraceConfig'Sampler
TraceConfig'RateLimitingSampler Maybe RateLimitingSampler
y__))
           (RateLimitingSampler
-> Lens' (Maybe RateLimitingSampler) RateLimitingSampler
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RateLimitingSampler
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message TraceConfig where
  messageName :: Proxy TraceConfig -> Text
messageName Proxy TraceConfig
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.trace.v1.TraceConfig"
  packedMessageDescriptor :: Proxy TraceConfig -> ByteString
packedMessageDescriptor Proxy TraceConfig
_
    = ByteString
"\n\
      \\vTraceConfig\DC2Z\n\
      \\DLEconstant_sampler\CAN\SOH \SOH(\v2-.opentelemetry.proto.trace.v1.ConstantSamplerH\NULR\SIconstantSampler\DC2b\n\
      \\DC4trace_id_ratio_based\CAN\STX \SOH(\v2/.opentelemetry.proto.trace.v1.TraceIdRatioBasedH\NULR\DC1traceIdRatioBased\DC2g\n\
      \\NAKrate_limiting_sampler\CAN\ETX \SOH(\v21.opentelemetry.proto.trace.v1.RateLimitingSamplerH\NULR\DC3rateLimitingSampler\DC27\n\
      \\CANmax_number_of_attributes\CAN\EOT \SOH(\ETXR\NAKmaxNumberOfAttributes\DC2:\n\
      \\SUBmax_number_of_timed_events\CAN\ENQ \SOH(\ETXR\SYNmaxNumberOfTimedEvents\DC2T\n\
      \(max_number_of_attributes_per_timed_event\CAN\ACK \SOH(\ETXR\"maxNumberOfAttributesPerTimedEvent\DC2-\n\
      \\DC3max_number_of_links\CAN\a \SOH(\ETXR\DLEmaxNumberOfLinks\DC2G\n\
      \!max_number_of_attributes_per_link\CAN\b \SOH(\ETXR\FSmaxNumberOfAttributesPerLinkB\t\n\
      \\asampler"
  packedFileDescriptor :: Proxy TraceConfig -> ByteString
packedFileDescriptor Proxy TraceConfig
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TraceConfig)
fieldsByTag
    = let
        maxNumberOfAttributes__field_descriptor :: FieldDescriptor TraceConfig
maxNumberOfAttributes__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TraceConfig Int64
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max_number_of_attributes"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens TraceConfig TraceConfig Int64 Int64
-> FieldAccessor TraceConfig Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfAttributes")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
        maxNumberOfTimedEvents__field_descriptor :: FieldDescriptor TraceConfig
maxNumberOfTimedEvents__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TraceConfig Int64
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max_number_of_timed_events"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens TraceConfig TraceConfig Int64 Int64
-> FieldAccessor TraceConfig Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "maxNumberOfTimedEvents" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfTimedEvents")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
        maxNumberOfAttributesPerTimedEvent__field_descriptor :: FieldDescriptor TraceConfig
maxNumberOfAttributesPerTimedEvent__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TraceConfig Int64
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max_number_of_attributes_per_timed_event"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens TraceConfig TraceConfig Int64 Int64
-> FieldAccessor TraceConfig Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributesPerTimedEvent" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maxNumberOfAttributesPerTimedEvent")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
        maxNumberOfLinks__field_descriptor :: FieldDescriptor TraceConfig
maxNumberOfLinks__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TraceConfig Int64
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max_number_of_links"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens TraceConfig TraceConfig Int64 Int64
-> FieldAccessor TraceConfig Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "maxNumberOfLinks" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfLinks")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
        maxNumberOfAttributesPerLink__field_descriptor :: FieldDescriptor TraceConfig
maxNumberOfAttributesPerLink__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TraceConfig Int64
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max_number_of_attributes_per_link"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens TraceConfig TraceConfig Int64 Int64
-> FieldAccessor TraceConfig Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributesPerLink" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfAttributesPerLink")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
        constantSampler__field_descriptor :: FieldDescriptor TraceConfig
constantSampler__field_descriptor
          = String
-> FieldTypeDescriptor ConstantSampler
-> FieldAccessor TraceConfig ConstantSampler
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"constant_sampler"
              (MessageOrGroup -> FieldTypeDescriptor ConstantSampler
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ConstantSampler)
              (Lens' TraceConfig (Maybe ConstantSampler)
-> FieldAccessor TraceConfig ConstantSampler
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'constantSampler" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'constantSampler")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
        traceIdRatioBased__field_descriptor :: FieldDescriptor TraceConfig
traceIdRatioBased__field_descriptor
          = String
-> FieldTypeDescriptor TraceIdRatioBased
-> FieldAccessor TraceConfig TraceIdRatioBased
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"trace_id_ratio_based"
              (MessageOrGroup -> FieldTypeDescriptor TraceIdRatioBased
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TraceIdRatioBased)
              (Lens' TraceConfig (Maybe TraceIdRatioBased)
-> FieldAccessor TraceConfig TraceIdRatioBased
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'traceIdRatioBased" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'traceIdRatioBased")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
        rateLimitingSampler__field_descriptor :: FieldDescriptor TraceConfig
rateLimitingSampler__field_descriptor
          = String
-> FieldTypeDescriptor RateLimitingSampler
-> FieldAccessor TraceConfig RateLimitingSampler
-> FieldDescriptor TraceConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rate_limiting_sampler"
              (MessageOrGroup -> FieldTypeDescriptor RateLimitingSampler
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RateLimitingSampler)
              (Lens' TraceConfig (Maybe RateLimitingSampler)
-> FieldAccessor TraceConfig RateLimitingSampler
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'rateLimitingSampler" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'rateLimitingSampler")) ::
              Data.ProtoLens.FieldDescriptor TraceConfig
      in
        [(Tag, FieldDescriptor TraceConfig)]
-> Map Tag (FieldDescriptor TraceConfig)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor TraceConfig
maxNumberOfAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor TraceConfig
maxNumberOfTimedEvents__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, 
            FieldDescriptor TraceConfig
maxNumberOfAttributesPerTimedEvent__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor TraceConfig
maxNumberOfLinks__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, 
            FieldDescriptor TraceConfig
maxNumberOfAttributesPerLink__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor TraceConfig
constantSampler__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor TraceConfig
traceIdRatioBased__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor TraceConfig
rateLimitingSampler__field_descriptor)]
  unknownFields :: LensLike' f TraceConfig FieldSet
unknownFields
    = (TraceConfig -> FieldSet)
-> (TraceConfig -> FieldSet -> TraceConfig)
-> Lens' TraceConfig FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TraceConfig -> FieldSet
_TraceConfig'_unknownFields
        (\ TraceConfig
x__ FieldSet
y__ -> TraceConfig
x__ {_TraceConfig'_unknownFields :: FieldSet
_TraceConfig'_unknownFields = FieldSet
y__})
  defMessage :: TraceConfig
defMessage
    = TraceConfig'_constructor :: Int64
-> Int64
-> Int64
-> Int64
-> Int64
-> Maybe TraceConfig'Sampler
-> FieldSet
-> TraceConfig
TraceConfig'_constructor
        {_TraceConfig'maxNumberOfAttributes :: Int64
_TraceConfig'maxNumberOfAttributes = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TraceConfig'maxNumberOfTimedEvents :: Int64
_TraceConfig'maxNumberOfTimedEvents = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TraceConfig'maxNumberOfAttributesPerTimedEvent :: Int64
_TraceConfig'maxNumberOfAttributesPerTimedEvent = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TraceConfig'maxNumberOfLinks :: Int64
_TraceConfig'maxNumberOfLinks = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TraceConfig'maxNumberOfAttributesPerLink :: Int64
_TraceConfig'maxNumberOfAttributesPerLink = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TraceConfig'sampler :: Maybe TraceConfig'Sampler
_TraceConfig'sampler = Maybe TraceConfig'Sampler
forall a. Maybe a
Prelude.Nothing,
         _TraceConfig'_unknownFields :: FieldSet
_TraceConfig'_unknownFields = []}
  parseMessage :: Parser TraceConfig
parseMessage
    = let
        loop ::
          TraceConfig -> Data.ProtoLens.Encoding.Bytes.Parser TraceConfig
        loop :: TraceConfig -> Parser TraceConfig
loop TraceConfig
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      TraceConfig -> Parser TraceConfig
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter TraceConfig TraceConfig FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter TraceConfig TraceConfig FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) TraceConfig
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
32
                          -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"max_number_of_attributes"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig Int64 Int64
-> Int64 -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfAttributes") Int64
y TraceConfig
x)
                        Word64
40
                          -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"max_number_of_timed_events"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig Int64 Int64
-> Int64 -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "maxNumberOfTimedEvents" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfTimedEvents") Int64
y TraceConfig
x)
                        Word64
48
                          -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"max_number_of_attributes_per_timed_event"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig Int64 Int64
-> Int64 -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributesPerTimedEvent" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                        @"maxNumberOfAttributesPerTimedEvent")
                                     Int64
y TraceConfig
x)
                        Word64
56
                          -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"max_number_of_links"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig Int64 Int64
-> Int64 -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "maxNumberOfLinks" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfLinks") Int64
y TraceConfig
x)
                        Word64
64
                          -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"max_number_of_attributes_per_link"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig Int64 Int64
-> Int64 -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributesPerLink" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfAttributesPerLink") Int64
y
                                     TraceConfig
x)
                        Word64
10
                          -> do ConstantSampler
y <- Parser ConstantSampler -> String -> Parser ConstantSampler
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser ConstantSampler -> Parser ConstantSampler
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser ConstantSampler
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"constant_sampler"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig ConstantSampler ConstantSampler
-> ConstantSampler -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "constantSampler" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"constantSampler") ConstantSampler
y TraceConfig
x)
                        Word64
18
                          -> do TraceIdRatioBased
y <- Parser TraceIdRatioBased -> String -> Parser TraceIdRatioBased
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser TraceIdRatioBased -> Parser TraceIdRatioBased
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TraceIdRatioBased
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"trace_id_ratio_based"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig TraceIdRatioBased TraceIdRatioBased
-> TraceIdRatioBased -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "traceIdRatioBased" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceIdRatioBased") TraceIdRatioBased
y TraceConfig
x)
                        Word64
26
                          -> do RateLimitingSampler
y <- Parser RateLimitingSampler -> String -> Parser RateLimitingSampler
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser RateLimitingSampler -> Parser RateLimitingSampler
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser RateLimitingSampler
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"rate_limiting_sampler"
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter
  TraceConfig TraceConfig RateLimitingSampler RateLimitingSampler
-> RateLimitingSampler -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "rateLimitingSampler" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"rateLimitingSampler") RateLimitingSampler
y TraceConfig
x)
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                TraceConfig -> Parser TraceConfig
loop
                                  (Setter TraceConfig TraceConfig FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TraceConfig -> TraceConfig
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter TraceConfig TraceConfig FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) TraceConfig
x)
      in
        Parser TraceConfig -> String -> Parser TraceConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TraceConfig -> Parser TraceConfig
loop TraceConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"TraceConfig"
  buildMessage :: TraceConfig -> Builder
buildMessage
    = \ TraceConfig
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike Int64 TraceConfig TraceConfig Int64 Int64
-> TraceConfig -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfAttributes") TraceConfig
_x
              in
                if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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
32)
                      ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike Int64 TraceConfig TraceConfig Int64 Int64
-> TraceConfig -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "maxNumberOfTimedEvents" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfTimedEvents") TraceConfig
_x
                 in
                   if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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
40)
                         ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int64
_v
                        = FoldLike Int64 TraceConfig TraceConfig Int64 Int64
-> TraceConfig -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributesPerTimedEvent" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfAttributesPerTimedEvent")
                            TraceConfig
_x
                    in
                      if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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
48)
                            ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Int64
_v
                           = FoldLike Int64 TraceConfig TraceConfig Int64 Int64
-> TraceConfig -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "maxNumberOfLinks" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfLinks") TraceConfig
_x
                       in
                         if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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
56)
                               ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Int64
_v
                              = FoldLike Int64 TraceConfig TraceConfig Int64 Int64
-> TraceConfig -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "maxNumberOfAttributesPerLink" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxNumberOfAttributesPerLink") TraceConfig
_x
                          in
                            if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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
64)
                                  ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                     Int64
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe TraceConfig'Sampler)
  TraceConfig
  TraceConfig
  (Maybe TraceConfig'Sampler)
  (Maybe TraceConfig'Sampler)
-> TraceConfig -> Maybe TraceConfig'Sampler
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'sampler" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'sampler") TraceConfig
_x
                             of
                               Maybe TraceConfig'Sampler
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               (Prelude.Just (TraceConfig'ConstantSampler ConstantSampler
v))
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                                      ((ByteString -> Builder)
-> (ConstantSampler -> ByteString) -> ConstantSampler -> 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))
                                         ConstantSampler -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ConstantSampler
v)
                               (Prelude.Just (TraceConfig'TraceIdRatioBased TraceIdRatioBased
v))
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                                      ((ByteString -> Builder)
-> (TraceIdRatioBased -> ByteString)
-> TraceIdRatioBased
-> 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))
                                         TraceIdRatioBased -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TraceIdRatioBased
v)
                               (Prelude.Just (TraceConfig'RateLimitingSampler RateLimitingSampler
v))
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                                      ((ByteString -> Builder)
-> (RateLimitingSampler -> ByteString)
-> RateLimitingSampler
-> 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))
                                         RateLimitingSampler -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RateLimitingSampler
v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike FieldSet TraceConfig TraceConfig FieldSet FieldSet
-> TraceConfig -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet TraceConfig TraceConfig FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields TraceConfig
_x)))))))
instance Control.DeepSeq.NFData TraceConfig where
  rnf :: TraceConfig -> ()
rnf
    = \ TraceConfig
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TraceConfig -> FieldSet
_TraceConfig'_unknownFields TraceConfig
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributes TraceConfig
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TraceConfig -> Int64
_TraceConfig'maxNumberOfTimedEvents TraceConfig
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributesPerTimedEvent TraceConfig
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (TraceConfig -> Int64
_TraceConfig'maxNumberOfLinks TraceConfig
x__)
                         (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (TraceConfig -> Int64
_TraceConfig'maxNumberOfAttributesPerLink TraceConfig
x__)
                            (Maybe TraceConfig'Sampler -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (TraceConfig -> Maybe TraceConfig'Sampler
_TraceConfig'sampler TraceConfig
x__) ()))))))
instance Control.DeepSeq.NFData TraceConfig'Sampler where
  rnf :: TraceConfig'Sampler -> ()
rnf (TraceConfig'ConstantSampler ConstantSampler
x__) = ConstantSampler -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ConstantSampler
x__
  rnf (TraceConfig'TraceIdRatioBased TraceIdRatioBased
x__) = TraceIdRatioBased -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf TraceIdRatioBased
x__
  rnf (TraceConfig'RateLimitingSampler RateLimitingSampler
x__) = RateLimitingSampler -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf RateLimitingSampler
x__
_TraceConfig'ConstantSampler ::
  Data.ProtoLens.Prism.Prism' TraceConfig'Sampler ConstantSampler
_TraceConfig'ConstantSampler :: p ConstantSampler (f ConstantSampler)
-> p TraceConfig'Sampler (f TraceConfig'Sampler)
_TraceConfig'ConstantSampler
  = (ConstantSampler -> TraceConfig'Sampler)
-> (TraceConfig'Sampler -> Maybe ConstantSampler)
-> Prism
     TraceConfig'Sampler
     TraceConfig'Sampler
     ConstantSampler
     ConstantSampler
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ConstantSampler -> TraceConfig'Sampler
TraceConfig'ConstantSampler
      (\ TraceConfig'Sampler
p__
         -> case TraceConfig'Sampler
p__ of
              (TraceConfig'ConstantSampler ConstantSampler
p__val) -> ConstantSampler -> Maybe ConstantSampler
forall a. a -> Maybe a
Prelude.Just ConstantSampler
p__val
              TraceConfig'Sampler
_otherwise -> Maybe ConstantSampler
forall a. Maybe a
Prelude.Nothing)
_TraceConfig'TraceIdRatioBased ::
  Data.ProtoLens.Prism.Prism' TraceConfig'Sampler TraceIdRatioBased
_TraceConfig'TraceIdRatioBased :: p TraceIdRatioBased (f TraceIdRatioBased)
-> p TraceConfig'Sampler (f TraceConfig'Sampler)
_TraceConfig'TraceIdRatioBased
  = (TraceIdRatioBased -> TraceConfig'Sampler)
-> (TraceConfig'Sampler -> Maybe TraceIdRatioBased)
-> Prism
     TraceConfig'Sampler
     TraceConfig'Sampler
     TraceIdRatioBased
     TraceIdRatioBased
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      TraceIdRatioBased -> TraceConfig'Sampler
TraceConfig'TraceIdRatioBased
      (\ TraceConfig'Sampler
p__
         -> case TraceConfig'Sampler
p__ of
              (TraceConfig'TraceIdRatioBased TraceIdRatioBased
p__val) -> TraceIdRatioBased -> Maybe TraceIdRatioBased
forall a. a -> Maybe a
Prelude.Just TraceIdRatioBased
p__val
              TraceConfig'Sampler
_otherwise -> Maybe TraceIdRatioBased
forall a. Maybe a
Prelude.Nothing)
_TraceConfig'RateLimitingSampler ::
  Data.ProtoLens.Prism.Prism' TraceConfig'Sampler RateLimitingSampler
_TraceConfig'RateLimitingSampler :: p RateLimitingSampler (f RateLimitingSampler)
-> p TraceConfig'Sampler (f TraceConfig'Sampler)
_TraceConfig'RateLimitingSampler
  = (RateLimitingSampler -> TraceConfig'Sampler)
-> (TraceConfig'Sampler -> Maybe RateLimitingSampler)
-> Prism
     TraceConfig'Sampler
     TraceConfig'Sampler
     RateLimitingSampler
     RateLimitingSampler
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      RateLimitingSampler -> TraceConfig'Sampler
TraceConfig'RateLimitingSampler
      (\ TraceConfig'Sampler
p__
         -> case TraceConfig'Sampler
p__ of
              (TraceConfig'RateLimitingSampler RateLimitingSampler
p__val) -> RateLimitingSampler -> Maybe RateLimitingSampler
forall a. a -> Maybe a
Prelude.Just RateLimitingSampler
p__val
              TraceConfig'Sampler
_otherwise -> Maybe RateLimitingSampler
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Trace.V1.TraceConfig_Fields.samplingRatio' @:: Lens' TraceIdRatioBased Prelude.Double@ -}
data TraceIdRatioBased
  = TraceIdRatioBased'_constructor {TraceIdRatioBased -> Double
_TraceIdRatioBased'samplingRatio :: !Prelude.Double,
                                    TraceIdRatioBased -> FieldSet
_TraceIdRatioBased'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TraceIdRatioBased -> TraceIdRatioBased -> Bool
(TraceIdRatioBased -> TraceIdRatioBased -> Bool)
-> (TraceIdRatioBased -> TraceIdRatioBased -> Bool)
-> Eq TraceIdRatioBased
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
$c/= :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
== :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
$c== :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
Prelude.Eq, Eq TraceIdRatioBased
Eq TraceIdRatioBased
-> (TraceIdRatioBased -> TraceIdRatioBased -> Ordering)
-> (TraceIdRatioBased -> TraceIdRatioBased -> Bool)
-> (TraceIdRatioBased -> TraceIdRatioBased -> Bool)
-> (TraceIdRatioBased -> TraceIdRatioBased -> Bool)
-> (TraceIdRatioBased -> TraceIdRatioBased -> Bool)
-> (TraceIdRatioBased -> TraceIdRatioBased -> TraceIdRatioBased)
-> (TraceIdRatioBased -> TraceIdRatioBased -> TraceIdRatioBased)
-> Ord TraceIdRatioBased
TraceIdRatioBased -> TraceIdRatioBased -> Bool
TraceIdRatioBased -> TraceIdRatioBased -> Ordering
TraceIdRatioBased -> TraceIdRatioBased -> TraceIdRatioBased
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
min :: TraceIdRatioBased -> TraceIdRatioBased -> TraceIdRatioBased
$cmin :: TraceIdRatioBased -> TraceIdRatioBased -> TraceIdRatioBased
max :: TraceIdRatioBased -> TraceIdRatioBased -> TraceIdRatioBased
$cmax :: TraceIdRatioBased -> TraceIdRatioBased -> TraceIdRatioBased
>= :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
$c>= :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
> :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
$c> :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
<= :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
$c<= :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
< :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
$c< :: TraceIdRatioBased -> TraceIdRatioBased -> Bool
compare :: TraceIdRatioBased -> TraceIdRatioBased -> Ordering
$ccompare :: TraceIdRatioBased -> TraceIdRatioBased -> Ordering
$cp1Ord :: Eq TraceIdRatioBased
Prelude.Ord)
instance Prelude.Show TraceIdRatioBased where
  showsPrec :: Int -> TraceIdRatioBased -> ShowS
showsPrec Int
_ TraceIdRatioBased
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (TraceIdRatioBased -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TraceIdRatioBased
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField TraceIdRatioBased "samplingRatio" Prelude.Double where
  fieldOf :: Proxy# "samplingRatio"
-> (Double -> f Double) -> TraceIdRatioBased -> f TraceIdRatioBased
fieldOf Proxy# "samplingRatio"
_
    = ((Double -> f Double) -> TraceIdRatioBased -> f TraceIdRatioBased)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> TraceIdRatioBased
-> f TraceIdRatioBased
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TraceIdRatioBased -> Double)
-> (TraceIdRatioBased -> Double -> TraceIdRatioBased)
-> Lens TraceIdRatioBased TraceIdRatioBased Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TraceIdRatioBased -> Double
_TraceIdRatioBased'samplingRatio
           (\ TraceIdRatioBased
x__ Double
y__ -> TraceIdRatioBased
x__ {_TraceIdRatioBased'samplingRatio :: Double
_TraceIdRatioBased'samplingRatio = Double
y__}))
        (Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TraceIdRatioBased where
  messageName :: Proxy TraceIdRatioBased -> Text
messageName Proxy TraceIdRatioBased
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.trace.v1.TraceIdRatioBased"
  packedMessageDescriptor :: Proxy TraceIdRatioBased -> ByteString
packedMessageDescriptor Proxy TraceIdRatioBased
_
    = ByteString
"\n\
      \\DC1TraceIdRatioBased\DC2$\n\
      \\rsamplingRatio\CAN\SOH \SOH(\SOHR\rsamplingRatio"
  packedFileDescriptor :: Proxy TraceIdRatioBased -> ByteString
packedFileDescriptor Proxy TraceIdRatioBased
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TraceIdRatioBased)
fieldsByTag
    = let
        samplingRatio__field_descriptor :: FieldDescriptor TraceIdRatioBased
samplingRatio__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor TraceIdRatioBased Double
-> FieldDescriptor TraceIdRatioBased
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"samplingRatio"
              (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 TraceIdRatioBased TraceIdRatioBased Double Double
-> FieldAccessor TraceIdRatioBased 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 s a (f :: * -> *).
(HasField s "samplingRatio" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"samplingRatio")) ::
              Data.ProtoLens.FieldDescriptor TraceIdRatioBased
      in
        [(Tag, FieldDescriptor TraceIdRatioBased)]
-> Map Tag (FieldDescriptor TraceIdRatioBased)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor TraceIdRatioBased
samplingRatio__field_descriptor)]
  unknownFields :: LensLike' f TraceIdRatioBased FieldSet
unknownFields
    = (TraceIdRatioBased -> FieldSet)
-> (TraceIdRatioBased -> FieldSet -> TraceIdRatioBased)
-> Lens' TraceIdRatioBased FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TraceIdRatioBased -> FieldSet
_TraceIdRatioBased'_unknownFields
        (\ TraceIdRatioBased
x__ FieldSet
y__ -> TraceIdRatioBased
x__ {_TraceIdRatioBased'_unknownFields :: FieldSet
_TraceIdRatioBased'_unknownFields = FieldSet
y__})
  defMessage :: TraceIdRatioBased
defMessage
    = TraceIdRatioBased'_constructor :: Double -> FieldSet -> TraceIdRatioBased
TraceIdRatioBased'_constructor
        {_TraceIdRatioBased'samplingRatio :: Double
_TraceIdRatioBased'samplingRatio = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TraceIdRatioBased'_unknownFields :: FieldSet
_TraceIdRatioBased'_unknownFields = []}
  parseMessage :: Parser TraceIdRatioBased
parseMessage
    = let
        loop ::
          TraceIdRatioBased
          -> Data.ProtoLens.Encoding.Bytes.Parser TraceIdRatioBased
        loop :: TraceIdRatioBased -> Parser TraceIdRatioBased
loop TraceIdRatioBased
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      TraceIdRatioBased -> Parser TraceIdRatioBased
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter TraceIdRatioBased TraceIdRatioBased FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TraceIdRatioBased -> TraceIdRatioBased
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter TraceIdRatioBased TraceIdRatioBased FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) TraceIdRatioBased
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
9 -> do Double
y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Double) -> Parser Word64 -> Parser Double
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
"samplingRatio"
                                TraceIdRatioBased -> Parser TraceIdRatioBased
loop
                                  (Setter TraceIdRatioBased TraceIdRatioBased Double Double
-> Double -> TraceIdRatioBased -> TraceIdRatioBased
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "samplingRatio" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"samplingRatio") Double
y TraceIdRatioBased
x)
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                TraceIdRatioBased -> Parser TraceIdRatioBased
loop
                                  (Setter TraceIdRatioBased TraceIdRatioBased FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TraceIdRatioBased -> TraceIdRatioBased
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter TraceIdRatioBased TraceIdRatioBased FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) TraceIdRatioBased
x)
      in
        Parser TraceIdRatioBased -> String -> Parser TraceIdRatioBased
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TraceIdRatioBased -> Parser TraceIdRatioBased
loop TraceIdRatioBased
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"TraceIdRatioBased"
  buildMessage :: TraceIdRatioBased -> Builder
buildMessage
    = \ TraceIdRatioBased
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Double
_v
                  = FoldLike Double TraceIdRatioBased TraceIdRatioBased Double Double
-> TraceIdRatioBased -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "samplingRatio" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"samplingRatio") TraceIdRatioBased
_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))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet TraceIdRatioBased TraceIdRatioBased FieldSet FieldSet
-> TraceIdRatioBased -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet TraceIdRatioBased TraceIdRatioBased FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields TraceIdRatioBased
_x))
instance Control.DeepSeq.NFData TraceIdRatioBased where
  rnf :: TraceIdRatioBased -> ()
rnf
    = \ TraceIdRatioBased
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TraceIdRatioBased -> FieldSet
_TraceIdRatioBased'_unknownFields TraceIdRatioBased
x__)
             (Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (TraceIdRatioBased -> Double
_TraceIdRatioBased'samplingRatio TraceIdRatioBased
x__) ())
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = ByteString
"\n\
    \/opentelemetry/proto/trace/v1/trace_config.proto\DC2\FSopentelemetry.proto.trace.v1\"\132\ENQ\n\
    \\vTraceConfig\DC2Z\n\
    \\DLEconstant_sampler\CAN\SOH \SOH(\v2-.opentelemetry.proto.trace.v1.ConstantSamplerH\NULR\SIconstantSampler\DC2b\n\
    \\DC4trace_id_ratio_based\CAN\STX \SOH(\v2/.opentelemetry.proto.trace.v1.TraceIdRatioBasedH\NULR\DC1traceIdRatioBased\DC2g\n\
    \\NAKrate_limiting_sampler\CAN\ETX \SOH(\v21.opentelemetry.proto.trace.v1.RateLimitingSamplerH\NULR\DC3rateLimitingSampler\DC27\n\
    \\CANmax_number_of_attributes\CAN\EOT \SOH(\ETXR\NAKmaxNumberOfAttributes\DC2:\n\
    \\SUBmax_number_of_timed_events\CAN\ENQ \SOH(\ETXR\SYNmaxNumberOfTimedEvents\DC2T\n\
    \(max_number_of_attributes_per_timed_event\CAN\ACK \SOH(\ETXR\"maxNumberOfAttributesPerTimedEvent\DC2-\n\
    \\DC3max_number_of_links\CAN\a \SOH(\ETXR\DLEmaxNumberOfLinks\DC2G\n\
    \!max_number_of_attributes_per_link\CAN\b \SOH(\ETXR\FSmaxNumberOfAttributesPerLinkB\t\n\
    \\asampler\"\179\SOH\n\
    \\SIConstantSampler\DC2Z\n\
    \\bdecision\CAN\SOH \SOH(\SO2>.opentelemetry.proto.trace.v1.ConstantSampler.ConstantDecisionR\bdecision\"D\n\
    \\DLEConstantDecision\DC2\SO\n\
    \\n\
    \ALWAYS_OFF\DLE\NUL\DC2\r\n\
    \\tALWAYS_ON\DLE\SOH\DC2\DC1\n\
    \\rALWAYS_PARENT\DLE\STX\"9\n\
    \\DC1TraceIdRatioBased\DC2$\n\
    \\rsamplingRatio\CAN\SOH \SOH(\SOHR\rsamplingRatio\"'\n\
    \\DC3RateLimitingSampler\DC2\DLE\n\
    \\ETXqps\CAN\SOH \SOH(\ETXR\ETXqpsB~\n\
    \\USio.opentelemetry.proto.trace.v1B\DLETraceConfigProtoP\SOHZGgithub.com/open-telemetry/opentelemetry-proto/gen/go/collector/trace/v1J\139\DC4\n\
    \\ACK\DC2\EOT\SO\NULM\SOH\n\
    \\200\EOT\n\
    \\SOH\f\DC2\ETX\SO\NUL\DC22\189\EOT Copyright 2019, OpenTelemetry Authors\n\
    \\n\
    \ Licensed under the Apache License, Version 2.0 (the \"License\");\n\
    \ you may not use this file except in compliance with the License.\n\
    \ You may obtain a copy of the License at\n\
    \\n\
    \     http://www.apache.org/licenses/LICENSE-2.0\n\
    \\n\
    \ Unless required by applicable law or agreed to in writing, software\n\
    \ distributed under the License is distributed on an \"AS IS\" BASIS,\n\
    \ WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.\n\
    \ See the License for the specific language governing permissions and\n\
    \ limitations under the License.\n\
    \\n\
    \\b\n\
    \\SOH\STX\DC2\ETX\DLE\NUL%\n\
    \\b\n\
    \\SOH\b\DC2\ETX\DC2\NUL\"\n\
    \\t\n\
    \\STX\b\n\
    \\DC2\ETX\DC2\NUL\"\n\
    \\b\n\
    \\SOH\b\DC2\ETX\DC3\NUL8\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\DC3\NUL8\n\
    \\b\n\
    \\SOH\b\DC2\ETX\DC4\NUL1\n\
    \\t\n\
    \\STX\b\b\DC2\ETX\DC4\NUL1\n\
    \\b\n\
    \\SOH\b\DC2\ETX\NAK\NUL^\n\
    \\t\n\
    \\STX\b\v\DC2\ETX\NAK\NUL^\n\
    \\145\SOH\n\
    \\STX\EOT\NUL\DC2\EOT\EM\NUL2\SOH\SUB\132\SOH Global configuration of the trace service. All fields must be specified, or\n\
    \ the default (zero) values will be used for each type.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX\EM\b\DC3\n\
    \S\n\
    \\EOT\EOT\NUL\b\NUL\DC2\EOT\FS\STX\"\ETX\SUBE The global default sampler used to make decisions on span sampling.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\b\NUL\SOH\DC2\ETX\FS\b\SI\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX\GS\EOT)\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX\GS\EOT\DC3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\GS\DC4$\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\GS'(\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX\US\EOT/\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\US\EOT\NAK\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\US\SYN*\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\US-.\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX!\EOT2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ACK\DC2\ETX!\EOT\ETB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX!\CAN-\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX!01\n\
    \D\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX%\STX%\SUB7 The global default max number of attributes per span.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX%\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX%\b \n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX%#$\n\
    \K\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETX(\STX&\SUB> The global default max number of annotation events per span.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ENQ\DC2\ETX(\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX(\b\"\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX($%\n\
    \K\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETX+\STX5\SUB> The global default max number of attributes per timed event.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETX+\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX+\b0\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX+34\n\
    \F\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETX.\STX \SUB9 The global default max number of link entries per span.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETX.\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX.\b\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX.\RS\US\n\
    \D\n\
    \\EOT\EOT\NUL\STX\a\DC2\ETX1\STX.\SUB7 The global default max number of attributes per span.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ENQ\DC2\ETX1\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETX1\b)\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETX1,-\n\
    \M\n\
    \\STX\EOT\SOH\DC2\EOT5\NUL@\SOH\SUBA Sampler that always makes a constant decision on span sampling.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\SOH\DC2\ETX5\b\ETB\n\
    \\135\SOH\n\
    \\EOT\EOT\SOH\EOT\NUL\DC2\EOT:\STX>\ETX\SUBy How spans should be sampled:\n\
    \ - Always off\n\
    \ - Always on\n\
    \ - Always follow the parent Span's decision (off if no parent).\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\EOT\NUL\SOH\DC2\ETX:\a\ETB\n\
    \\r\n\
    \\ACK\EOT\SOH\EOT\NUL\STX\NUL\DC2\ETX;\EOT\DC3\n\
    \\SO\n\
    \\a\EOT\SOH\EOT\NUL\STX\NUL\SOH\DC2\ETX;\EOT\SO\n\
    \\SO\n\
    \\a\EOT\SOH\EOT\NUL\STX\NUL\STX\DC2\ETX;\DC1\DC2\n\
    \\r\n\
    \\ACK\EOT\SOH\EOT\NUL\STX\SOH\DC2\ETX<\EOT\DC2\n\
    \\SO\n\
    \\a\EOT\SOH\EOT\NUL\STX\SOH\SOH\DC2\ETX<\EOT\r\n\
    \\SO\n\
    \\a\EOT\SOH\EOT\NUL\STX\SOH\STX\DC2\ETX<\DLE\DC1\n\
    \\r\n\
    \\ACK\EOT\SOH\EOT\NUL\STX\STX\DC2\ETX=\EOT\SYN\n\
    \\SO\n\
    \\a\EOT\SOH\EOT\NUL\STX\STX\SOH\DC2\ETX=\EOT\DC1\n\
    \\SO\n\
    \\a\EOT\SOH\EOT\NUL\STX\STX\STX\DC2\ETX=\DC4\NAK\n\
    \\v\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\ETX?\STX \n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX?\STX\DC2\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX?\DC3\ESC\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX?\RS\US\n\
    \\152\SOH\n\
    \\STX\EOT\STX\DC2\EOTD\NULG\SOH\SUB\139\SOH Sampler that tries to uniformly sample traces with a given ratio.\n\
    \ The ratio of sampling a trace is equal to that of the specified ratio.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\STX\SOH\DC2\ETXD\b\EM\n\
    \H\n\
    \\EOT\EOT\STX\STX\NUL\DC2\ETXF\STX\ESC\SUB; The desired ratio of sampling. Must be within [0.0, 1.0].\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETXF\STX\b\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETXF\t\SYN\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETXF\EM\SUB\n\
    \G\n\
    \\STX\EOT\ETX\DC2\EOTJ\NULM\SOH\SUB; Sampler that tries to sample with a rate per time window.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\ETX\SOH\DC2\ETXJ\b\ESC\n\
    \\US\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\ETXL\STX\DLE\SUB\DC2 Rate per second.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETXL\STX\a\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETXL\b\v\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETXL\SO\SIb\ACKproto3"