{-# 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 OTel.SDK.OTLP.Bindings.Logs.V1.Logs (
LogRecord(), LogRecordFlags(..), LogRecordFlags(),
LogRecordFlags'UnrecognizedValue, LogsData(), ResourceLogs(),
ScopeLogs(), SeverityNumber(..), SeverityNumber(),
SeverityNumber'UnrecognizedValue
) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
import qualified OTel.SDK.OTLP.Bindings.Common.V1.Common
import qualified OTel.SDK.OTLP.Bindings.Resource.V1.Resource
data LogRecord
= LogRecord'_constructor {LogRecord -> Word64
_LogRecord'timeUnixNano :: !Data.Word.Word64,
LogRecord -> Word64
_LogRecord'observedTimeUnixNano :: !Data.Word.Word64,
LogRecord -> SeverityNumber
_LogRecord'severityNumber :: !SeverityNumber,
LogRecord -> Text
_LogRecord'severityText :: !Data.Text.Text,
LogRecord -> Maybe AnyValue
_LogRecord'body :: !(Prelude.Maybe OTel.SDK.OTLP.Bindings.Common.V1.Common.AnyValue),
LogRecord -> Vector KeyValue
_LogRecord'attributes :: !(Data.Vector.Vector OTel.SDK.OTLP.Bindings.Common.V1.Common.KeyValue),
LogRecord -> Word32
_LogRecord'droppedAttributesCount :: !Data.Word.Word32,
LogRecord -> Word32
_LogRecord'flags :: !Data.Word.Word32,
LogRecord -> ByteString
_LogRecord'traceId :: !Data.ByteString.ByteString,
LogRecord -> ByteString
_LogRecord'spanId :: !Data.ByteString.ByteString,
LogRecord -> FieldSet
_LogRecord'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (LogRecord -> LogRecord -> Bool
(LogRecord -> LogRecord -> Bool)
-> (LogRecord -> LogRecord -> Bool) -> Eq LogRecord
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LogRecord -> LogRecord -> Bool
== :: LogRecord -> LogRecord -> Bool
$c/= :: LogRecord -> LogRecord -> Bool
/= :: LogRecord -> LogRecord -> Bool
Prelude.Eq, Eq LogRecord
Eq LogRecord =>
(LogRecord -> LogRecord -> Ordering)
-> (LogRecord -> LogRecord -> Bool)
-> (LogRecord -> LogRecord -> Bool)
-> (LogRecord -> LogRecord -> Bool)
-> (LogRecord -> LogRecord -> Bool)
-> (LogRecord -> LogRecord -> LogRecord)
-> (LogRecord -> LogRecord -> LogRecord)
-> Ord LogRecord
LogRecord -> LogRecord -> Bool
LogRecord -> LogRecord -> Ordering
LogRecord -> LogRecord -> LogRecord
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: LogRecord -> LogRecord -> Ordering
compare :: LogRecord -> LogRecord -> Ordering
$c< :: LogRecord -> LogRecord -> Bool
< :: LogRecord -> LogRecord -> Bool
$c<= :: LogRecord -> LogRecord -> Bool
<= :: LogRecord -> LogRecord -> Bool
$c> :: LogRecord -> LogRecord -> Bool
> :: LogRecord -> LogRecord -> Bool
$c>= :: LogRecord -> LogRecord -> Bool
>= :: LogRecord -> LogRecord -> Bool
$cmax :: LogRecord -> LogRecord -> LogRecord
max :: LogRecord -> LogRecord -> LogRecord
$cmin :: LogRecord -> LogRecord -> LogRecord
min :: LogRecord -> LogRecord -> LogRecord
Prelude.Ord)
instance Prelude.Show LogRecord where
showsPrec :: Int -> LogRecord -> ShowS
showsPrec Int
_ LogRecord
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(LogRecord -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort LogRecord
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField LogRecord "timeUnixNano" Data.Word.Word64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timeUnixNano"
-> (Word64 -> f Word64) -> LogRecord -> f LogRecord
fieldOf Proxy# "timeUnixNano"
_
= ((Word64 -> f Word64) -> LogRecord -> f LogRecord)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Word64)
-> (LogRecord -> Word64 -> LogRecord)
-> Lens LogRecord LogRecord Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Word64
_LogRecord'timeUnixNano
(\ LogRecord
x__ Word64
y__ -> LogRecord
x__ {_LogRecord'timeUnixNano = y__}))
(Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "observedTimeUnixNano" Data.Word.Word64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "observedTimeUnixNano"
-> (Word64 -> f Word64) -> LogRecord -> f LogRecord
fieldOf Proxy# "observedTimeUnixNano"
_
= ((Word64 -> f Word64) -> LogRecord -> f LogRecord)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Word64)
-> (LogRecord -> Word64 -> LogRecord)
-> Lens LogRecord LogRecord Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Word64
_LogRecord'observedTimeUnixNano
(\ LogRecord
x__ Word64
y__ -> LogRecord
x__ {_LogRecord'observedTimeUnixNano = y__}))
(Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "severityNumber" SeverityNumber where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "severityNumber"
-> (SeverityNumber -> f SeverityNumber) -> LogRecord -> f LogRecord
fieldOf Proxy# "severityNumber"
_
= ((SeverityNumber -> f SeverityNumber) -> LogRecord -> f LogRecord)
-> ((SeverityNumber -> f SeverityNumber)
-> SeverityNumber -> f SeverityNumber)
-> (SeverityNumber -> f SeverityNumber)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> SeverityNumber)
-> (LogRecord -> SeverityNumber -> LogRecord)
-> Lens LogRecord LogRecord SeverityNumber SeverityNumber
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> SeverityNumber
_LogRecord'severityNumber
(\ LogRecord
x__ SeverityNumber
y__ -> LogRecord
x__ {_LogRecord'severityNumber = y__}))
(SeverityNumber -> f SeverityNumber)
-> SeverityNumber -> f SeverityNumber
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "severityText" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "severityText"
-> (Text -> f Text) -> LogRecord -> f LogRecord
fieldOf Proxy# "severityText"
_
= ((Text -> f Text) -> LogRecord -> f LogRecord)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Text)
-> (LogRecord -> Text -> LogRecord)
-> Lens LogRecord LogRecord Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Text
_LogRecord'severityText
(\ LogRecord
x__ Text
y__ -> LogRecord
x__ {_LogRecord'severityText = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "body" OTel.SDK.OTLP.Bindings.Common.V1.Common.AnyValue where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "body"
-> (AnyValue -> f AnyValue) -> LogRecord -> f LogRecord
fieldOf Proxy# "body"
_
= ((Maybe AnyValue -> f (Maybe AnyValue))
-> LogRecord -> f LogRecord)
-> ((AnyValue -> f AnyValue)
-> Maybe AnyValue -> f (Maybe AnyValue))
-> (AnyValue -> f AnyValue)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Maybe AnyValue)
-> (LogRecord -> Maybe AnyValue -> LogRecord)
-> Lens LogRecord LogRecord (Maybe AnyValue) (Maybe AnyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Maybe AnyValue
_LogRecord'body (\ LogRecord
x__ Maybe AnyValue
y__ -> LogRecord
x__ {_LogRecord'body = y__}))
(AnyValue -> Lens' (Maybe AnyValue) AnyValue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens AnyValue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField LogRecord "maybe'body" (Prelude.Maybe OTel.SDK.OTLP.Bindings.Common.V1.Common.AnyValue) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'body"
-> (Maybe AnyValue -> f (Maybe AnyValue))
-> LogRecord
-> f LogRecord
fieldOf Proxy# "maybe'body"
_
= ((Maybe AnyValue -> f (Maybe AnyValue))
-> LogRecord -> f LogRecord)
-> ((Maybe AnyValue -> f (Maybe AnyValue))
-> Maybe AnyValue -> f (Maybe AnyValue))
-> (Maybe AnyValue -> f (Maybe AnyValue))
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Maybe AnyValue)
-> (LogRecord -> Maybe AnyValue -> LogRecord)
-> Lens LogRecord LogRecord (Maybe AnyValue) (Maybe AnyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Maybe AnyValue
_LogRecord'body (\ LogRecord
x__ Maybe AnyValue
y__ -> LogRecord
x__ {_LogRecord'body = y__}))
(Maybe AnyValue -> f (Maybe AnyValue))
-> Maybe AnyValue -> f (Maybe AnyValue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "attributes" [OTel.SDK.OTLP.Bindings.Common.V1.Common.KeyValue] where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attributes"
-> ([KeyValue] -> f [KeyValue]) -> LogRecord -> f LogRecord
fieldOf Proxy# "attributes"
_
= ((Vector KeyValue -> f (Vector KeyValue))
-> LogRecord -> f LogRecord)
-> (([KeyValue] -> f [KeyValue])
-> Vector KeyValue -> f (Vector KeyValue))
-> ([KeyValue] -> f [KeyValue])
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Vector KeyValue)
-> (LogRecord -> Vector KeyValue -> LogRecord)
-> Lens LogRecord LogRecord (Vector KeyValue) (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Vector KeyValue
_LogRecord'attributes
(\ LogRecord
x__ Vector KeyValue
y__ -> LogRecord
x__ {_LogRecord'attributes = y__}))
((Vector KeyValue -> [KeyValue])
-> (Vector KeyValue -> [KeyValue] -> Vector KeyValue)
-> Lens (Vector KeyValue) (Vector KeyValue) [KeyValue] [KeyValue]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Vector KeyValue -> [KeyValue]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
(\ Vector KeyValue
_ [KeyValue]
y__ -> [KeyValue] -> Vector KeyValue
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [KeyValue]
y__))
instance Data.ProtoLens.Field.HasField LogRecord "vec'attributes" (Data.Vector.Vector OTel.SDK.OTLP.Bindings.Common.V1.Common.KeyValue) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'attributes"
-> (Vector KeyValue -> f (Vector KeyValue))
-> LogRecord
-> f LogRecord
fieldOf Proxy# "vec'attributes"
_
= ((Vector KeyValue -> f (Vector KeyValue))
-> LogRecord -> f LogRecord)
-> ((Vector KeyValue -> f (Vector KeyValue))
-> Vector KeyValue -> f (Vector KeyValue))
-> (Vector KeyValue -> f (Vector KeyValue))
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Vector KeyValue)
-> (LogRecord -> Vector KeyValue -> LogRecord)
-> Lens LogRecord LogRecord (Vector KeyValue) (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Vector KeyValue
_LogRecord'attributes
(\ LogRecord
x__ Vector KeyValue
y__ -> LogRecord
x__ {_LogRecord'attributes = y__}))
(Vector KeyValue -> f (Vector KeyValue))
-> Vector KeyValue -> f (Vector KeyValue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "droppedAttributesCount" Data.Word.Word32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "droppedAttributesCount"
-> (Word32 -> f Word32) -> LogRecord -> f LogRecord
fieldOf Proxy# "droppedAttributesCount"
_
= ((Word32 -> f Word32) -> LogRecord -> f LogRecord)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Word32)
-> (LogRecord -> Word32 -> LogRecord)
-> Lens LogRecord LogRecord Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Word32
_LogRecord'droppedAttributesCount
(\ LogRecord
x__ Word32
y__ -> LogRecord
x__ {_LogRecord'droppedAttributesCount = y__}))
(Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "flags" Data.Word.Word32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "flags" -> (Word32 -> f Word32) -> LogRecord -> f LogRecord
fieldOf Proxy# "flags"
_
= ((Word32 -> f Word32) -> LogRecord -> f LogRecord)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> Word32)
-> (LogRecord -> Word32 -> LogRecord)
-> Lens LogRecord LogRecord Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> Word32
_LogRecord'flags (\ LogRecord
x__ Word32
y__ -> LogRecord
x__ {_LogRecord'flags = y__}))
(Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "traceId" Data.ByteString.ByteString where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "traceId"
-> (ByteString -> f ByteString) -> LogRecord -> f LogRecord
fieldOf Proxy# "traceId"
_
= ((ByteString -> f ByteString) -> LogRecord -> f LogRecord)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> ByteString)
-> (LogRecord -> ByteString -> LogRecord)
-> Lens LogRecord LogRecord ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> ByteString
_LogRecord'traceId (\ LogRecord
x__ ByteString
y__ -> LogRecord
x__ {_LogRecord'traceId = y__}))
(ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LogRecord "spanId" Data.ByteString.ByteString where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "spanId"
-> (ByteString -> f ByteString) -> LogRecord -> f LogRecord
fieldOf Proxy# "spanId"
_
= ((ByteString -> f ByteString) -> LogRecord -> f LogRecord)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> LogRecord
-> f LogRecord
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogRecord -> ByteString)
-> (LogRecord -> ByteString -> LogRecord)
-> Lens LogRecord LogRecord ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> ByteString
_LogRecord'spanId (\ LogRecord
x__ ByteString
y__ -> LogRecord
x__ {_LogRecord'spanId = y__}))
(ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message LogRecord where
messageName :: Proxy LogRecord -> Text
messageName Proxy LogRecord
_
= String -> Text
Data.Text.pack String
"opentelemetry.proto.logs.v1.LogRecord"
packedMessageDescriptor :: Proxy LogRecord -> ByteString
packedMessageDescriptor Proxy LogRecord
_
= ByteString
"\n\
\\tLogRecord\DC2$\n\
\\SOtime_unix_nano\CAN\SOH \SOH(\ACKR\ftimeUnixNano\DC25\n\
\\ETBobserved_time_unix_nano\CAN\v \SOH(\ACKR\DC4observedTimeUnixNano\DC2T\n\
\\SIseverity_number\CAN\STX \SOH(\SO2+.opentelemetry.proto.logs.v1.SeverityNumberR\SOseverityNumber\DC2#\n\
\\rseverity_text\CAN\ETX \SOH(\tR\fseverityText\DC2;\n\
\\EOTbody\CAN\ENQ \SOH(\v2'.opentelemetry.proto.common.v1.AnyValueR\EOTbody\DC2G\n\
\\n\
\attributes\CAN\ACK \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
\attributes\DC28\n\
\\CANdropped_attributes_count\CAN\a \SOH(\rR\SYNdroppedAttributesCount\DC2\DC4\n\
\\ENQflags\CAN\b \SOH(\aR\ENQflags\DC2\EM\n\
\\btrace_id\CAN\t \SOH(\fR\atraceId\DC2\ETB\n\
\\aspan_id\CAN\n\
\ \SOH(\fR\ACKspanIdJ\EOT\b\EOT\DLE\ENQ"
packedFileDescriptor :: Proxy LogRecord -> ByteString
packedFileDescriptor Proxy LogRecord
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor LogRecord)
fieldsByTag
= let
timeUnixNano__field_descriptor :: FieldDescriptor LogRecord
timeUnixNano__field_descriptor
= String
-> FieldTypeDescriptor Word64
-> FieldAccessor LogRecord Word64
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"time_unix_nano"
(ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
(WireDefault Word64
-> Lens LogRecord LogRecord Word64 Word64
-> FieldAccessor LogRecord Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano")) ::
Data.ProtoLens.FieldDescriptor LogRecord
observedTimeUnixNano__field_descriptor :: FieldDescriptor LogRecord
observedTimeUnixNano__field_descriptor
= String
-> FieldTypeDescriptor Word64
-> FieldAccessor LogRecord Word64
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"observed_time_unix_nano"
(ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
(WireDefault Word64
-> Lens LogRecord LogRecord Word64 Word64
-> FieldAccessor LogRecord Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"observedTimeUnixNano")) ::
Data.ProtoLens.FieldDescriptor LogRecord
severityNumber__field_descriptor :: FieldDescriptor LogRecord
severityNumber__field_descriptor
= String
-> FieldTypeDescriptor SeverityNumber
-> FieldAccessor LogRecord SeverityNumber
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"severity_number"
(ScalarField SeverityNumber -> FieldTypeDescriptor SeverityNumber
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField SeverityNumber
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor SeverityNumber)
(WireDefault SeverityNumber
-> Lens LogRecord LogRecord SeverityNumber SeverityNumber
-> FieldAccessor LogRecord SeverityNumber
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault SeverityNumber
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severityNumber")) ::
Data.ProtoLens.FieldDescriptor LogRecord
severityText__field_descriptor :: FieldDescriptor LogRecord
severityText__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor LogRecord Text
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"severity_text"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens LogRecord LogRecord Text Text
-> FieldAccessor LogRecord Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severityText")) ::
Data.ProtoLens.FieldDescriptor LogRecord
body__field_descriptor :: FieldDescriptor LogRecord
body__field_descriptor
= String
-> FieldTypeDescriptor AnyValue
-> FieldAccessor LogRecord AnyValue
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"body"
(MessageOrGroup -> FieldTypeDescriptor AnyValue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OTel.SDK.OTLP.Bindings.Common.V1.Common.AnyValue)
(Lens LogRecord LogRecord (Maybe AnyValue) (Maybe AnyValue)
-> FieldAccessor LogRecord AnyValue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'body")) ::
Data.ProtoLens.FieldDescriptor LogRecord
attributes__field_descriptor :: FieldDescriptor LogRecord
attributes__field_descriptor
= String
-> FieldTypeDescriptor KeyValue
-> FieldAccessor LogRecord KeyValue
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"attributes"
(MessageOrGroup -> FieldTypeDescriptor KeyValue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OTel.SDK.OTLP.Bindings.Common.V1.Common.KeyValue)
(Packing
-> Lens' LogRecord [KeyValue] -> FieldAccessor LogRecord KeyValue
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Unpacked
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attributes")) ::
Data.ProtoLens.FieldDescriptor LogRecord
droppedAttributesCount__field_descriptor :: FieldDescriptor LogRecord
droppedAttributesCount__field_descriptor
= String
-> FieldTypeDescriptor Word32
-> FieldAccessor LogRecord Word32
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"dropped_attributes_count"
(ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
(WireDefault Word32
-> Lens LogRecord LogRecord Word32 Word32
-> FieldAccessor LogRecord Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"droppedAttributesCount")) ::
Data.ProtoLens.FieldDescriptor LogRecord
flags__field_descriptor :: FieldDescriptor LogRecord
flags__field_descriptor
= String
-> FieldTypeDescriptor Word32
-> FieldAccessor LogRecord Word32
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"flags"
(ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.Fixed32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
(WireDefault Word32
-> Lens LogRecord LogRecord Word32 Word32
-> FieldAccessor LogRecord Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags")) ::
Data.ProtoLens.FieldDescriptor LogRecord
traceId__field_descriptor :: FieldDescriptor LogRecord
traceId__field_descriptor
= String
-> FieldTypeDescriptor ByteString
-> FieldAccessor LogRecord ByteString
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"trace_id"
(ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(WireDefault ByteString
-> Lens LogRecord LogRecord ByteString ByteString
-> FieldAccessor LogRecord ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceId")) ::
Data.ProtoLens.FieldDescriptor LogRecord
spanId__field_descriptor :: FieldDescriptor LogRecord
spanId__field_descriptor
= String
-> FieldTypeDescriptor ByteString
-> FieldAccessor LogRecord ByteString
-> FieldDescriptor LogRecord
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"span_id"
(ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(WireDefault ByteString
-> Lens LogRecord LogRecord ByteString ByteString
-> FieldAccessor LogRecord ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"spanId")) ::
Data.ProtoLens.FieldDescriptor LogRecord
in
[(Tag, FieldDescriptor LogRecord)]
-> Map Tag (FieldDescriptor LogRecord)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor LogRecord
timeUnixNano__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor LogRecord
observedTimeUnixNano__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor LogRecord
severityNumber__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor LogRecord
severityText__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor LogRecord
body__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor LogRecord
attributes__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor LogRecord
droppedAttributesCount__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor LogRecord
flags__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor LogRecord
traceId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor LogRecord
spanId__field_descriptor)]
unknownFields :: Lens' LogRecord FieldSet
unknownFields
= (LogRecord -> FieldSet)
-> (LogRecord -> FieldSet -> LogRecord) -> Lens' LogRecord FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogRecord -> FieldSet
_LogRecord'_unknownFields
(\ LogRecord
x__ FieldSet
y__ -> LogRecord
x__ {_LogRecord'_unknownFields = y__})
defMessage :: LogRecord
defMessage
= LogRecord'_constructor
{_LogRecord'timeUnixNano :: Word64
_LogRecord'timeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'observedTimeUnixNano :: Word64
_LogRecord'observedTimeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'severityNumber :: SeverityNumber
_LogRecord'severityNumber = SeverityNumber
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'severityText :: Text
_LogRecord'severityText = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'body :: Maybe AnyValue
_LogRecord'body = Maybe AnyValue
forall a. Maybe a
Prelude.Nothing,
_LogRecord'attributes :: Vector KeyValue
_LogRecord'attributes = Vector KeyValue
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_LogRecord'droppedAttributesCount :: Word32
_LogRecord'droppedAttributesCount = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'flags :: Word32
_LogRecord'flags = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'traceId :: ByteString
_LogRecord'traceId = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'spanId :: ByteString
_LogRecord'spanId = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_LogRecord'_unknownFields :: FieldSet
_LogRecord'_unknownFields = []}
parseMessage :: Parser LogRecord
parseMessage
= let
loop ::
LogRecord
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OTel.SDK.OTLP.Bindings.Common.V1.Common.KeyValue
-> Data.ProtoLens.Encoding.Bytes.Parser LogRecord
loop :: LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop LogRecord
x Growing Vector RealWorld KeyValue
mutable'attributes
= do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if Bool
end then
do Vector KeyValue
frozen'attributes <- IO (Vector KeyValue) -> Parser (Vector KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) KeyValue -> IO (Vector KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
Growing Vector RealWorld KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes)
(let missing :: [a]
missing = []
in
if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
() -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
else
String -> Parser ()
forall a. String -> Parser a
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]))))
LogRecord -> Parser LogRecord
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
(Setter LogRecord LogRecord FieldSet FieldSet
-> (FieldSet -> FieldSet) -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f LogRecord FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' LogRecord FieldSet
Setter LogRecord LogRecord FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
(Setter LogRecord LogRecord (Vector KeyValue) (Vector KeyValue)
-> Vector KeyValue -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") Vector KeyValue
frozen'attributes
LogRecord
x))
else
do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
case Word64
tag of
Word64
9 -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"time_unix_nano"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord Word64 Word64
-> Word64 -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") Word64
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
89
-> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64
String
"observed_time_unix_nano"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord Word64 Word64
-> Word64 -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"observedTimeUnixNano") Word64
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
16
-> do SeverityNumber
y <- Parser SeverityNumber -> String -> Parser SeverityNumber
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> SeverityNumber) -> Parser Int -> Parser SeverityNumber
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> SeverityNumber
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
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
"severity_number"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord SeverityNumber SeverityNumber
-> SeverityNumber -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severityNumber") SeverityNumber
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
26
-> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
(case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
(Prelude.Left UnicodeException
err)
-> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
(Prelude.Right Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
String
"severity_text"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord Text Text
-> Text -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severityText") Text
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
42
-> do AnyValue
y <- Parser AnyValue -> String -> Parser AnyValue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser AnyValue -> Parser AnyValue
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 AnyValue
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
String
"body"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord AnyValue AnyValue
-> AnyValue -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"body") AnyValue
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
50
-> do !KeyValue
y <- Parser KeyValue -> String -> Parser KeyValue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser KeyValue -> Parser KeyValue
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 KeyValue
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
String
"attributes"
Growing Vector RealWorld KeyValue
v <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) KeyValue
-> KeyValue -> IO (Growing Vector (PrimState IO) KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes KeyValue
y)
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop LogRecord
x Growing Vector RealWorld KeyValue
v
Word64
56
-> do Word32
y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"dropped_attributes_count"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord Word32 Word32
-> Word32 -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"droppedAttributesCount") Word32
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
69
-> do Word32
y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
Parser Word32
Data.ProtoLens.Encoding.Bytes.getFixed32 String
"flags"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord Word32 Word32
-> Word32 -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") Word32
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
74
-> do ByteString
y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
String
"trace_id"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord ByteString ByteString
-> ByteString -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceId") ByteString
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
82
-> do ByteString
y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
String
"span_id"
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord ByteString ByteString
-> ByteString -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"spanId") ByteString
y LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
Word64
wire
-> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop
(Setter LogRecord LogRecord FieldSet FieldSet
-> (FieldSet -> FieldSet) -> LogRecord -> LogRecord
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f LogRecord FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' LogRecord FieldSet
Setter LogRecord LogRecord FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) LogRecord
x)
Growing Vector RealWorld KeyValue
mutable'attributes
in
Parser LogRecord -> String -> Parser LogRecord
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Growing Vector RealWorld KeyValue
mutable'attributes <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
IO (Growing Vector RealWorld KeyValue)
IO (Growing Vector (PrimState IO) KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
LogRecord -> Growing Vector RealWorld KeyValue -> Parser LogRecord
loop LogRecord
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld KeyValue
mutable'attributes)
String
"LogRecord"
buildMessage :: LogRecord -> Builder
buildMessage
= \ LogRecord
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Word64
_v
= FoldLike Word64 LogRecord LogRecord Word64 Word64
-> LogRecord -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") LogRecord
_x
in
if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
9)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Word64
_v
= FoldLike Word64 LogRecord LogRecord Word64 Word64
-> LogRecord -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"observedTimeUnixNano") LogRecord
_x
in
if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
89)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: SeverityNumber
_v
= FoldLike
SeverityNumber LogRecord LogRecord SeverityNumber SeverityNumber
-> LogRecord -> SeverityNumber
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severityNumber") LogRecord
_x
in
if SeverityNumber -> SeverityNumber -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) SeverityNumber
_v SeverityNumber
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
16)
((Int -> Builder)
-> (SeverityNumber -> Int) -> SeverityNumber -> 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)
SeverityNumber -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum SeverityNumber
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text LogRecord LogRecord Text Text -> LogRecord -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severityText") LogRecord
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe AnyValue)
LogRecord
LogRecord
(Maybe AnyValue)
(Maybe AnyValue)
-> LogRecord -> Maybe AnyValue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'body") LogRecord
_x
of
Maybe AnyValue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just AnyValue
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
((ByteString -> Builder)
-> (AnyValue -> ByteString) -> AnyValue -> 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))
AnyValue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage AnyValue
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
((KeyValue -> Builder) -> Vector KeyValue -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
(\ KeyValue
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
((ByteString -> Builder)
-> (KeyValue -> ByteString) -> KeyValue -> 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))
KeyValue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage KeyValue
_v))
(FoldLike
(Vector KeyValue)
LogRecord
LogRecord
(Vector KeyValue)
(Vector KeyValue)
-> LogRecord -> Vector KeyValue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") LogRecord
_x))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Word32
_v
= FoldLike Word32 LogRecord LogRecord Word32 Word32
-> LogRecord -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"droppedAttributesCount") LogRecord
_x
in
if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Word32
_v = FoldLike Word32 LogRecord LogRecord Word32 Word32
-> LogRecord -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") LogRecord
_x
in
if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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
69)
(Word32 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed32 Word32
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: ByteString
_v
= FoldLike ByteString LogRecord LogRecord ByteString ByteString
-> LogRecord -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceId") LogRecord
_x
in
if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
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
74)
((\ 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))
ByteString
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: ByteString
_v
= FoldLike ByteString LogRecord LogRecord ByteString ByteString
-> LogRecord -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"spanId") LogRecord
_x
in
if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
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
82)
((\ 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))
ByteString
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet LogRecord LogRecord FieldSet FieldSet
-> LogRecord -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
FoldLike FieldSet LogRecord LogRecord FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' LogRecord FieldSet
Data.ProtoLens.unknownFields LogRecord
_x)))))))))))
instance Control.DeepSeq.NFData LogRecord where
rnf :: LogRecord -> ()
rnf
= \ LogRecord
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> FieldSet
_LogRecord'_unknownFields LogRecord
x__)
(Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> Word64
_LogRecord'timeUnixNano LogRecord
x__)
(Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> Word64
_LogRecord'observedTimeUnixNano LogRecord
x__)
(SeverityNumber -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> SeverityNumber
_LogRecord'severityNumber LogRecord
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> Text
_LogRecord'severityText LogRecord
x__)
(Maybe AnyValue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> Maybe AnyValue
_LogRecord'body LogRecord
x__)
(Vector KeyValue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> Vector KeyValue
_LogRecord'attributes LogRecord
x__)
(Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> Word32
_LogRecord'droppedAttributesCount LogRecord
x__)
(Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> Word32
_LogRecord'flags LogRecord
x__)
(ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> ByteString
_LogRecord'traceId LogRecord
x__)
(ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogRecord -> ByteString
_LogRecord'spanId LogRecord
x__) ()))))))))))
newtype LogRecordFlags'UnrecognizedValue
= LogRecordFlags'UnrecognizedValue Data.Int.Int32
deriving stock (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
(LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool)
-> (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool)
-> Eq LogRecordFlags'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
== :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
$c/= :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
/= :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
Prelude.Eq, Eq LogRecordFlags'UnrecognizedValue
Eq LogRecordFlags'UnrecognizedValue =>
(LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Ordering)
-> (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool)
-> (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool)
-> (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool)
-> (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool)
-> (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue)
-> (LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue)
-> Ord LogRecordFlags'UnrecognizedValue
LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Ordering
LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'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
$ccompare :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Ordering
compare :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Ordering
$c< :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
< :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
$c<= :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
<= :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
$c> :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
> :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
$c>= :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
>= :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue -> Bool
$cmax :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
max :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
$cmin :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
min :: LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
-> LogRecordFlags'UnrecognizedValue
Prelude.Ord, Int -> LogRecordFlags'UnrecognizedValue -> ShowS
[LogRecordFlags'UnrecognizedValue] -> ShowS
LogRecordFlags'UnrecognizedValue -> String
(Int -> LogRecordFlags'UnrecognizedValue -> ShowS)
-> (LogRecordFlags'UnrecognizedValue -> String)
-> ([LogRecordFlags'UnrecognizedValue] -> ShowS)
-> Show LogRecordFlags'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> LogRecordFlags'UnrecognizedValue -> ShowS
showsPrec :: Int -> LogRecordFlags'UnrecognizedValue -> ShowS
$cshow :: LogRecordFlags'UnrecognizedValue -> String
show :: LogRecordFlags'UnrecognizedValue -> String
$cshowList :: [LogRecordFlags'UnrecognizedValue] -> ShowS
showList :: [LogRecordFlags'UnrecognizedValue] -> ShowS
Prelude.Show)
data LogRecordFlags
= LOG_RECORD_FLAG_UNSPECIFIED |
LOG_RECORD_FLAG_TRACE_FLAGS_MASK |
LogRecordFlags'Unrecognized !LogRecordFlags'UnrecognizedValue
deriving stock (Int -> LogRecordFlags -> ShowS
[LogRecordFlags] -> ShowS
LogRecordFlags -> String
(Int -> LogRecordFlags -> ShowS)
-> (LogRecordFlags -> String)
-> ([LogRecordFlags] -> ShowS)
-> Show LogRecordFlags
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> LogRecordFlags -> ShowS
showsPrec :: Int -> LogRecordFlags -> ShowS
$cshow :: LogRecordFlags -> String
show :: LogRecordFlags -> String
$cshowList :: [LogRecordFlags] -> ShowS
showList :: [LogRecordFlags] -> ShowS
Prelude.Show, LogRecordFlags -> LogRecordFlags -> Bool
(LogRecordFlags -> LogRecordFlags -> Bool)
-> (LogRecordFlags -> LogRecordFlags -> Bool) -> Eq LogRecordFlags
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LogRecordFlags -> LogRecordFlags -> Bool
== :: LogRecordFlags -> LogRecordFlags -> Bool
$c/= :: LogRecordFlags -> LogRecordFlags -> Bool
/= :: LogRecordFlags -> LogRecordFlags -> Bool
Prelude.Eq, Eq LogRecordFlags
Eq LogRecordFlags =>
(LogRecordFlags -> LogRecordFlags -> Ordering)
-> (LogRecordFlags -> LogRecordFlags -> Bool)
-> (LogRecordFlags -> LogRecordFlags -> Bool)
-> (LogRecordFlags -> LogRecordFlags -> Bool)
-> (LogRecordFlags -> LogRecordFlags -> Bool)
-> (LogRecordFlags -> LogRecordFlags -> LogRecordFlags)
-> (LogRecordFlags -> LogRecordFlags -> LogRecordFlags)
-> Ord LogRecordFlags
LogRecordFlags -> LogRecordFlags -> Bool
LogRecordFlags -> LogRecordFlags -> Ordering
LogRecordFlags -> LogRecordFlags -> LogRecordFlags
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: LogRecordFlags -> LogRecordFlags -> Ordering
compare :: LogRecordFlags -> LogRecordFlags -> Ordering
$c< :: LogRecordFlags -> LogRecordFlags -> Bool
< :: LogRecordFlags -> LogRecordFlags -> Bool
$c<= :: LogRecordFlags -> LogRecordFlags -> Bool
<= :: LogRecordFlags -> LogRecordFlags -> Bool
$c> :: LogRecordFlags -> LogRecordFlags -> Bool
> :: LogRecordFlags -> LogRecordFlags -> Bool
$c>= :: LogRecordFlags -> LogRecordFlags -> Bool
>= :: LogRecordFlags -> LogRecordFlags -> Bool
$cmax :: LogRecordFlags -> LogRecordFlags -> LogRecordFlags
max :: LogRecordFlags -> LogRecordFlags -> LogRecordFlags
$cmin :: LogRecordFlags -> LogRecordFlags -> LogRecordFlags
min :: LogRecordFlags -> LogRecordFlags -> LogRecordFlags
Prelude.Ord)
instance Data.ProtoLens.MessageEnum LogRecordFlags where
maybeToEnum :: Int -> Maybe LogRecordFlags
maybeToEnum Int
0 = LogRecordFlags -> Maybe LogRecordFlags
forall a. a -> Maybe a
Prelude.Just LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED
maybeToEnum Int
255 = LogRecordFlags -> Maybe LogRecordFlags
forall a. a -> Maybe a
Prelude.Just LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK
maybeToEnum Int
k
= LogRecordFlags -> Maybe LogRecordFlags
forall a. a -> Maybe a
Prelude.Just
(LogRecordFlags'UnrecognizedValue -> LogRecordFlags
LogRecordFlags'Unrecognized
(Int32 -> LogRecordFlags'UnrecognizedValue
LogRecordFlags'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: LogRecordFlags -> String
showEnum LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED
= String
"LOG_RECORD_FLAG_UNSPECIFIED"
showEnum LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK
= String
"LOG_RECORD_FLAG_TRACE_FLAGS_MASK"
showEnum
(LogRecordFlags'Unrecognized (LogRecordFlags'UnrecognizedValue Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe LogRecordFlags
readEnum String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"LOG_RECORD_FLAG_UNSPECIFIED"
= LogRecordFlags -> Maybe LogRecordFlags
forall a. a -> Maybe a
Prelude.Just LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"LOG_RECORD_FLAG_TRACE_FLAGS_MASK"
= LogRecordFlags -> Maybe LogRecordFlags
forall a. a -> Maybe a
Prelude.Just LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK
| Bool
Prelude.otherwise
= Maybe Int -> (Int -> Maybe LogRecordFlags) -> Maybe LogRecordFlags
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
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 LogRecordFlags
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded LogRecordFlags where
minBound :: LogRecordFlags
minBound = LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED
maxBound :: LogRecordFlags
maxBound = LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK
instance Prelude.Enum LogRecordFlags where
toEnum :: Int -> LogRecordFlags
toEnum Int
k__
= LogRecordFlags
-> (LogRecordFlags -> LogRecordFlags)
-> Maybe LogRecordFlags
-> LogRecordFlags
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> LogRecordFlags
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
String
"toEnum: unknown value for enum LogRecordFlags: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
LogRecordFlags -> LogRecordFlags
forall a. a -> a
Prelude.id (Int -> Maybe LogRecordFlags
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: LogRecordFlags -> Int
fromEnum LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED = Int
0
fromEnum LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK = Int
255
fromEnum
(LogRecordFlags'Unrecognized (LogRecordFlags'UnrecognizedValue Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: LogRecordFlags -> LogRecordFlags
succ LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK
= String -> LogRecordFlags
forall a. HasCallStack => String -> a
Prelude.error
String
"LogRecordFlags.succ: bad argument LOG_RECORD_FLAG_TRACE_FLAGS_MASK. This value would be out of bounds."
succ LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED = LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK
succ (LogRecordFlags'Unrecognized LogRecordFlags'UnrecognizedValue
_)
= String -> LogRecordFlags
forall a. HasCallStack => String -> a
Prelude.error
String
"LogRecordFlags.succ: bad argument: unrecognized value"
pred :: LogRecordFlags -> LogRecordFlags
pred LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED
= String -> LogRecordFlags
forall a. HasCallStack => String -> a
Prelude.error
String
"LogRecordFlags.pred: bad argument LOG_RECORD_FLAG_UNSPECIFIED. This value would be out of bounds."
pred LogRecordFlags
LOG_RECORD_FLAG_TRACE_FLAGS_MASK = LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED
pred (LogRecordFlags'Unrecognized LogRecordFlags'UnrecognizedValue
_)
= String -> LogRecordFlags
forall a. HasCallStack => String -> a
Prelude.error
String
"LogRecordFlags.pred: bad argument: unrecognized value"
enumFrom :: LogRecordFlags -> [LogRecordFlags]
enumFrom = LogRecordFlags -> [LogRecordFlags]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: LogRecordFlags -> LogRecordFlags -> [LogRecordFlags]
enumFromTo = LogRecordFlags -> LogRecordFlags -> [LogRecordFlags]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: LogRecordFlags -> LogRecordFlags -> [LogRecordFlags]
enumFromThen = LogRecordFlags -> LogRecordFlags -> [LogRecordFlags]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: LogRecordFlags
-> LogRecordFlags -> LogRecordFlags -> [LogRecordFlags]
enumFromThenTo = LogRecordFlags
-> LogRecordFlags -> LogRecordFlags -> [LogRecordFlags]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault LogRecordFlags where
fieldDefault :: LogRecordFlags
fieldDefault = LogRecordFlags
LOG_RECORD_FLAG_UNSPECIFIED
instance Control.DeepSeq.NFData LogRecordFlags where
rnf :: LogRecordFlags -> ()
rnf LogRecordFlags
x__ = LogRecordFlags -> () -> ()
forall a b. a -> b -> b
Prelude.seq LogRecordFlags
x__ ()
data LogsData
= LogsData'_constructor {LogsData -> Vector ResourceLogs
_LogsData'resourceLogs :: !(Data.Vector.Vector ResourceLogs),
LogsData -> FieldSet
_LogsData'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (LogsData -> LogsData -> Bool
(LogsData -> LogsData -> Bool)
-> (LogsData -> LogsData -> Bool) -> Eq LogsData
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LogsData -> LogsData -> Bool
== :: LogsData -> LogsData -> Bool
$c/= :: LogsData -> LogsData -> Bool
/= :: LogsData -> LogsData -> Bool
Prelude.Eq, Eq LogsData
Eq LogsData =>
(LogsData -> LogsData -> Ordering)
-> (LogsData -> LogsData -> Bool)
-> (LogsData -> LogsData -> Bool)
-> (LogsData -> LogsData -> Bool)
-> (LogsData -> LogsData -> Bool)
-> (LogsData -> LogsData -> LogsData)
-> (LogsData -> LogsData -> LogsData)
-> Ord LogsData
LogsData -> LogsData -> Bool
LogsData -> LogsData -> Ordering
LogsData -> LogsData -> LogsData
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: LogsData -> LogsData -> Ordering
compare :: LogsData -> LogsData -> Ordering
$c< :: LogsData -> LogsData -> Bool
< :: LogsData -> LogsData -> Bool
$c<= :: LogsData -> LogsData -> Bool
<= :: LogsData -> LogsData -> Bool
$c> :: LogsData -> LogsData -> Bool
> :: LogsData -> LogsData -> Bool
$c>= :: LogsData -> LogsData -> Bool
>= :: LogsData -> LogsData -> Bool
$cmax :: LogsData -> LogsData -> LogsData
max :: LogsData -> LogsData -> LogsData
$cmin :: LogsData -> LogsData -> LogsData
min :: LogsData -> LogsData -> LogsData
Prelude.Ord)
instance Prelude.Show LogsData where
showsPrec :: Int -> LogsData -> ShowS
showsPrec Int
_ LogsData
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(LogsData -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort LogsData
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField LogsData "resourceLogs" [ResourceLogs] where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resourceLogs"
-> ([ResourceLogs] -> f [ResourceLogs]) -> LogsData -> f LogsData
fieldOf Proxy# "resourceLogs"
_
= ((Vector ResourceLogs -> f (Vector ResourceLogs))
-> LogsData -> f LogsData)
-> (([ResourceLogs] -> f [ResourceLogs])
-> Vector ResourceLogs -> f (Vector ResourceLogs))
-> ([ResourceLogs] -> f [ResourceLogs])
-> LogsData
-> f LogsData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogsData -> Vector ResourceLogs)
-> (LogsData -> Vector ResourceLogs -> LogsData)
-> Lens
LogsData LogsData (Vector ResourceLogs) (Vector ResourceLogs)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogsData -> Vector ResourceLogs
_LogsData'resourceLogs
(\ LogsData
x__ Vector ResourceLogs
y__ -> LogsData
x__ {_LogsData'resourceLogs = y__}))
((Vector ResourceLogs -> [ResourceLogs])
-> (Vector ResourceLogs -> [ResourceLogs] -> Vector ResourceLogs)
-> Lens
(Vector ResourceLogs)
(Vector ResourceLogs)
[ResourceLogs]
[ResourceLogs]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Vector ResourceLogs -> [ResourceLogs]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
(\ Vector ResourceLogs
_ [ResourceLogs]
y__ -> [ResourceLogs] -> Vector ResourceLogs
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ResourceLogs]
y__))
instance Data.ProtoLens.Field.HasField LogsData "vec'resourceLogs" (Data.Vector.Vector ResourceLogs) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'resourceLogs"
-> (Vector ResourceLogs -> f (Vector ResourceLogs))
-> LogsData
-> f LogsData
fieldOf Proxy# "vec'resourceLogs"
_
= ((Vector ResourceLogs -> f (Vector ResourceLogs))
-> LogsData -> f LogsData)
-> ((Vector ResourceLogs -> f (Vector ResourceLogs))
-> Vector ResourceLogs -> f (Vector ResourceLogs))
-> (Vector ResourceLogs -> f (Vector ResourceLogs))
-> LogsData
-> f LogsData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((LogsData -> Vector ResourceLogs)
-> (LogsData -> Vector ResourceLogs -> LogsData)
-> Lens
LogsData LogsData (Vector ResourceLogs) (Vector ResourceLogs)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogsData -> Vector ResourceLogs
_LogsData'resourceLogs
(\ LogsData
x__ Vector ResourceLogs
y__ -> LogsData
x__ {_LogsData'resourceLogs = y__}))
(Vector ResourceLogs -> f (Vector ResourceLogs))
-> Vector ResourceLogs -> f (Vector ResourceLogs)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message LogsData where
messageName :: Proxy LogsData -> Text
messageName Proxy LogsData
_
= String -> Text
Data.Text.pack String
"opentelemetry.proto.logs.v1.LogsData"
packedMessageDescriptor :: Proxy LogsData -> ByteString
packedMessageDescriptor Proxy LogsData
_
= ByteString
"\n\
\\bLogsData\DC2N\n\
\\rresource_logs\CAN\SOH \ETX(\v2).opentelemetry.proto.logs.v1.ResourceLogsR\fresourceLogs"
packedFileDescriptor :: Proxy LogsData -> ByteString
packedFileDescriptor Proxy LogsData
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor LogsData)
fieldsByTag
= let
resourceLogs__field_descriptor :: FieldDescriptor LogsData
resourceLogs__field_descriptor
= String
-> FieldTypeDescriptor ResourceLogs
-> FieldAccessor LogsData ResourceLogs
-> FieldDescriptor LogsData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"resource_logs"
(MessageOrGroup -> FieldTypeDescriptor ResourceLogs
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ResourceLogs)
(Packing
-> Lens' LogsData [ResourceLogs]
-> FieldAccessor LogsData ResourceLogs
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Unpacked
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resourceLogs")) ::
Data.ProtoLens.FieldDescriptor LogsData
in
[(Tag, FieldDescriptor LogsData)]
-> Map Tag (FieldDescriptor LogsData)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor LogsData
resourceLogs__field_descriptor)]
unknownFields :: Lens' LogsData FieldSet
unknownFields
= (LogsData -> FieldSet)
-> (LogsData -> FieldSet -> LogsData) -> Lens' LogsData FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
LogsData -> FieldSet
_LogsData'_unknownFields
(\ LogsData
x__ FieldSet
y__ -> LogsData
x__ {_LogsData'_unknownFields = y__})
defMessage :: LogsData
defMessage
= LogsData'_constructor
{_LogsData'resourceLogs :: Vector ResourceLogs
_LogsData'resourceLogs = Vector ResourceLogs
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_LogsData'_unknownFields :: FieldSet
_LogsData'_unknownFields = []}
parseMessage :: Parser LogsData
parseMessage
= let
loop ::
LogsData
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ResourceLogs
-> Data.ProtoLens.Encoding.Bytes.Parser LogsData
loop :: LogsData
-> Growing Vector RealWorld ResourceLogs -> Parser LogsData
loop LogsData
x Growing Vector RealWorld ResourceLogs
mutable'resourceLogs
= do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if Bool
end then
do Vector ResourceLogs
frozen'resourceLogs <- IO (Vector ResourceLogs) -> Parser (Vector ResourceLogs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) ResourceLogs
-> IO (Vector ResourceLogs)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
Growing Vector RealWorld ResourceLogs
Growing Vector (PrimState IO) ResourceLogs
mutable'resourceLogs)
(let missing :: [a]
missing = []
in
if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
() -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
else
String -> Parser ()
forall a. String -> Parser a
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]))))
LogsData -> Parser LogsData
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
(Setter LogsData LogsData FieldSet FieldSet
-> (FieldSet -> FieldSet) -> LogsData -> LogsData
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f LogsData FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' LogsData FieldSet
Setter LogsData LogsData FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
(Setter
LogsData LogsData (Vector ResourceLogs) (Vector ResourceLogs)
-> Vector ResourceLogs -> LogsData -> LogsData
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'resourceLogs")
Vector ResourceLogs
frozen'resourceLogs LogsData
x))
else
do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
case Word64
tag of
Word64
10
-> do !ResourceLogs
y <- Parser ResourceLogs -> String -> Parser ResourceLogs
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ResourceLogs -> Parser ResourceLogs
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 ResourceLogs
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
String
"resource_logs"
Growing Vector RealWorld ResourceLogs
v <- IO (Growing Vector RealWorld ResourceLogs)
-> Parser (Growing Vector RealWorld ResourceLogs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) ResourceLogs
-> ResourceLogs -> IO (Growing Vector (PrimState IO) ResourceLogs)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
Growing Vector RealWorld ResourceLogs
Growing Vector (PrimState IO) ResourceLogs
mutable'resourceLogs ResourceLogs
y)
LogsData
-> Growing Vector RealWorld ResourceLogs -> Parser LogsData
loop LogsData
x Growing Vector RealWorld ResourceLogs
v
Word64
wire
-> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
LogsData
-> Growing Vector RealWorld ResourceLogs -> Parser LogsData
loop
(Setter LogsData LogsData FieldSet FieldSet
-> (FieldSet -> FieldSet) -> LogsData -> LogsData
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f LogsData FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' LogsData FieldSet
Setter LogsData LogsData FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) LogsData
x)
Growing Vector RealWorld ResourceLogs
mutable'resourceLogs
in
Parser LogsData -> String -> Parser LogsData
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Growing Vector RealWorld ResourceLogs
mutable'resourceLogs <- IO (Growing Vector RealWorld ResourceLogs)
-> Parser (Growing Vector RealWorld ResourceLogs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
IO (Growing Vector RealWorld ResourceLogs)
IO (Growing Vector (PrimState IO) ResourceLogs)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
LogsData
-> Growing Vector RealWorld ResourceLogs -> Parser LogsData
loop LogsData
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld ResourceLogs
mutable'resourceLogs)
String
"LogsData"
buildMessage :: LogsData -> Builder
buildMessage
= \ LogsData
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
((ResourceLogs -> Builder) -> Vector ResourceLogs -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
(\ ResourceLogs
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (ResourceLogs -> ByteString) -> ResourceLogs -> 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))
ResourceLogs -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResourceLogs
_v))
(FoldLike
(Vector ResourceLogs)
LogsData
LogsData
(Vector ResourceLogs)
(Vector ResourceLogs)
-> LogsData -> Vector ResourceLogs
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'resourceLogs") LogsData
_x))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet LogsData LogsData FieldSet FieldSet
-> LogsData -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet LogsData LogsData FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' LogsData FieldSet
Data.ProtoLens.unknownFields LogsData
_x))
instance Control.DeepSeq.NFData LogsData where
rnf :: LogsData -> ()
rnf
= \ LogsData
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(LogsData -> FieldSet
_LogsData'_unknownFields LogsData
x__)
(Vector ResourceLogs -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (LogsData -> Vector ResourceLogs
_LogsData'resourceLogs LogsData
x__) ())
data ResourceLogs
= ResourceLogs'_constructor {ResourceLogs -> Maybe Resource
_ResourceLogs'resource :: !(Prelude.Maybe OTel.SDK.OTLP.Bindings.Resource.V1.Resource.Resource),
ResourceLogs -> Vector ScopeLogs
_ResourceLogs'scopeLogs :: !(Data.Vector.Vector ScopeLogs),
ResourceLogs -> Text
_ResourceLogs'schemaUrl :: !Data.Text.Text,
ResourceLogs -> FieldSet
_ResourceLogs'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (ResourceLogs -> ResourceLogs -> Bool
(ResourceLogs -> ResourceLogs -> Bool)
-> (ResourceLogs -> ResourceLogs -> Bool) -> Eq ResourceLogs
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResourceLogs -> ResourceLogs -> Bool
== :: ResourceLogs -> ResourceLogs -> Bool
$c/= :: ResourceLogs -> ResourceLogs -> Bool
/= :: ResourceLogs -> ResourceLogs -> Bool
Prelude.Eq, Eq ResourceLogs
Eq ResourceLogs =>
(ResourceLogs -> ResourceLogs -> Ordering)
-> (ResourceLogs -> ResourceLogs -> Bool)
-> (ResourceLogs -> ResourceLogs -> Bool)
-> (ResourceLogs -> ResourceLogs -> Bool)
-> (ResourceLogs -> ResourceLogs -> Bool)
-> (ResourceLogs -> ResourceLogs -> ResourceLogs)
-> (ResourceLogs -> ResourceLogs -> ResourceLogs)
-> Ord ResourceLogs
ResourceLogs -> ResourceLogs -> Bool
ResourceLogs -> ResourceLogs -> Ordering
ResourceLogs -> ResourceLogs -> ResourceLogs
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: ResourceLogs -> ResourceLogs -> Ordering
compare :: ResourceLogs -> ResourceLogs -> Ordering
$c< :: ResourceLogs -> ResourceLogs -> Bool
< :: ResourceLogs -> ResourceLogs -> Bool
$c<= :: ResourceLogs -> ResourceLogs -> Bool
<= :: ResourceLogs -> ResourceLogs -> Bool
$c> :: ResourceLogs -> ResourceLogs -> Bool
> :: ResourceLogs -> ResourceLogs -> Bool
$c>= :: ResourceLogs -> ResourceLogs -> Bool
>= :: ResourceLogs -> ResourceLogs -> Bool
$cmax :: ResourceLogs -> ResourceLogs -> ResourceLogs
max :: ResourceLogs -> ResourceLogs -> ResourceLogs
$cmin :: ResourceLogs -> ResourceLogs -> ResourceLogs
min :: ResourceLogs -> ResourceLogs -> ResourceLogs
Prelude.Ord)
instance Prelude.Show ResourceLogs where
showsPrec :: Int -> ResourceLogs -> ShowS
showsPrec Int
_ ResourceLogs
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(ResourceLogs -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResourceLogs
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResourceLogs "resource" OTel.SDK.OTLP.Bindings.Resource.V1.Resource.Resource where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resource"
-> (Resource -> f Resource) -> ResourceLogs -> f ResourceLogs
fieldOf Proxy# "resource"
_
= ((Maybe Resource -> f (Maybe Resource))
-> ResourceLogs -> f ResourceLogs)
-> ((Resource -> f Resource)
-> Maybe Resource -> f (Maybe Resource))
-> (Resource -> f Resource)
-> ResourceLogs
-> f ResourceLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResourceLogs -> Maybe Resource)
-> (ResourceLogs -> Maybe Resource -> ResourceLogs)
-> Lens ResourceLogs ResourceLogs (Maybe Resource) (Maybe Resource)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResourceLogs -> Maybe Resource
_ResourceLogs'resource
(\ ResourceLogs
x__ Maybe Resource
y__ -> ResourceLogs
x__ {_ResourceLogs'resource = y__}))
(Resource -> Lens' (Maybe Resource) Resource
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Resource
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResourceLogs "maybe'resource" (Prelude.Maybe OTel.SDK.OTLP.Bindings.Resource.V1.Resource.Resource) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resource"
-> (Maybe Resource -> f (Maybe Resource))
-> ResourceLogs
-> f ResourceLogs
fieldOf Proxy# "maybe'resource"
_
= ((Maybe Resource -> f (Maybe Resource))
-> ResourceLogs -> f ResourceLogs)
-> ((Maybe Resource -> f (Maybe Resource))
-> Maybe Resource -> f (Maybe Resource))
-> (Maybe Resource -> f (Maybe Resource))
-> ResourceLogs
-> f ResourceLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResourceLogs -> Maybe Resource)
-> (ResourceLogs -> Maybe Resource -> ResourceLogs)
-> Lens ResourceLogs ResourceLogs (Maybe Resource) (Maybe Resource)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResourceLogs -> Maybe Resource
_ResourceLogs'resource
(\ ResourceLogs
x__ Maybe Resource
y__ -> ResourceLogs
x__ {_ResourceLogs'resource = y__}))
(Maybe Resource -> f (Maybe Resource))
-> Maybe Resource -> f (Maybe Resource)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResourceLogs "scopeLogs" [ScopeLogs] where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scopeLogs"
-> ([ScopeLogs] -> f [ScopeLogs]) -> ResourceLogs -> f ResourceLogs
fieldOf Proxy# "scopeLogs"
_
= ((Vector ScopeLogs -> f (Vector ScopeLogs))
-> ResourceLogs -> f ResourceLogs)
-> (([ScopeLogs] -> f [ScopeLogs])
-> Vector ScopeLogs -> f (Vector ScopeLogs))
-> ([ScopeLogs] -> f [ScopeLogs])
-> ResourceLogs
-> f ResourceLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResourceLogs -> Vector ScopeLogs)
-> (ResourceLogs -> Vector ScopeLogs -> ResourceLogs)
-> Lens
ResourceLogs ResourceLogs (Vector ScopeLogs) (Vector ScopeLogs)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResourceLogs -> Vector ScopeLogs
_ResourceLogs'scopeLogs
(\ ResourceLogs
x__ Vector ScopeLogs
y__ -> ResourceLogs
x__ {_ResourceLogs'scopeLogs = y__}))
((Vector ScopeLogs -> [ScopeLogs])
-> (Vector ScopeLogs -> [ScopeLogs] -> Vector ScopeLogs)
-> Lens
(Vector ScopeLogs) (Vector ScopeLogs) [ScopeLogs] [ScopeLogs]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Vector ScopeLogs -> [ScopeLogs]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
(\ Vector ScopeLogs
_ [ScopeLogs]
y__ -> [ScopeLogs] -> Vector ScopeLogs
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ScopeLogs]
y__))
instance Data.ProtoLens.Field.HasField ResourceLogs "vec'scopeLogs" (Data.Vector.Vector ScopeLogs) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'scopeLogs"
-> (Vector ScopeLogs -> f (Vector ScopeLogs))
-> ResourceLogs
-> f ResourceLogs
fieldOf Proxy# "vec'scopeLogs"
_
= ((Vector ScopeLogs -> f (Vector ScopeLogs))
-> ResourceLogs -> f ResourceLogs)
-> ((Vector ScopeLogs -> f (Vector ScopeLogs))
-> Vector ScopeLogs -> f (Vector ScopeLogs))
-> (Vector ScopeLogs -> f (Vector ScopeLogs))
-> ResourceLogs
-> f ResourceLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResourceLogs -> Vector ScopeLogs)
-> (ResourceLogs -> Vector ScopeLogs -> ResourceLogs)
-> Lens
ResourceLogs ResourceLogs (Vector ScopeLogs) (Vector ScopeLogs)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResourceLogs -> Vector ScopeLogs
_ResourceLogs'scopeLogs
(\ ResourceLogs
x__ Vector ScopeLogs
y__ -> ResourceLogs
x__ {_ResourceLogs'scopeLogs = y__}))
(Vector ScopeLogs -> f (Vector ScopeLogs))
-> Vector ScopeLogs -> f (Vector ScopeLogs)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResourceLogs "schemaUrl" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schemaUrl"
-> (Text -> f Text) -> ResourceLogs -> f ResourceLogs
fieldOf Proxy# "schemaUrl"
_
= ((Text -> f Text) -> ResourceLogs -> f ResourceLogs)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResourceLogs
-> f ResourceLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResourceLogs -> Text)
-> (ResourceLogs -> Text -> ResourceLogs)
-> Lens ResourceLogs ResourceLogs Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResourceLogs -> Text
_ResourceLogs'schemaUrl
(\ ResourceLogs
x__ Text
y__ -> ResourceLogs
x__ {_ResourceLogs'schemaUrl = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResourceLogs where
messageName :: Proxy ResourceLogs -> Text
messageName Proxy ResourceLogs
_
= String -> Text
Data.Text.pack String
"opentelemetry.proto.logs.v1.ResourceLogs"
packedMessageDescriptor :: Proxy ResourceLogs -> ByteString
packedMessageDescriptor Proxy ResourceLogs
_
= ByteString
"\n\
\\fResourceLogs\DC2E\n\
\\bresource\CAN\SOH \SOH(\v2).opentelemetry.proto.resource.v1.ResourceR\bresource\DC2E\n\
\\n\
\scope_logs\CAN\STX \ETX(\v2&.opentelemetry.proto.logs.v1.ScopeLogsR\tscopeLogs\DC2\GS\n\
\\n\
\schema_url\CAN\ETX \SOH(\tR\tschemaUrlJ\ACK\b\232\a\DLE\233\a"
packedFileDescriptor :: Proxy ResourceLogs -> ByteString
packedFileDescriptor Proxy ResourceLogs
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor ResourceLogs)
fieldsByTag
= let
resource__field_descriptor :: FieldDescriptor ResourceLogs
resource__field_descriptor
= String
-> FieldTypeDescriptor Resource
-> FieldAccessor ResourceLogs Resource
-> FieldDescriptor ResourceLogs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"resource"
(MessageOrGroup -> FieldTypeDescriptor Resource
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OTel.SDK.OTLP.Bindings.Resource.V1.Resource.Resource)
(Lens ResourceLogs ResourceLogs (Maybe Resource) (Maybe Resource)
-> FieldAccessor ResourceLogs Resource
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'resource")) ::
Data.ProtoLens.FieldDescriptor ResourceLogs
scopeLogs__field_descriptor :: FieldDescriptor ResourceLogs
scopeLogs__field_descriptor
= String
-> FieldTypeDescriptor ScopeLogs
-> FieldAccessor ResourceLogs ScopeLogs
-> FieldDescriptor ResourceLogs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"scope_logs"
(MessageOrGroup -> FieldTypeDescriptor ScopeLogs
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ScopeLogs)
(Packing
-> Lens' ResourceLogs [ScopeLogs]
-> FieldAccessor ResourceLogs ScopeLogs
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Unpacked
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"scopeLogs")) ::
Data.ProtoLens.FieldDescriptor ResourceLogs
schemaUrl__field_descriptor :: FieldDescriptor ResourceLogs
schemaUrl__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor ResourceLogs Text
-> FieldDescriptor ResourceLogs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"schema_url"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens ResourceLogs ResourceLogs Text Text
-> FieldAccessor ResourceLogs Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl")) ::
Data.ProtoLens.FieldDescriptor ResourceLogs
in
[(Tag, FieldDescriptor ResourceLogs)]
-> Map Tag (FieldDescriptor ResourceLogs)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResourceLogs
resource__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResourceLogs
scopeLogs__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ResourceLogs
schemaUrl__field_descriptor)]
unknownFields :: Lens' ResourceLogs FieldSet
unknownFields
= (ResourceLogs -> FieldSet)
-> (ResourceLogs -> FieldSet -> ResourceLogs)
-> Lens' ResourceLogs FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResourceLogs -> FieldSet
_ResourceLogs'_unknownFields
(\ ResourceLogs
x__ FieldSet
y__ -> ResourceLogs
x__ {_ResourceLogs'_unknownFields = y__})
defMessage :: ResourceLogs
defMessage
= ResourceLogs'_constructor
{_ResourceLogs'resource :: Maybe Resource
_ResourceLogs'resource = Maybe Resource
forall a. Maybe a
Prelude.Nothing,
_ResourceLogs'scopeLogs :: Vector ScopeLogs
_ResourceLogs'scopeLogs = Vector ScopeLogs
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_ResourceLogs'schemaUrl :: Text
_ResourceLogs'schemaUrl = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ResourceLogs'_unknownFields :: FieldSet
_ResourceLogs'_unknownFields = []}
parseMessage :: Parser ResourceLogs
parseMessage
= let
loop ::
ResourceLogs
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ScopeLogs
-> Data.ProtoLens.Encoding.Bytes.Parser ResourceLogs
loop :: ResourceLogs
-> Growing Vector RealWorld ScopeLogs -> Parser ResourceLogs
loop ResourceLogs
x Growing Vector RealWorld ScopeLogs
mutable'scopeLogs
= do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if Bool
end then
do Vector ScopeLogs
frozen'scopeLogs <- IO (Vector ScopeLogs) -> Parser (Vector ScopeLogs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) ScopeLogs -> IO (Vector ScopeLogs)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
Growing Vector RealWorld ScopeLogs
Growing Vector (PrimState IO) ScopeLogs
mutable'scopeLogs)
(let missing :: [a]
missing = []
in
if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
() -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
else
String -> Parser ()
forall a. String -> Parser a
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]))))
ResourceLogs -> Parser ResourceLogs
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
(Setter ResourceLogs ResourceLogs FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ResourceLogs -> ResourceLogs
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f ResourceLogs FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResourceLogs FieldSet
Setter ResourceLogs ResourceLogs FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
(Setter
ResourceLogs ResourceLogs (Vector ScopeLogs) (Vector ScopeLogs)
-> Vector ScopeLogs -> ResourceLogs -> ResourceLogs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'scopeLogs") Vector ScopeLogs
frozen'scopeLogs ResourceLogs
x))
else
do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
case Word64
tag of
Word64
10
-> do Resource
y <- Parser Resource -> String -> Parser Resource
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser Resource -> Parser Resource
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 Resource
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
String
"resource"
ResourceLogs
-> Growing Vector RealWorld ScopeLogs -> Parser ResourceLogs
loop
(Setter ResourceLogs ResourceLogs Resource Resource
-> Resource -> ResourceLogs -> ResourceLogs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resource") Resource
y ResourceLogs
x)
Growing Vector RealWorld ScopeLogs
mutable'scopeLogs
Word64
18
-> do !ScopeLogs
y <- Parser ScopeLogs -> String -> Parser ScopeLogs
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ScopeLogs -> Parser ScopeLogs
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 ScopeLogs
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
String
"scope_logs"
Growing Vector RealWorld ScopeLogs
v <- IO (Growing Vector RealWorld ScopeLogs)
-> Parser (Growing Vector RealWorld ScopeLogs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) ScopeLogs
-> ScopeLogs -> IO (Growing Vector (PrimState IO) ScopeLogs)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld ScopeLogs
Growing Vector (PrimState IO) ScopeLogs
mutable'scopeLogs ScopeLogs
y)
ResourceLogs
-> Growing Vector RealWorld ScopeLogs -> Parser ResourceLogs
loop ResourceLogs
x Growing Vector RealWorld ScopeLogs
v
Word64
26
-> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
(case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
(Prelude.Left UnicodeException
err)
-> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
(Prelude.Right Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
String
"schema_url"
ResourceLogs
-> Growing Vector RealWorld ScopeLogs -> Parser ResourceLogs
loop
(Setter ResourceLogs ResourceLogs Text Text
-> Text -> ResourceLogs -> ResourceLogs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") Text
y ResourceLogs
x)
Growing Vector RealWorld ScopeLogs
mutable'scopeLogs
Word64
wire
-> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
ResourceLogs
-> Growing Vector RealWorld ScopeLogs -> Parser ResourceLogs
loop
(Setter ResourceLogs ResourceLogs FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ResourceLogs -> ResourceLogs
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f ResourceLogs FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResourceLogs FieldSet
Setter ResourceLogs ResourceLogs FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ResourceLogs
x)
Growing Vector RealWorld ScopeLogs
mutable'scopeLogs
in
Parser ResourceLogs -> String -> Parser ResourceLogs
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Growing Vector RealWorld ScopeLogs
mutable'scopeLogs <- IO (Growing Vector RealWorld ScopeLogs)
-> Parser (Growing Vector RealWorld ScopeLogs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
IO (Growing Vector RealWorld ScopeLogs)
IO (Growing Vector (PrimState IO) ScopeLogs)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
ResourceLogs
-> Growing Vector RealWorld ScopeLogs -> Parser ResourceLogs
loop ResourceLogs
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld ScopeLogs
mutable'scopeLogs)
String
"ResourceLogs"
buildMessage :: ResourceLogs -> Builder
buildMessage
= \ ResourceLogs
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Resource)
ResourceLogs
ResourceLogs
(Maybe Resource)
(Maybe Resource)
-> ResourceLogs -> Maybe Resource
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'resource") ResourceLogs
_x
of
Maybe Resource
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Resource
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (Resource -> ByteString) -> Resource -> 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))
Resource -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Resource
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
((ScopeLogs -> Builder) -> Vector ScopeLogs -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
(\ ScopeLogs
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (ScopeLogs -> ByteString) -> ScopeLogs -> 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))
ScopeLogs -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ScopeLogs
_v))
(FoldLike
(Vector ScopeLogs)
ResourceLogs
ResourceLogs
(Vector ScopeLogs)
(Vector ScopeLogs)
-> ResourceLogs -> Vector ScopeLogs
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'scopeLogs") ResourceLogs
_x))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text ResourceLogs ResourceLogs Text Text
-> ResourceLogs -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") ResourceLogs
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet ResourceLogs ResourceLogs FieldSet FieldSet
-> ResourceLogs -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ResourceLogs ResourceLogs FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResourceLogs FieldSet
Data.ProtoLens.unknownFields ResourceLogs
_x))))
instance Control.DeepSeq.NFData ResourceLogs where
rnf :: ResourceLogs -> ()
rnf
= \ ResourceLogs
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResourceLogs -> FieldSet
_ResourceLogs'_unknownFields ResourceLogs
x__)
(Maybe Resource -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResourceLogs -> Maybe Resource
_ResourceLogs'resource ResourceLogs
x__)
(Vector ScopeLogs -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResourceLogs -> Vector ScopeLogs
_ResourceLogs'scopeLogs ResourceLogs
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ResourceLogs -> Text
_ResourceLogs'schemaUrl ResourceLogs
x__) ())))
data ScopeLogs
= ScopeLogs'_constructor {ScopeLogs -> Maybe InstrumentationScope
_ScopeLogs'scope :: !(Prelude.Maybe OTel.SDK.OTLP.Bindings.Common.V1.Common.InstrumentationScope),
ScopeLogs -> Vector LogRecord
_ScopeLogs'logRecords :: !(Data.Vector.Vector LogRecord),
ScopeLogs -> Text
_ScopeLogs'schemaUrl :: !Data.Text.Text,
ScopeLogs -> FieldSet
_ScopeLogs'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (ScopeLogs -> ScopeLogs -> Bool
(ScopeLogs -> ScopeLogs -> Bool)
-> (ScopeLogs -> ScopeLogs -> Bool) -> Eq ScopeLogs
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScopeLogs -> ScopeLogs -> Bool
== :: ScopeLogs -> ScopeLogs -> Bool
$c/= :: ScopeLogs -> ScopeLogs -> Bool
/= :: ScopeLogs -> ScopeLogs -> Bool
Prelude.Eq, Eq ScopeLogs
Eq ScopeLogs =>
(ScopeLogs -> ScopeLogs -> Ordering)
-> (ScopeLogs -> ScopeLogs -> Bool)
-> (ScopeLogs -> ScopeLogs -> Bool)
-> (ScopeLogs -> ScopeLogs -> Bool)
-> (ScopeLogs -> ScopeLogs -> Bool)
-> (ScopeLogs -> ScopeLogs -> ScopeLogs)
-> (ScopeLogs -> ScopeLogs -> ScopeLogs)
-> Ord ScopeLogs
ScopeLogs -> ScopeLogs -> Bool
ScopeLogs -> ScopeLogs -> Ordering
ScopeLogs -> ScopeLogs -> ScopeLogs
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: ScopeLogs -> ScopeLogs -> Ordering
compare :: ScopeLogs -> ScopeLogs -> Ordering
$c< :: ScopeLogs -> ScopeLogs -> Bool
< :: ScopeLogs -> ScopeLogs -> Bool
$c<= :: ScopeLogs -> ScopeLogs -> Bool
<= :: ScopeLogs -> ScopeLogs -> Bool
$c> :: ScopeLogs -> ScopeLogs -> Bool
> :: ScopeLogs -> ScopeLogs -> Bool
$c>= :: ScopeLogs -> ScopeLogs -> Bool
>= :: ScopeLogs -> ScopeLogs -> Bool
$cmax :: ScopeLogs -> ScopeLogs -> ScopeLogs
max :: ScopeLogs -> ScopeLogs -> ScopeLogs
$cmin :: ScopeLogs -> ScopeLogs -> ScopeLogs
min :: ScopeLogs -> ScopeLogs -> ScopeLogs
Prelude.Ord)
instance Prelude.Show ScopeLogs where
showsPrec :: Int -> ScopeLogs -> ShowS
showsPrec Int
_ ScopeLogs
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(ScopeLogs -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScopeLogs
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScopeLogs "scope" OTel.SDK.OTLP.Bindings.Common.V1.Common.InstrumentationScope where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scope"
-> (InstrumentationScope -> f InstrumentationScope)
-> ScopeLogs
-> f ScopeLogs
fieldOf Proxy# "scope"
_
= ((Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> ScopeLogs -> f ScopeLogs)
-> ((InstrumentationScope -> f InstrumentationScope)
-> Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> (InstrumentationScope -> f InstrumentationScope)
-> ScopeLogs
-> f ScopeLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ScopeLogs -> Maybe InstrumentationScope)
-> (ScopeLogs -> Maybe InstrumentationScope -> ScopeLogs)
-> Lens
ScopeLogs
ScopeLogs
(Maybe InstrumentationScope)
(Maybe InstrumentationScope)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ScopeLogs -> Maybe InstrumentationScope
_ScopeLogs'scope (\ ScopeLogs
x__ Maybe InstrumentationScope
y__ -> ScopeLogs
x__ {_ScopeLogs'scope = y__}))
(InstrumentationScope
-> Lens' (Maybe InstrumentationScope) InstrumentationScope
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens InstrumentationScope
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScopeLogs "maybe'scope" (Prelude.Maybe OTel.SDK.OTLP.Bindings.Common.V1.Common.InstrumentationScope) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scope"
-> (Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> ScopeLogs
-> f ScopeLogs
fieldOf Proxy# "maybe'scope"
_
= ((Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> ScopeLogs -> f ScopeLogs)
-> ((Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> (Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> ScopeLogs
-> f ScopeLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ScopeLogs -> Maybe InstrumentationScope)
-> (ScopeLogs -> Maybe InstrumentationScope -> ScopeLogs)
-> Lens
ScopeLogs
ScopeLogs
(Maybe InstrumentationScope)
(Maybe InstrumentationScope)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ScopeLogs -> Maybe InstrumentationScope
_ScopeLogs'scope (\ ScopeLogs
x__ Maybe InstrumentationScope
y__ -> ScopeLogs
x__ {_ScopeLogs'scope = y__}))
(Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> Maybe InstrumentationScope -> f (Maybe InstrumentationScope)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScopeLogs "logRecords" [LogRecord] where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "logRecords"
-> ([LogRecord] -> f [LogRecord]) -> ScopeLogs -> f ScopeLogs
fieldOf Proxy# "logRecords"
_
= ((Vector LogRecord -> f (Vector LogRecord))
-> ScopeLogs -> f ScopeLogs)
-> (([LogRecord] -> f [LogRecord])
-> Vector LogRecord -> f (Vector LogRecord))
-> ([LogRecord] -> f [LogRecord])
-> ScopeLogs
-> f ScopeLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ScopeLogs -> Vector LogRecord)
-> (ScopeLogs -> Vector LogRecord -> ScopeLogs)
-> Lens ScopeLogs ScopeLogs (Vector LogRecord) (Vector LogRecord)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ScopeLogs -> Vector LogRecord
_ScopeLogs'logRecords
(\ ScopeLogs
x__ Vector LogRecord
y__ -> ScopeLogs
x__ {_ScopeLogs'logRecords = y__}))
((Vector LogRecord -> [LogRecord])
-> (Vector LogRecord -> [LogRecord] -> Vector LogRecord)
-> Lens
(Vector LogRecord) (Vector LogRecord) [LogRecord] [LogRecord]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Vector LogRecord -> [LogRecord]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
(\ Vector LogRecord
_ [LogRecord]
y__ -> [LogRecord] -> Vector LogRecord
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [LogRecord]
y__))
instance Data.ProtoLens.Field.HasField ScopeLogs "vec'logRecords" (Data.Vector.Vector LogRecord) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'logRecords"
-> (Vector LogRecord -> f (Vector LogRecord))
-> ScopeLogs
-> f ScopeLogs
fieldOf Proxy# "vec'logRecords"
_
= ((Vector LogRecord -> f (Vector LogRecord))
-> ScopeLogs -> f ScopeLogs)
-> ((Vector LogRecord -> f (Vector LogRecord))
-> Vector LogRecord -> f (Vector LogRecord))
-> (Vector LogRecord -> f (Vector LogRecord))
-> ScopeLogs
-> f ScopeLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ScopeLogs -> Vector LogRecord)
-> (ScopeLogs -> Vector LogRecord -> ScopeLogs)
-> Lens ScopeLogs ScopeLogs (Vector LogRecord) (Vector LogRecord)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ScopeLogs -> Vector LogRecord
_ScopeLogs'logRecords
(\ ScopeLogs
x__ Vector LogRecord
y__ -> ScopeLogs
x__ {_ScopeLogs'logRecords = y__}))
(Vector LogRecord -> f (Vector LogRecord))
-> Vector LogRecord -> f (Vector LogRecord)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScopeLogs "schemaUrl" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schemaUrl" -> (Text -> f Text) -> ScopeLogs -> f ScopeLogs
fieldOf Proxy# "schemaUrl"
_
= ((Text -> f Text) -> ScopeLogs -> f ScopeLogs)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScopeLogs
-> f ScopeLogs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ScopeLogs -> Text)
-> (ScopeLogs -> Text -> ScopeLogs)
-> Lens ScopeLogs ScopeLogs Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ScopeLogs -> Text
_ScopeLogs'schemaUrl
(\ ScopeLogs
x__ Text
y__ -> ScopeLogs
x__ {_ScopeLogs'schemaUrl = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScopeLogs where
messageName :: Proxy ScopeLogs -> Text
messageName Proxy ScopeLogs
_
= String -> Text
Data.Text.pack String
"opentelemetry.proto.logs.v1.ScopeLogs"
packedMessageDescriptor :: Proxy ScopeLogs -> ByteString
packedMessageDescriptor Proxy ScopeLogs
_
= ByteString
"\n\
\\tScopeLogs\DC2I\n\
\\ENQscope\CAN\SOH \SOH(\v23.opentelemetry.proto.common.v1.InstrumentationScopeR\ENQscope\DC2G\n\
\\vlog_records\CAN\STX \ETX(\v2&.opentelemetry.proto.logs.v1.LogRecordR\n\
\logRecords\DC2\GS\n\
\\n\
\schema_url\CAN\ETX \SOH(\tR\tschemaUrl"
packedFileDescriptor :: Proxy ScopeLogs -> ByteString
packedFileDescriptor Proxy ScopeLogs
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor ScopeLogs)
fieldsByTag
= let
scope__field_descriptor :: FieldDescriptor ScopeLogs
scope__field_descriptor
= String
-> FieldTypeDescriptor InstrumentationScope
-> FieldAccessor ScopeLogs InstrumentationScope
-> FieldDescriptor ScopeLogs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"scope"
(MessageOrGroup -> FieldTypeDescriptor InstrumentationScope
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OTel.SDK.OTLP.Bindings.Common.V1.Common.InstrumentationScope)
(Lens
ScopeLogs
ScopeLogs
(Maybe InstrumentationScope)
(Maybe InstrumentationScope)
-> FieldAccessor ScopeLogs InstrumentationScope
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scope")) ::
Data.ProtoLens.FieldDescriptor ScopeLogs
logRecords__field_descriptor :: FieldDescriptor ScopeLogs
logRecords__field_descriptor
= String
-> FieldTypeDescriptor LogRecord
-> FieldAccessor ScopeLogs LogRecord
-> FieldDescriptor ScopeLogs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"log_records"
(MessageOrGroup -> FieldTypeDescriptor LogRecord
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor LogRecord)
(Packing
-> Lens' ScopeLogs [LogRecord] -> FieldAccessor ScopeLogs LogRecord
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Unpacked
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"logRecords")) ::
Data.ProtoLens.FieldDescriptor ScopeLogs
schemaUrl__field_descriptor :: FieldDescriptor ScopeLogs
schemaUrl__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor ScopeLogs Text
-> FieldDescriptor ScopeLogs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"schema_url"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens ScopeLogs ScopeLogs Text Text
-> FieldAccessor ScopeLogs Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl")) ::
Data.ProtoLens.FieldDescriptor ScopeLogs
in
[(Tag, FieldDescriptor ScopeLogs)]
-> Map Tag (FieldDescriptor ScopeLogs)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScopeLogs
scope__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScopeLogs
logRecords__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ScopeLogs
schemaUrl__field_descriptor)]
unknownFields :: Lens' ScopeLogs FieldSet
unknownFields
= (ScopeLogs -> FieldSet)
-> (ScopeLogs -> FieldSet -> ScopeLogs) -> Lens' ScopeLogs FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ScopeLogs -> FieldSet
_ScopeLogs'_unknownFields
(\ ScopeLogs
x__ FieldSet
y__ -> ScopeLogs
x__ {_ScopeLogs'_unknownFields = y__})
defMessage :: ScopeLogs
defMessage
= ScopeLogs'_constructor
{_ScopeLogs'scope :: Maybe InstrumentationScope
_ScopeLogs'scope = Maybe InstrumentationScope
forall a. Maybe a
Prelude.Nothing,
_ScopeLogs'logRecords :: Vector LogRecord
_ScopeLogs'logRecords = Vector LogRecord
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_ScopeLogs'schemaUrl :: Text
_ScopeLogs'schemaUrl = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ScopeLogs'_unknownFields :: FieldSet
_ScopeLogs'_unknownFields = []}
parseMessage :: Parser ScopeLogs
parseMessage
= let
loop ::
ScopeLogs
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld LogRecord
-> Data.ProtoLens.Encoding.Bytes.Parser ScopeLogs
loop :: ScopeLogs -> Growing Vector RealWorld LogRecord -> Parser ScopeLogs
loop ScopeLogs
x Growing Vector RealWorld LogRecord
mutable'logRecords
= do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if Bool
end then
do Vector LogRecord
frozen'logRecords <- IO (Vector LogRecord) -> Parser (Vector LogRecord)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) LogRecord -> IO (Vector LogRecord)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
Growing Vector RealWorld LogRecord
Growing Vector (PrimState IO) LogRecord
mutable'logRecords)
(let missing :: [a]
missing = []
in
if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
() -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
else
String -> Parser ()
forall a. String -> Parser a
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]))))
ScopeLogs -> Parser ScopeLogs
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
(Setter ScopeLogs ScopeLogs FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ScopeLogs -> ScopeLogs
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f ScopeLogs FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScopeLogs FieldSet
Setter ScopeLogs ScopeLogs FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
(Setter ScopeLogs ScopeLogs (Vector LogRecord) (Vector LogRecord)
-> Vector LogRecord -> ScopeLogs -> ScopeLogs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'logRecords") Vector LogRecord
frozen'logRecords
ScopeLogs
x))
else
do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
case Word64
tag of
Word64
10
-> do InstrumentationScope
y <- Parser InstrumentationScope
-> String -> Parser InstrumentationScope
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser InstrumentationScope -> Parser InstrumentationScope
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 InstrumentationScope
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
String
"scope"
ScopeLogs -> Growing Vector RealWorld LogRecord -> Parser ScopeLogs
loop
(Setter
ScopeLogs ScopeLogs InstrumentationScope InstrumentationScope
-> InstrumentationScope -> ScopeLogs -> ScopeLogs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"scope") InstrumentationScope
y ScopeLogs
x)
Growing Vector RealWorld LogRecord
mutable'logRecords
Word64
18
-> do !LogRecord
y <- Parser LogRecord -> String -> Parser LogRecord
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser LogRecord -> Parser LogRecord
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 LogRecord
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
String
"log_records"
Growing Vector RealWorld LogRecord
v <- IO (Growing Vector RealWorld LogRecord)
-> Parser (Growing Vector RealWorld LogRecord)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Growing Vector (PrimState IO) LogRecord
-> LogRecord -> IO (Growing Vector (PrimState IO) LogRecord)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld LogRecord
Growing Vector (PrimState IO) LogRecord
mutable'logRecords LogRecord
y)
ScopeLogs -> Growing Vector RealWorld LogRecord -> Parser ScopeLogs
loop ScopeLogs
x Growing Vector RealWorld LogRecord
v
Word64
26
-> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
(case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
(Prelude.Left UnicodeException
err)
-> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
(Prelude.Right Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
String
"schema_url"
ScopeLogs -> Growing Vector RealWorld LogRecord -> Parser ScopeLogs
loop
(Setter ScopeLogs ScopeLogs Text Text
-> Text -> ScopeLogs -> ScopeLogs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") Text
y ScopeLogs
x)
Growing Vector RealWorld LogRecord
mutable'logRecords
Word64
wire
-> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
ScopeLogs -> Growing Vector RealWorld LogRecord -> Parser ScopeLogs
loop
(Setter ScopeLogs ScopeLogs FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ScopeLogs -> ScopeLogs
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
LensLike' f ScopeLogs FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScopeLogs FieldSet
Setter ScopeLogs ScopeLogs FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ScopeLogs
x)
Growing Vector RealWorld LogRecord
mutable'logRecords
in
Parser ScopeLogs -> String -> Parser ScopeLogs
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Growing Vector RealWorld LogRecord
mutable'logRecords <- IO (Growing Vector RealWorld LogRecord)
-> Parser (Growing Vector RealWorld LogRecord)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
IO (Growing Vector RealWorld LogRecord)
IO (Growing Vector (PrimState IO) LogRecord)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
ScopeLogs -> Growing Vector RealWorld LogRecord -> Parser ScopeLogs
loop ScopeLogs
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld LogRecord
mutable'logRecords)
String
"ScopeLogs"
buildMessage :: ScopeLogs -> Builder
buildMessage
= \ ScopeLogs
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe InstrumentationScope)
ScopeLogs
ScopeLogs
(Maybe InstrumentationScope)
(Maybe InstrumentationScope)
-> ScopeLogs -> Maybe InstrumentationScope
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scope") ScopeLogs
_x
of
Maybe InstrumentationScope
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just InstrumentationScope
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (InstrumentationScope -> ByteString)
-> InstrumentationScope
-> 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))
InstrumentationScope -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage InstrumentationScope
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
((LogRecord -> Builder) -> Vector LogRecord -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
(\ LogRecord
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (LogRecord -> ByteString) -> LogRecord -> 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))
LogRecord -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage LogRecord
_v))
(FoldLike
(Vector LogRecord)
ScopeLogs
ScopeLogs
(Vector LogRecord)
(Vector LogRecord)
-> ScopeLogs -> Vector LogRecord
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'logRecords") ScopeLogs
_x))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text ScopeLogs ScopeLogs Text Text -> ScopeLogs -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") ScopeLogs
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet ScopeLogs ScopeLogs FieldSet FieldSet
-> ScopeLogs -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ScopeLogs ScopeLogs FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScopeLogs FieldSet
Data.ProtoLens.unknownFields ScopeLogs
_x))))
instance Control.DeepSeq.NFData ScopeLogs where
rnf :: ScopeLogs -> ()
rnf
= \ ScopeLogs
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ScopeLogs -> FieldSet
_ScopeLogs'_unknownFields ScopeLogs
x__)
(Maybe InstrumentationScope -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ScopeLogs -> Maybe InstrumentationScope
_ScopeLogs'scope ScopeLogs
x__)
(Vector LogRecord -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ScopeLogs -> Vector LogRecord
_ScopeLogs'logRecords ScopeLogs
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ScopeLogs -> Text
_ScopeLogs'schemaUrl ScopeLogs
x__) ())))
newtype SeverityNumber'UnrecognizedValue
= SeverityNumber'UnrecognizedValue Data.Int.Int32
deriving stock (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
(SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool)
-> (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool)
-> Eq SeverityNumber'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
== :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
$c/= :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
/= :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
Prelude.Eq, Eq SeverityNumber'UnrecognizedValue
Eq SeverityNumber'UnrecognizedValue =>
(SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Ordering)
-> (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool)
-> (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool)
-> (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool)
-> (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool)
-> (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue)
-> (SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue)
-> Ord SeverityNumber'UnrecognizedValue
SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Ordering
SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
-> SeverityNumber'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
$ccompare :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Ordering
compare :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Ordering
$c< :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
< :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
$c<= :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
<= :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
$c> :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
> :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
$c>= :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
>= :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue -> Bool
$cmax :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
max :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
$cmin :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
min :: SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
-> SeverityNumber'UnrecognizedValue
Prelude.Ord, Int -> SeverityNumber'UnrecognizedValue -> ShowS
[SeverityNumber'UnrecognizedValue] -> ShowS
SeverityNumber'UnrecognizedValue -> String
(Int -> SeverityNumber'UnrecognizedValue -> ShowS)
-> (SeverityNumber'UnrecognizedValue -> String)
-> ([SeverityNumber'UnrecognizedValue] -> ShowS)
-> Show SeverityNumber'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SeverityNumber'UnrecognizedValue -> ShowS
showsPrec :: Int -> SeverityNumber'UnrecognizedValue -> ShowS
$cshow :: SeverityNumber'UnrecognizedValue -> String
show :: SeverityNumber'UnrecognizedValue -> String
$cshowList :: [SeverityNumber'UnrecognizedValue] -> ShowS
showList :: [SeverityNumber'UnrecognizedValue] -> ShowS
Prelude.Show)
data SeverityNumber
= SEVERITY_NUMBER_UNSPECIFIED |
SEVERITY_NUMBER_TRACE |
SEVERITY_NUMBER_TRACE2 |
SEVERITY_NUMBER_TRACE3 |
SEVERITY_NUMBER_TRACE4 |
SEVERITY_NUMBER_DEBUG |
SEVERITY_NUMBER_DEBUG2 |
SEVERITY_NUMBER_DEBUG3 |
SEVERITY_NUMBER_DEBUG4 |
SEVERITY_NUMBER_INFO |
SEVERITY_NUMBER_INFO2 |
SEVERITY_NUMBER_INFO3 |
SEVERITY_NUMBER_INFO4 |
SEVERITY_NUMBER_WARN |
SEVERITY_NUMBER_WARN2 |
SEVERITY_NUMBER_WARN3 |
SEVERITY_NUMBER_WARN4 |
SEVERITY_NUMBER_ERROR |
SEVERITY_NUMBER_ERROR2 |
SEVERITY_NUMBER_ERROR3 |
SEVERITY_NUMBER_ERROR4 |
SEVERITY_NUMBER_FATAL |
SEVERITY_NUMBER_FATAL2 |
SEVERITY_NUMBER_FATAL3 |
SEVERITY_NUMBER_FATAL4 |
SeverityNumber'Unrecognized !SeverityNumber'UnrecognizedValue
deriving stock (Int -> SeverityNumber -> ShowS
[SeverityNumber] -> ShowS
SeverityNumber -> String
(Int -> SeverityNumber -> ShowS)
-> (SeverityNumber -> String)
-> ([SeverityNumber] -> ShowS)
-> Show SeverityNumber
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SeverityNumber -> ShowS
showsPrec :: Int -> SeverityNumber -> ShowS
$cshow :: SeverityNumber -> String
show :: SeverityNumber -> String
$cshowList :: [SeverityNumber] -> ShowS
showList :: [SeverityNumber] -> ShowS
Prelude.Show, SeverityNumber -> SeverityNumber -> Bool
(SeverityNumber -> SeverityNumber -> Bool)
-> (SeverityNumber -> SeverityNumber -> Bool) -> Eq SeverityNumber
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SeverityNumber -> SeverityNumber -> Bool
== :: SeverityNumber -> SeverityNumber -> Bool
$c/= :: SeverityNumber -> SeverityNumber -> Bool
/= :: SeverityNumber -> SeverityNumber -> Bool
Prelude.Eq, Eq SeverityNumber
Eq SeverityNumber =>
(SeverityNumber -> SeverityNumber -> Ordering)
-> (SeverityNumber -> SeverityNumber -> Bool)
-> (SeverityNumber -> SeverityNumber -> Bool)
-> (SeverityNumber -> SeverityNumber -> Bool)
-> (SeverityNumber -> SeverityNumber -> Bool)
-> (SeverityNumber -> SeverityNumber -> SeverityNumber)
-> (SeverityNumber -> SeverityNumber -> SeverityNumber)
-> Ord SeverityNumber
SeverityNumber -> SeverityNumber -> Bool
SeverityNumber -> SeverityNumber -> Ordering
SeverityNumber -> SeverityNumber -> SeverityNumber
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: SeverityNumber -> SeverityNumber -> Ordering
compare :: SeverityNumber -> SeverityNumber -> Ordering
$c< :: SeverityNumber -> SeverityNumber -> Bool
< :: SeverityNumber -> SeverityNumber -> Bool
$c<= :: SeverityNumber -> SeverityNumber -> Bool
<= :: SeverityNumber -> SeverityNumber -> Bool
$c> :: SeverityNumber -> SeverityNumber -> Bool
> :: SeverityNumber -> SeverityNumber -> Bool
$c>= :: SeverityNumber -> SeverityNumber -> Bool
>= :: SeverityNumber -> SeverityNumber -> Bool
$cmax :: SeverityNumber -> SeverityNumber -> SeverityNumber
max :: SeverityNumber -> SeverityNumber -> SeverityNumber
$cmin :: SeverityNumber -> SeverityNumber -> SeverityNumber
min :: SeverityNumber -> SeverityNumber -> SeverityNumber
Prelude.Ord)
instance Data.ProtoLens.MessageEnum SeverityNumber where
maybeToEnum :: Int -> Maybe SeverityNumber
maybeToEnum Int
0 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED
maybeToEnum Int
1 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE
maybeToEnum Int
2 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE2
maybeToEnum Int
3 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE3
maybeToEnum Int
4 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE4
maybeToEnum Int
5 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG
maybeToEnum Int
6 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG2
maybeToEnum Int
7 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG3
maybeToEnum Int
8 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG4
maybeToEnum Int
9 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO
maybeToEnum Int
10 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO2
maybeToEnum Int
11 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO3
maybeToEnum Int
12 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO4
maybeToEnum Int
13 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN
maybeToEnum Int
14 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN2
maybeToEnum Int
15 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN3
maybeToEnum Int
16 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN4
maybeToEnum Int
17 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR
maybeToEnum Int
18 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR2
maybeToEnum Int
19 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR3
maybeToEnum Int
20 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR4
maybeToEnum Int
21 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL
maybeToEnum Int
22 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL2
maybeToEnum Int
23 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL3
maybeToEnum Int
24 = SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL4
maybeToEnum Int
k
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just
(SeverityNumber'UnrecognizedValue -> SeverityNumber
SeverityNumber'Unrecognized
(Int32 -> SeverityNumber'UnrecognizedValue
SeverityNumber'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: SeverityNumber -> String
showEnum SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED
= String
"SEVERITY_NUMBER_UNSPECIFIED"
showEnum SeverityNumber
SEVERITY_NUMBER_TRACE = String
"SEVERITY_NUMBER_TRACE"
showEnum SeverityNumber
SEVERITY_NUMBER_TRACE2 = String
"SEVERITY_NUMBER_TRACE2"
showEnum SeverityNumber
SEVERITY_NUMBER_TRACE3 = String
"SEVERITY_NUMBER_TRACE3"
showEnum SeverityNumber
SEVERITY_NUMBER_TRACE4 = String
"SEVERITY_NUMBER_TRACE4"
showEnum SeverityNumber
SEVERITY_NUMBER_DEBUG = String
"SEVERITY_NUMBER_DEBUG"
showEnum SeverityNumber
SEVERITY_NUMBER_DEBUG2 = String
"SEVERITY_NUMBER_DEBUG2"
showEnum SeverityNumber
SEVERITY_NUMBER_DEBUG3 = String
"SEVERITY_NUMBER_DEBUG3"
showEnum SeverityNumber
SEVERITY_NUMBER_DEBUG4 = String
"SEVERITY_NUMBER_DEBUG4"
showEnum SeverityNumber
SEVERITY_NUMBER_INFO = String
"SEVERITY_NUMBER_INFO"
showEnum SeverityNumber
SEVERITY_NUMBER_INFO2 = String
"SEVERITY_NUMBER_INFO2"
showEnum SeverityNumber
SEVERITY_NUMBER_INFO3 = String
"SEVERITY_NUMBER_INFO3"
showEnum SeverityNumber
SEVERITY_NUMBER_INFO4 = String
"SEVERITY_NUMBER_INFO4"
showEnum SeverityNumber
SEVERITY_NUMBER_WARN = String
"SEVERITY_NUMBER_WARN"
showEnum SeverityNumber
SEVERITY_NUMBER_WARN2 = String
"SEVERITY_NUMBER_WARN2"
showEnum SeverityNumber
SEVERITY_NUMBER_WARN3 = String
"SEVERITY_NUMBER_WARN3"
showEnum SeverityNumber
SEVERITY_NUMBER_WARN4 = String
"SEVERITY_NUMBER_WARN4"
showEnum SeverityNumber
SEVERITY_NUMBER_ERROR = String
"SEVERITY_NUMBER_ERROR"
showEnum SeverityNumber
SEVERITY_NUMBER_ERROR2 = String
"SEVERITY_NUMBER_ERROR2"
showEnum SeverityNumber
SEVERITY_NUMBER_ERROR3 = String
"SEVERITY_NUMBER_ERROR3"
showEnum SeverityNumber
SEVERITY_NUMBER_ERROR4 = String
"SEVERITY_NUMBER_ERROR4"
showEnum SeverityNumber
SEVERITY_NUMBER_FATAL = String
"SEVERITY_NUMBER_FATAL"
showEnum SeverityNumber
SEVERITY_NUMBER_FATAL2 = String
"SEVERITY_NUMBER_FATAL2"
showEnum SeverityNumber
SEVERITY_NUMBER_FATAL3 = String
"SEVERITY_NUMBER_FATAL3"
showEnum SeverityNumber
SEVERITY_NUMBER_FATAL4 = String
"SEVERITY_NUMBER_FATAL4"
showEnum
(SeverityNumber'Unrecognized (SeverityNumber'UnrecognizedValue Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe SeverityNumber
readEnum String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_UNSPECIFIED"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_TRACE"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_TRACE2"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE2
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_TRACE3"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE3
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_TRACE4"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_TRACE4
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_DEBUG"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_DEBUG2"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG2
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_DEBUG3"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG3
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_DEBUG4"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_DEBUG4
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_INFO"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_INFO2"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO2
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_INFO3"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO3
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_INFO4"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_INFO4
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_WARN"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_WARN2"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN2
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_WARN3"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN3
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_WARN4"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_WARN4
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_ERROR"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_ERROR2"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR2
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_ERROR3"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR3
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_ERROR4"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_ERROR4
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_FATAL"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_FATAL2"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL2
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_FATAL3"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL3
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"SEVERITY_NUMBER_FATAL4"
= SeverityNumber -> Maybe SeverityNumber
forall a. a -> Maybe a
Prelude.Just SeverityNumber
SEVERITY_NUMBER_FATAL4
| Bool
Prelude.otherwise
= Maybe Int -> (Int -> Maybe SeverityNumber) -> Maybe SeverityNumber
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
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 SeverityNumber
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded SeverityNumber where
minBound :: SeverityNumber
minBound = SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED
maxBound :: SeverityNumber
maxBound = SeverityNumber
SEVERITY_NUMBER_FATAL4
instance Prelude.Enum SeverityNumber where
toEnum :: Int -> SeverityNumber
toEnum Int
k__
= SeverityNumber
-> (SeverityNumber -> SeverityNumber)
-> Maybe SeverityNumber
-> SeverityNumber
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> SeverityNumber
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
String
"toEnum: unknown value for enum SeverityNumber: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
SeverityNumber -> SeverityNumber
forall a. a -> a
Prelude.id (Int -> Maybe SeverityNumber
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: SeverityNumber -> Int
fromEnum SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED = Int
0
fromEnum SeverityNumber
SEVERITY_NUMBER_TRACE = Int
1
fromEnum SeverityNumber
SEVERITY_NUMBER_TRACE2 = Int
2
fromEnum SeverityNumber
SEVERITY_NUMBER_TRACE3 = Int
3
fromEnum SeverityNumber
SEVERITY_NUMBER_TRACE4 = Int
4
fromEnum SeverityNumber
SEVERITY_NUMBER_DEBUG = Int
5
fromEnum SeverityNumber
SEVERITY_NUMBER_DEBUG2 = Int
6
fromEnum SeverityNumber
SEVERITY_NUMBER_DEBUG3 = Int
7
fromEnum SeverityNumber
SEVERITY_NUMBER_DEBUG4 = Int
8
fromEnum SeverityNumber
SEVERITY_NUMBER_INFO = Int
9
fromEnum SeverityNumber
SEVERITY_NUMBER_INFO2 = Int
10
fromEnum SeverityNumber
SEVERITY_NUMBER_INFO3 = Int
11
fromEnum SeverityNumber
SEVERITY_NUMBER_INFO4 = Int
12
fromEnum SeverityNumber
SEVERITY_NUMBER_WARN = Int
13
fromEnum SeverityNumber
SEVERITY_NUMBER_WARN2 = Int
14
fromEnum SeverityNumber
SEVERITY_NUMBER_WARN3 = Int
15
fromEnum SeverityNumber
SEVERITY_NUMBER_WARN4 = Int
16
fromEnum SeverityNumber
SEVERITY_NUMBER_ERROR = Int
17
fromEnum SeverityNumber
SEVERITY_NUMBER_ERROR2 = Int
18
fromEnum SeverityNumber
SEVERITY_NUMBER_ERROR3 = Int
19
fromEnum SeverityNumber
SEVERITY_NUMBER_ERROR4 = Int
20
fromEnum SeverityNumber
SEVERITY_NUMBER_FATAL = Int
21
fromEnum SeverityNumber
SEVERITY_NUMBER_FATAL2 = Int
22
fromEnum SeverityNumber
SEVERITY_NUMBER_FATAL3 = Int
23
fromEnum SeverityNumber
SEVERITY_NUMBER_FATAL4 = Int
24
fromEnum
(SeverityNumber'Unrecognized (SeverityNumber'UnrecognizedValue Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: SeverityNumber -> SeverityNumber
succ SeverityNumber
SEVERITY_NUMBER_FATAL4
= String -> SeverityNumber
forall a. HasCallStack => String -> a
Prelude.error
String
"SeverityNumber.succ: bad argument SEVERITY_NUMBER_FATAL4. This value would be out of bounds."
succ SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED = SeverityNumber
SEVERITY_NUMBER_TRACE
succ SeverityNumber
SEVERITY_NUMBER_TRACE = SeverityNumber
SEVERITY_NUMBER_TRACE2
succ SeverityNumber
SEVERITY_NUMBER_TRACE2 = SeverityNumber
SEVERITY_NUMBER_TRACE3
succ SeverityNumber
SEVERITY_NUMBER_TRACE3 = SeverityNumber
SEVERITY_NUMBER_TRACE4
succ SeverityNumber
SEVERITY_NUMBER_TRACE4 = SeverityNumber
SEVERITY_NUMBER_DEBUG
succ SeverityNumber
SEVERITY_NUMBER_DEBUG = SeverityNumber
SEVERITY_NUMBER_DEBUG2
succ SeverityNumber
SEVERITY_NUMBER_DEBUG2 = SeverityNumber
SEVERITY_NUMBER_DEBUG3
succ SeverityNumber
SEVERITY_NUMBER_DEBUG3 = SeverityNumber
SEVERITY_NUMBER_DEBUG4
succ SeverityNumber
SEVERITY_NUMBER_DEBUG4 = SeverityNumber
SEVERITY_NUMBER_INFO
succ SeverityNumber
SEVERITY_NUMBER_INFO = SeverityNumber
SEVERITY_NUMBER_INFO2
succ SeverityNumber
SEVERITY_NUMBER_INFO2 = SeverityNumber
SEVERITY_NUMBER_INFO3
succ SeverityNumber
SEVERITY_NUMBER_INFO3 = SeverityNumber
SEVERITY_NUMBER_INFO4
succ SeverityNumber
SEVERITY_NUMBER_INFO4 = SeverityNumber
SEVERITY_NUMBER_WARN
succ SeverityNumber
SEVERITY_NUMBER_WARN = SeverityNumber
SEVERITY_NUMBER_WARN2
succ SeverityNumber
SEVERITY_NUMBER_WARN2 = SeverityNumber
SEVERITY_NUMBER_WARN3
succ SeverityNumber
SEVERITY_NUMBER_WARN3 = SeverityNumber
SEVERITY_NUMBER_WARN4
succ SeverityNumber
SEVERITY_NUMBER_WARN4 = SeverityNumber
SEVERITY_NUMBER_ERROR
succ SeverityNumber
SEVERITY_NUMBER_ERROR = SeverityNumber
SEVERITY_NUMBER_ERROR2
succ SeverityNumber
SEVERITY_NUMBER_ERROR2 = SeverityNumber
SEVERITY_NUMBER_ERROR3
succ SeverityNumber
SEVERITY_NUMBER_ERROR3 = SeverityNumber
SEVERITY_NUMBER_ERROR4
succ SeverityNumber
SEVERITY_NUMBER_ERROR4 = SeverityNumber
SEVERITY_NUMBER_FATAL
succ SeverityNumber
SEVERITY_NUMBER_FATAL = SeverityNumber
SEVERITY_NUMBER_FATAL2
succ SeverityNumber
SEVERITY_NUMBER_FATAL2 = SeverityNumber
SEVERITY_NUMBER_FATAL3
succ SeverityNumber
SEVERITY_NUMBER_FATAL3 = SeverityNumber
SEVERITY_NUMBER_FATAL4
succ (SeverityNumber'Unrecognized SeverityNumber'UnrecognizedValue
_)
= String -> SeverityNumber
forall a. HasCallStack => String -> a
Prelude.error
String
"SeverityNumber.succ: bad argument: unrecognized value"
pred :: SeverityNumber -> SeverityNumber
pred SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED
= String -> SeverityNumber
forall a. HasCallStack => String -> a
Prelude.error
String
"SeverityNumber.pred: bad argument SEVERITY_NUMBER_UNSPECIFIED. This value would be out of bounds."
pred SeverityNumber
SEVERITY_NUMBER_TRACE = SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED
pred SeverityNumber
SEVERITY_NUMBER_TRACE2 = SeverityNumber
SEVERITY_NUMBER_TRACE
pred SeverityNumber
SEVERITY_NUMBER_TRACE3 = SeverityNumber
SEVERITY_NUMBER_TRACE2
pred SeverityNumber
SEVERITY_NUMBER_TRACE4 = SeverityNumber
SEVERITY_NUMBER_TRACE3
pred SeverityNumber
SEVERITY_NUMBER_DEBUG = SeverityNumber
SEVERITY_NUMBER_TRACE4
pred SeverityNumber
SEVERITY_NUMBER_DEBUG2 = SeverityNumber
SEVERITY_NUMBER_DEBUG
pred SeverityNumber
SEVERITY_NUMBER_DEBUG3 = SeverityNumber
SEVERITY_NUMBER_DEBUG2
pred SeverityNumber
SEVERITY_NUMBER_DEBUG4 = SeverityNumber
SEVERITY_NUMBER_DEBUG3
pred SeverityNumber
SEVERITY_NUMBER_INFO = SeverityNumber
SEVERITY_NUMBER_DEBUG4
pred SeverityNumber
SEVERITY_NUMBER_INFO2 = SeverityNumber
SEVERITY_NUMBER_INFO
pred SeverityNumber
SEVERITY_NUMBER_INFO3 = SeverityNumber
SEVERITY_NUMBER_INFO2
pred SeverityNumber
SEVERITY_NUMBER_INFO4 = SeverityNumber
SEVERITY_NUMBER_INFO3
pred SeverityNumber
SEVERITY_NUMBER_WARN = SeverityNumber
SEVERITY_NUMBER_INFO4
pred SeverityNumber
SEVERITY_NUMBER_WARN2 = SeverityNumber
SEVERITY_NUMBER_WARN
pred SeverityNumber
SEVERITY_NUMBER_WARN3 = SeverityNumber
SEVERITY_NUMBER_WARN2
pred SeverityNumber
SEVERITY_NUMBER_WARN4 = SeverityNumber
SEVERITY_NUMBER_WARN3
pred SeverityNumber
SEVERITY_NUMBER_ERROR = SeverityNumber
SEVERITY_NUMBER_WARN4
pred SeverityNumber
SEVERITY_NUMBER_ERROR2 = SeverityNumber
SEVERITY_NUMBER_ERROR
pred SeverityNumber
SEVERITY_NUMBER_ERROR3 = SeverityNumber
SEVERITY_NUMBER_ERROR2
pred SeverityNumber
SEVERITY_NUMBER_ERROR4 = SeverityNumber
SEVERITY_NUMBER_ERROR3
pred SeverityNumber
SEVERITY_NUMBER_FATAL = SeverityNumber
SEVERITY_NUMBER_ERROR4
pred SeverityNumber
SEVERITY_NUMBER_FATAL2 = SeverityNumber
SEVERITY_NUMBER_FATAL
pred SeverityNumber
SEVERITY_NUMBER_FATAL3 = SeverityNumber
SEVERITY_NUMBER_FATAL2
pred SeverityNumber
SEVERITY_NUMBER_FATAL4 = SeverityNumber
SEVERITY_NUMBER_FATAL3
pred (SeverityNumber'Unrecognized SeverityNumber'UnrecognizedValue
_)
= String -> SeverityNumber
forall a. HasCallStack => String -> a
Prelude.error
String
"SeverityNumber.pred: bad argument: unrecognized value"
enumFrom :: SeverityNumber -> [SeverityNumber]
enumFrom = SeverityNumber -> [SeverityNumber]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: SeverityNumber -> SeverityNumber -> [SeverityNumber]
enumFromTo = SeverityNumber -> SeverityNumber -> [SeverityNumber]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: SeverityNumber -> SeverityNumber -> [SeverityNumber]
enumFromThen = SeverityNumber -> SeverityNumber -> [SeverityNumber]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: SeverityNumber
-> SeverityNumber -> SeverityNumber -> [SeverityNumber]
enumFromThenTo = SeverityNumber
-> SeverityNumber -> SeverityNumber -> [SeverityNumber]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault SeverityNumber where
fieldDefault :: SeverityNumber
fieldDefault = SeverityNumber
SEVERITY_NUMBER_UNSPECIFIED
instance Control.DeepSeq.NFData SeverityNumber where
rnf :: SeverityNumber -> ()
rnf SeverityNumber
x__ = SeverityNumber -> () -> ()
forall a b. a -> b -> b
Prelude.seq SeverityNumber
x__ ()
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
= ByteString
"\n\
\&opentelemetry/proto/logs/v1/logs.proto\DC2\ESCopentelemetry.proto.logs.v1\SUB*opentelemetry/proto/common/v1/common.proto\SUB.opentelemetry/proto/resource/v1/resource.proto\"Z\n\
\\bLogsData\DC2N\n\
\\rresource_logs\CAN\SOH \ETX(\v2).opentelemetry.proto.logs.v1.ResourceLogsR\fresourceLogs\"\195\SOH\n\
\\fResourceLogs\DC2E\n\
\\bresource\CAN\SOH \SOH(\v2).opentelemetry.proto.resource.v1.ResourceR\bresource\DC2E\n\
\\n\
\scope_logs\CAN\STX \ETX(\v2&.opentelemetry.proto.logs.v1.ScopeLogsR\tscopeLogs\DC2\GS\n\
\\n\
\schema_url\CAN\ETX \SOH(\tR\tschemaUrlJ\ACK\b\232\a\DLE\233\a\"\190\SOH\n\
\\tScopeLogs\DC2I\n\
\\ENQscope\CAN\SOH \SOH(\v23.opentelemetry.proto.common.v1.InstrumentationScopeR\ENQscope\DC2G\n\
\\vlog_records\CAN\STX \ETX(\v2&.opentelemetry.proto.logs.v1.LogRecordR\n\
\logRecords\DC2\GS\n\
\\n\
\schema_url\CAN\ETX \SOH(\tR\tschemaUrl\"\243\ETX\n\
\\tLogRecord\DC2$\n\
\\SOtime_unix_nano\CAN\SOH \SOH(\ACKR\ftimeUnixNano\DC25\n\
\\ETBobserved_time_unix_nano\CAN\v \SOH(\ACKR\DC4observedTimeUnixNano\DC2T\n\
\\SIseverity_number\CAN\STX \SOH(\SO2+.opentelemetry.proto.logs.v1.SeverityNumberR\SOseverityNumber\DC2#\n\
\\rseverity_text\CAN\ETX \SOH(\tR\fseverityText\DC2;\n\
\\EOTbody\CAN\ENQ \SOH(\v2'.opentelemetry.proto.common.v1.AnyValueR\EOTbody\DC2G\n\
\\n\
\attributes\CAN\ACK \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
\attributes\DC28\n\
\\CANdropped_attributes_count\CAN\a \SOH(\rR\SYNdroppedAttributesCount\DC2\DC4\n\
\\ENQflags\CAN\b \SOH(\aR\ENQflags\DC2\EM\n\
\\btrace_id\CAN\t \SOH(\fR\atraceId\DC2\ETB\n\
\\aspan_id\CAN\n\
\ \SOH(\fR\ACKspanIdJ\EOT\b\EOT\DLE\ENQ*\195\ENQ\n\
\\SOSeverityNumber\DC2\US\n\
\\ESCSEVERITY_NUMBER_UNSPECIFIED\DLE\NUL\DC2\EM\n\
\\NAKSEVERITY_NUMBER_TRACE\DLE\SOH\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_TRACE2\DLE\STX\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_TRACE3\DLE\ETX\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_TRACE4\DLE\EOT\DC2\EM\n\
\\NAKSEVERITY_NUMBER_DEBUG\DLE\ENQ\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_DEBUG2\DLE\ACK\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_DEBUG3\DLE\a\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_DEBUG4\DLE\b\DC2\CAN\n\
\\DC4SEVERITY_NUMBER_INFO\DLE\t\DC2\EM\n\
\\NAKSEVERITY_NUMBER_INFO2\DLE\n\
\\DC2\EM\n\
\\NAKSEVERITY_NUMBER_INFO3\DLE\v\DC2\EM\n\
\\NAKSEVERITY_NUMBER_INFO4\DLE\f\DC2\CAN\n\
\\DC4SEVERITY_NUMBER_WARN\DLE\r\DC2\EM\n\
\\NAKSEVERITY_NUMBER_WARN2\DLE\SO\DC2\EM\n\
\\NAKSEVERITY_NUMBER_WARN3\DLE\SI\DC2\EM\n\
\\NAKSEVERITY_NUMBER_WARN4\DLE\DLE\DC2\EM\n\
\\NAKSEVERITY_NUMBER_ERROR\DLE\DC1\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_ERROR2\DLE\DC2\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_ERROR3\DLE\DC3\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_ERROR4\DLE\DC4\DC2\EM\n\
\\NAKSEVERITY_NUMBER_FATAL\DLE\NAK\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_FATAL2\DLE\SYN\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_FATAL3\DLE\ETB\DC2\SUB\n\
\\SYNSEVERITY_NUMBER_FATAL4\DLE\CAN*X\n\
\\SOLogRecordFlags\DC2\US\n\
\\ESCLOG_RECORD_FLAG_UNSPECIFIED\DLE\NUL\DC2%\n\
\ LOG_RECORD_FLAG_TRACE_FLAGS_MASK\DLE\255\SOHBs\n\
\\RSio.opentelemetry.proto.logs.v1B\tLogsProtoP\SOHZ&go.opentelemetry.io/proto/otlp/logs/v1\170\STX\ESCOpenTelemetry.Proto.Logs.V1J\254:\n\
\\a\DC2\ENQ\SO\NUL\176\SOH\SOH\n\
\\200\EOT\n\
\\SOH\f\DC2\ETX\SO\NUL\DC22\189\EOT Copyright 2020, 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\
\\t\n\
\\STX\ETX\NUL\DC2\ETX\DC2\NUL4\n\
\\t\n\
\\STX\ETX\SOH\DC2\ETX\DC3\NUL8\n\
\\b\n\
\\SOH\b\DC2\ETX\NAK\NUL8\n\
\\t\n\
\\STX\b%\DC2\ETX\NAK\NUL8\n\
\\b\n\
\\SOH\b\DC2\ETX\SYN\NUL\"\n\
\\t\n\
\\STX\b\n\
\\DC2\ETX\SYN\NUL\"\n\
\\b\n\
\\SOH\b\DC2\ETX\ETB\NUL7\n\
\\t\n\
\\STX\b\SOH\DC2\ETX\ETB\NUL7\n\
\\b\n\
\\SOH\b\DC2\ETX\CAN\NUL*\n\
\\t\n\
\\STX\b\b\DC2\ETX\CAN\NUL*\n\
\\b\n\
\\SOH\b\DC2\ETX\EM\NUL=\n\
\\t\n\
\\STX\b\v\DC2\ETX\EM\NUL=\n\
\\200\ETX\n\
\\STX\EOT\NUL\DC2\EOT%\NUL,\SOH\SUB\187\ETX LogsData represents the logs data that can be stored in a persistent storage,\n\
\ OR can be embedded by other protocols that transfer OTLP logs data but do not\n\
\ implement the OTLP protocol.\n\
\\n\
\ The main difference between this message and collector protocol is that\n\
\ in this message there will not be any \"control\" or \"metadata\" specific to\n\
\ OTLP protocol.\n\
\\n\
\ When new fields are added into this message, the OTLP request MUST be updated\n\
\ as well.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\NUL\SOH\DC2\ETX%\b\DLE\n\
\\173\STX\n\
\\EOT\EOT\NUL\STX\NUL\DC2\ETX+\STX*\SUB\159\STX An array of ResourceLogs.\n\
\ For data coming from a single resource this array will typically contain\n\
\ one element. Intermediary nodes that receive data from multiple origins\n\
\ typically batch the data before forwarding further and in that case this\n\
\ array will contain multiple elements.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX+\STX\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX+\v\ETB\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX+\CAN%\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX+()\n\
\8\n\
\\STX\EOT\SOH\DC2\EOT/\NUL<\SOH\SUB, A collection of ScopeLogs from a Resource.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\SOH\SOH\DC2\ETX/\b\DC4\n\
\\n\
\\n\
\\ETX\EOT\SOH\t\DC2\ETX0\STX\DLE\n\
\\v\n\
\\EOT\EOT\SOH\t\NUL\DC2\ETX0\v\SI\n\
\\f\n\
\\ENQ\EOT\SOH\t\NUL\SOH\DC2\ETX0\v\SI\n\
\\f\n\
\\ENQ\EOT\SOH\t\NUL\STX\DC2\ETX0\v\SI\n\
\r\n\
\\EOT\EOT\SOH\STX\NUL\DC2\ETX4\STX8\SUBe The resource for the logs in this message.\n\
\ If this field is not set then resource info is unknown.\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX4\STX*\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX4+3\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX467\n\
\B\n\
\\EOT\EOT\SOH\STX\SOH\DC2\ETX7\STX$\SUB5 A list of ScopeLogs that originate from a resource.\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX7\STX\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETX7\v\DC4\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX7\NAK\US\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX7\"#\n\
\\172\SOH\n\
\\EOT\EOT\SOH\STX\STX\DC2\ETX;\STX\CAN\SUB\158\SOH This schema_url applies to the data in the \"resource\" field. It does not apply\n\
\ to the data in the \"scope_logs\" field which have their own schema_url field.\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\ENQ\DC2\ETX;\STX\b\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX;\t\DC3\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX;\SYN\ETB\n\
\7\n\
\\STX\EOT\STX\DC2\EOT?\NULJ\SOH\SUB+ A collection of Logs produced by a Scope.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\STX\SOH\DC2\ETX?\b\DC1\n\
\\204\SOH\n\
\\EOT\EOT\STX\STX\NUL\DC2\ETXC\STX?\SUB\190\SOH The instrumentation scope information for the logs in this message.\n\
\ Semantically when InstrumentationScope isn't set, it is equivalent with\n\
\ an empty instrumentation scope name (unknown).\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ACK\DC2\ETXC\STX4\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETXC5:\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETXC=>\n\
\%\n\
\\EOT\EOT\STX\STX\SOH\DC2\ETXF\STX%\SUB\CAN A list of log records.\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETXF\STX\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ACK\DC2\ETXF\v\DC4\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETXF\NAK \n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETXF#$\n\
\G\n\
\\EOT\EOT\STX\STX\STX\DC2\ETXI\STX\CAN\SUB: This schema_url applies to all logs in the \"logs\" field.\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETXI\STX\b\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXI\t\DC3\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXI\SYN\ETB\n\
\;\n\
\\STX\ENQ\NUL\DC2\EOTM\NULh\SOH\SUB/ Possible values for LogRecord.SeverityNumber.\n\
\\n\
\\n\
\\n\
\\ETX\ENQ\NUL\SOH\DC2\ETXM\ENQ\DC3\n\
\N\n\
\\EOT\ENQ\NUL\STX\NUL\DC2\ETXO\STX\"\SUBA UNSPECIFIED is the default SeverityNumber, it MUST NOT be used.\n\
\\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\ETXO\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\NUL\STX\DC2\ETXO !\n\
\\v\n\
\\EOT\ENQ\NUL\STX\SOH\DC2\ETXP\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\ETXP\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SOH\STX\DC2\ETXP\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\STX\DC2\ETXQ\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\STX\SOH\DC2\ETXQ\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\STX\STX\DC2\ETXQ\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\ETX\DC2\ETXR\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ETX\SOH\DC2\ETXR\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ETX\STX\DC2\ETXR\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\EOT\DC2\ETXS\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\EOT\SOH\DC2\ETXS\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\EOT\STX\DC2\ETXS\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\ENQ\DC2\ETXT\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ENQ\SOH\DC2\ETXT\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ENQ\STX\DC2\ETXT\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\ACK\DC2\ETXU\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ACK\SOH\DC2\ETXU\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ACK\STX\DC2\ETXU\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\a\DC2\ETXV\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\a\SOH\DC2\ETXV\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\a\STX\DC2\ETXV\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\b\DC2\ETXW\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\b\SOH\DC2\ETXW\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\b\STX\DC2\ETXW\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\t\DC2\ETXX\STX\GS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\t\SOH\DC2\ETXX\STX\SYN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\t\STX\DC2\ETXX\ESC\FS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\n\
\\DC2\ETXY\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\n\
\\SOH\DC2\ETXY\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\n\
\\STX\DC2\ETXY\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\v\DC2\ETXZ\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\v\SOH\DC2\ETXZ\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\v\STX\DC2\ETXZ\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\f\DC2\ETX[\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\f\SOH\DC2\ETX[\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\f\STX\DC2\ETX[\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\r\DC2\ETX\\\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\r\SOH\DC2\ETX\\\STX\SYN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\r\STX\DC2\ETX\\\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\SO\DC2\ETX]\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SO\SOH\DC2\ETX]\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SO\STX\DC2\ETX]\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\SI\DC2\ETX^\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SI\SOH\DC2\ETX^\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SI\STX\DC2\ETX^\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\DLE\DC2\ETX_\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DLE\SOH\DC2\ETX_\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DLE\STX\DC2\ETX_\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\DC1\DC2\ETX`\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC1\SOH\DC2\ETX`\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC1\STX\DC2\ETX`\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\DC2\DC2\ETXa\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC2\SOH\DC2\ETXa\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC2\STX\DC2\ETXa\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\DC3\DC2\ETXb\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC3\SOH\DC2\ETXb\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC3\STX\DC2\ETXb\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\DC4\DC2\ETXc\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC4\SOH\DC2\ETXc\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\DC4\STX\DC2\ETXc\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\NAK\DC2\ETXd\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\NAK\SOH\DC2\ETXd\STX\ETB\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\NAK\STX\DC2\ETXd\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\SYN\DC2\ETXe\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SYN\SOH\DC2\ETXe\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SYN\STX\DC2\ETXe\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\ETB\DC2\ETXf\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ETB\SOH\DC2\ETXf\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ETB\STX\DC2\ETXf\ESC\GS\n\
\\v\n\
\\EOT\ENQ\NUL\STX\CAN\DC2\ETXg\STX\RS\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\CAN\SOH\DC2\ETXg\STX\CAN\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\CAN\STX\DC2\ETXg\ESC\GS\n\
\.\n\
\\STX\ENQ\SOH\DC2\EOTk\NULn\SOH\SUB\" Masks for LogRecord.flags field.\n\
\\n\
\\n\
\\n\
\\ETX\ENQ\SOH\SOH\DC2\ETXk\ENQ\DC3\n\
\\v\n\
\\EOT\ENQ\SOH\STX\NUL\DC2\ETXl\STX\"\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\ETXl\STX\GS\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\NUL\STX\DC2\ETXl !\n\
\\v\n\
\\EOT\ENQ\SOH\STX\SOH\DC2\ETXm\STX0\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\ETXm\STX\"\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\SOH\STX\DC2\ETXm%/\n\
\\155\SOH\n\
\\STX\EOT\ETX\DC2\ENQr\NUL\176\SOH\SOH\SUB\141\SOH A log record according to OpenTelemetry Log Data Model:\n\
\ https://github.com/open-telemetry/oteps/blob/main/text/logs/0097-log-data-model.md\n\
\\n\
\\n\
\\n\
\\ETX\EOT\ETX\SOH\DC2\ETXr\b\DC1\n\
\\n\
\\n\
\\ETX\EOT\ETX\t\DC2\ETXs\STX\r\n\
\\v\n\
\\EOT\EOT\ETX\t\NUL\DC2\ETXs\v\f\n\
\\f\n\
\\ENQ\EOT\ETX\t\NUL\SOH\DC2\ETXs\v\f\n\
\\f\n\
\\ENQ\EOT\ETX\t\NUL\STX\DC2\ETXs\v\f\n\
\\198\SOH\n\
\\EOT\EOT\ETX\STX\NUL\DC2\ETXx\STX\GS\SUB\184\SOH time_unix_nano is the time when the event occurred.\n\
\ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January 1970.\n\
\ Value of 0 indicates unknown or missing timestamp.\n\
\\n\
\\f\n\
\\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETXx\STX\t\n\
\\f\n\
\\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETXx\n\
\\CAN\n\
\\f\n\
\\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETXx\ESC\FS\n\
\\176\a\n\
\\EOT\EOT\ETX\STX\SOH\DC2\EOT\137\SOH\STX'\SUB\161\a Time when the event was observed by the collection system.\n\
\ For events that originate in OpenTelemetry (e.g. using OpenTelemetry Logging SDK)\n\
\ this timestamp is typically set at the generation time and is equal to Timestamp.\n\
\ For events originating externally and collected by OpenTelemetry (e.g. using\n\
\ Collector) this is the time when OpenTelemetry's code observed the event measured\n\
\ by the clock of the OpenTelemetry code. This field MUST be set once the event is\n\
\ observed by OpenTelemetry.\n\
\\n\
\ For converting OpenTelemetry log data to formats that support only one timestamp or\n\
\ when receiving OpenTelemetry log data by recipients that support only one timestamp\n\
\ internally the following logic is recommended:\n\
\ - Use time_unix_nano if it is present, otherwise use observed_time_unix_nano.\n\
\\n\
\ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January 1970.\n\
\ Value of 0 indicates unknown or missing timestamp.\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\EOT\137\SOH\STX\t\n\
\\r\n\
\\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\137\SOH\n\
\!\n\
\\r\n\
\\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\137\SOH$&\n\
\o\n\
\\EOT\EOT\ETX\STX\STX\DC2\EOT\141\SOH\STX%\SUBa Numerical value of the severity, normalized to values described in Log Data Model.\n\
\ [Optional].\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\STX\ACK\DC2\EOT\141\SOH\STX\DLE\n\
\\r\n\
\\ENQ\EOT\ETX\STX\STX\SOH\DC2\EOT\141\SOH\DC1 \n\
\\r\n\
\\ENQ\EOT\ETX\STX\STX\ETX\DC2\EOT\141\SOH#$\n\
\\138\SOH\n\
\\EOT\EOT\ETX\STX\ETX\DC2\EOT\145\SOH\STX\ESC\SUB| The severity text (also known as log level). The original string representation as\n\
\ it is known at the source. [Optional].\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ETX\ENQ\DC2\EOT\145\SOH\STX\b\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ETX\SOH\DC2\EOT\145\SOH\t\SYN\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ETX\ETX\DC2\EOT\145\SOH\EM\SUB\n\
\\135\STX\n\
\\EOT\EOT\ETX\STX\EOT\DC2\EOT\150\SOH\STX2\SUB\248\SOH A value containing the body of the log record. Can be for example a human-readable\n\
\ string message (including multi-line) describing the event in a free form or it can\n\
\ be a structured data composed of arrays and maps of other values. [Optional].\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\EOT\ACK\DC2\EOT\150\SOH\STX(\n\
\\r\n\
\\ENQ\EOT\ETX\STX\EOT\SOH\DC2\EOT\150\SOH)-\n\
\\r\n\
\\ENQ\EOT\ETX\STX\EOT\ETX\DC2\EOT\150\SOH01\n\
\\198\SOH\n\
\\EOT\EOT\ETX\STX\ENQ\DC2\EOT\155\SOH\STXA\SUB\183\SOH Additional attributes that describe the specific event occurrence. [Optional].\n\
\ Attribute keys MUST be unique (it is not allowed to have more than one\n\
\ attribute with the same key).\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ENQ\EOT\DC2\EOT\155\SOH\STX\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ENQ\ACK\DC2\EOT\155\SOH\v1\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ENQ\SOH\DC2\EOT\155\SOH2<\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ENQ\ETX\DC2\EOT\155\SOH?@\n\
\\f\n\
\\EOT\EOT\ETX\STX\ACK\DC2\EOT\156\SOH\STX&\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ACK\ENQ\DC2\EOT\156\SOH\STX\b\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ACK\SOH\DC2\EOT\156\SOH\t!\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ACK\ETX\DC2\EOT\156\SOH$%\n\
\\238\STX\n\
\\EOT\EOT\ETX\STX\a\DC2\EOT\163\SOH\STX\DC4\SUB\223\STX Flags, a bit field. 8 least significant bits are the trace flags as\n\
\ defined in W3C Trace Context specification. 24 most significant bits are reserved\n\
\ and must be set to 0. Readers must not assume that 24 most significant bits\n\
\ will be zero and must correctly mask the bits when reading 8-bit trace flag (use\n\
\ flags & TRACE_FLAGS_MASK). [Optional].\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\a\ENQ\DC2\EOT\163\SOH\STX\t\n\
\\r\n\
\\ENQ\EOT\ETX\STX\a\SOH\DC2\EOT\163\SOH\n\
\\SI\n\
\\r\n\
\\ENQ\EOT\ETX\STX\a\ETX\DC2\EOT\163\SOH\DC2\DC3\n\
\\151\STX\n\
\\EOT\EOT\ETX\STX\b\DC2\EOT\169\SOH\STX\NAK\SUB\136\STX A unique identifier for a trace. All logs from the same trace share\n\
\ the same `trace_id`. The ID is a 16-byte array. An ID with all zeroes\n\
\ is considered invalid. Can be set for logs that are part of request processing\n\
\ and have an assigned trace id. [Optional].\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\b\ENQ\DC2\EOT\169\SOH\STX\a\n\
\\r\n\
\\ENQ\EOT\ETX\STX\b\SOH\DC2\EOT\169\SOH\b\DLE\n\
\\r\n\
\\ENQ\EOT\ETX\STX\b\ETX\DC2\EOT\169\SOH\DC3\DC4\n\
\\179\STX\n\
\\EOT\EOT\ETX\STX\t\DC2\EOT\175\SOH\STX\NAK\SUB\164\STX A unique identifier for a span within a trace, assigned when the span\n\
\ is created. The ID is an 8-byte array. An ID with all zeroes is considered\n\
\ invalid. Can be set for logs that are part of a particular processing span.\n\
\ If span_id is present trace_id SHOULD be also present. [Optional].\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\t\ENQ\DC2\EOT\175\SOH\STX\a\n\
\\r\n\
\\ENQ\EOT\ETX\STX\t\SOH\DC2\EOT\175\SOH\b\SI\n\
\\r\n\
\\ENQ\EOT\ETX\STX\t\ETX\DC2\EOT\175\SOH\DC2\DC4b\ACKproto3"