Safe Haskell | None |
---|---|
Language | Haskell2010 |
Datatypes for reflection of protocol buffer messages.
Synopsis
- class Message msg where
- messageName :: Proxy msg -> Text
- defMessage :: msg
- fieldsByTag :: Map Tag (FieldDescriptor msg)
- fieldsByTextFormatName :: Map String (FieldDescriptor msg)
- unknownFields :: Lens' msg FieldSet
- parseMessage :: Parser msg
- buildMessage :: msg -> Builder
- newtype Tag = Tag {}
- allFields :: Message msg => [FieldDescriptor msg]
- data FieldDescriptor msg where
- FieldDescriptor :: String -> FieldTypeDescriptor value -> FieldAccessor msg value -> FieldDescriptor msg
- fieldDescriptorName :: FieldDescriptor msg -> String
- isRequired :: FieldDescriptor msg -> Bool
- data FieldAccessor msg value where
- PlainField :: WireDefault value -> Lens' msg value -> FieldAccessor msg value
- OptionalField :: Lens' msg (Maybe value) -> FieldAccessor msg value
- RepeatedField :: Packing -> Lens' msg [value] -> FieldAccessor msg value
- MapField :: (Ord key, Message entry) => Lens' entry key -> Lens' entry value -> Lens' msg (Map key value) -> FieldAccessor msg entry
- data WireDefault value where
- Required :: WireDefault value
- Optional :: (FieldDefault value, Eq value) => WireDefault value
- data Packing
- data FieldTypeDescriptor value where
- MessageField :: Message value => MessageOrGroup -> FieldTypeDescriptor value
- ScalarField :: ScalarField value -> FieldTypeDescriptor value
- data ScalarField t where
- EnumField :: MessageEnum value => ScalarField value
- Int32Field :: ScalarField Int32
- Int64Field :: ScalarField Int64
- UInt32Field :: ScalarField Word32
- UInt64Field :: ScalarField Word64
- SInt32Field :: ScalarField Int32
- SInt64Field :: ScalarField Int64
- Fixed32Field :: ScalarField Word32
- Fixed64Field :: ScalarField Word64
- SFixed32Field :: ScalarField Int32
- SFixed64Field :: ScalarField Int64
- FloatField :: ScalarField Float
- DoubleField :: ScalarField Double
- BoolField :: ScalarField Bool
- StringField :: ScalarField Text
- BytesField :: ScalarField ByteString
- data MessageOrGroup
- class FieldDefault value where
- fieldDefault :: value
- class (Enum a, Bounded a) => MessageEnum a where
- build :: Message a => (a -> a) -> a
- data Registry
- register :: forall msg. Message msg => Proxy msg -> Registry
- lookupRegistered :: Text -> Registry -> Maybe SomeMessageType
- data SomeMessageType where
- SomeMessageType :: Message msg => Proxy msg -> SomeMessageType
- matchAnyMessage :: forall value. FieldTypeDescriptor value -> Maybe (AnyMessageDescriptor value)
- data AnyMessageDescriptor msg = AnyMessageDescriptor {
- anyTypeUrlLens :: Lens' msg Text
- anyValueLens :: Lens' msg ByteString
- maybeLens :: b -> Lens' (Maybe b) b
- reverseRepeatedFields :: Map k (FieldDescriptor msg) -> msg -> msg
- type FieldSet = [TaggedValue]
- data TaggedValue = TaggedValue !Tag !WireValue
- discardUnknownFields :: Message msg => msg -> msg
Reflection of Messages
class Message msg where Source #
Every protocol buffer is an instance of Message
. This class enables
serialization by providing reflection of all of the fields that may be used
by this type.
messageName :: Proxy msg -> Text Source #
A unique identifier for this type, of the format
"packagename.messagename"
.
defMessage :: msg Source #
A message with all fields set to their default values.
Satisfies encodeMessage defMessage == ""
and decodeMessage "" == Right defMessage
.
fieldsByTag :: Map Tag (FieldDescriptor msg) Source #
The fields of the proto, indexed by their (integer) tag.
fieldsByTextFormatName :: Map String (FieldDescriptor msg) Source #
This map is keyed by the name of the field used for text format protos. This is just the field name for every field except for group fields, which use their Message type name in text protos instead of their field name. For example, "optional group Foo" has the field name "foo" but in this map it is stored with the key Foo.
unknownFields :: Lens' msg FieldSet Source #
Access the unknown fields of a Message.
parseMessage :: Parser msg Source #
Decode a message value.
See also the functions in Data.ProtoLens.Encoding.
buildMessage :: msg -> Builder Source #
Encode a message value.
See also the functions in Data.ProtoLens.Encoding.
A tag that identifies a particular field of the message when converting to/from the wire format.
allFields :: Message msg => [FieldDescriptor msg] Source #
data FieldDescriptor msg where Source #
A description of a specific field of a protocol buffer.
The String
parameter is the name of the field from the .proto file,
as used in TextFormat, with the same behavior for groups as
fieldsByTextFormatName
.
(Haddock doesn't support per-argument docs for GADTs.)
FieldDescriptor :: String -> FieldTypeDescriptor value -> FieldAccessor msg value -> FieldDescriptor msg |
fieldDescriptorName :: FieldDescriptor msg -> String Source #
The original name of the field in the .proto file.
isRequired :: FieldDescriptor msg -> Bool Source #
Whether the given field is required. Specifically, if its FieldAccessor
is a Required
PlainField
.
data FieldAccessor msg value where Source #
A Lens for accessing the value of an individual field in a protocol buffer message.
PlainField :: WireDefault value -> Lens' msg value -> FieldAccessor msg value | |
OptionalField :: Lens' msg (Maybe value) -> FieldAccessor msg value | |
RepeatedField :: Packing -> Lens' msg [value] -> FieldAccessor msg value | |
MapField :: (Ord key, Message entry) => Lens' entry key -> Lens' entry value -> Lens' msg (Map key value) -> FieldAccessor msg entry |
data WireDefault value where Source #
The default value (if any) for a PlainField
on the wire.
Required :: WireDefault value | |
Optional :: (FieldDefault value, Eq value) => WireDefault value |
data FieldTypeDescriptor value where Source #
A description of the type of a given field value.
MessageField :: Message value => MessageOrGroup -> FieldTypeDescriptor value | |
ScalarField :: ScalarField value -> FieldTypeDescriptor value |
Instances
Show (FieldTypeDescriptor value) Source # | |
Defined in Data.ProtoLens.Message showsPrec :: Int -> FieldTypeDescriptor value -> ShowS # show :: FieldTypeDescriptor value -> String # showList :: [FieldTypeDescriptor value] -> ShowS # |
data ScalarField t where Source #
Instances
Show (ScalarField value) Source # | |
Defined in Data.ProtoLens.Message showsPrec :: Int -> ScalarField value -> ShowS # show :: ScalarField value -> String # showList :: [ScalarField value] -> ShowS # |
data MessageOrGroup Source #
Instances
Show MessageOrGroup Source # | |
Defined in Data.ProtoLens.Message showsPrec :: Int -> MessageOrGroup -> ShowS # show :: MessageOrGroup -> String # showList :: [MessageOrGroup] -> ShowS # |
class FieldDefault value where Source #
A proto3 field type with an implicit default value.
This is distinct from, say, Default
to avoid orphan instances, and
because Bool
doesn't necessarily have a good Default instance for general
usage.
fieldDefault :: value Source #
Instances
FieldDefault Bool Source # | |
Defined in Data.ProtoLens.Message fieldDefault :: Bool Source # | |
FieldDefault Double Source # | |
Defined in Data.ProtoLens.Message | |
FieldDefault Float Source # | |
Defined in Data.ProtoLens.Message fieldDefault :: Float Source # | |
FieldDefault Int32 Source # | |
Defined in Data.ProtoLens.Message fieldDefault :: Int32 Source # | |
FieldDefault Int64 Source # | |
Defined in Data.ProtoLens.Message fieldDefault :: Int64 Source # | |
FieldDefault Word32 Source # | |
Defined in Data.ProtoLens.Message | |
FieldDefault Word64 Source # | |
Defined in Data.ProtoLens.Message | |
FieldDefault ByteString Source # | |
Defined in Data.ProtoLens.Message | |
FieldDefault Text Source # | |
Defined in Data.ProtoLens.Message fieldDefault :: Text Source # |
class (Enum a, Bounded a) => MessageEnum a where Source #
A class for protocol buffer enums that enables safe decoding.
maybeToEnum :: Int -> Maybe a Source #
Convert the given Int
to an enum value. Returns Nothing
if
no corresponding value was defined in the .proto file.
showEnum :: a -> String Source #
Get the name of this enum as defined in the .proto file. Used
for the human-readable output in Data.ProtoLens.TextFormat
.
Constructing protocol buffers
build :: Message a => (a -> a) -> a Source #
Utility function for building a message from a default value. For example:
instance Default A where ... x, y :: Lens' A Int m :: A m = build ((x .~ 5) . (y .~ 7))
Proto registries
A set of known message types. Can help encode/decode protobufs containing
Data.ProtoLens.Any
values in a more human-readable text format.
Registries can be combined using their Monoid
instance.
See the withRegistry
functions in TextFormat
register :: forall msg. Message msg => Proxy msg -> Registry Source #
Build a Registry
containing a single proto type.
Example: > register (Proxy :: Proxy Proto.My.Proto.Type)
lookupRegistered :: Text -> Registry -> Maybe SomeMessageType Source #
Look up a message type by name (e.g.,
"type.googleapis.com/google.protobuf.FloatValue"
). The URL corresponds to
the field google.protobuf.Any.type_url
.
data SomeMessageType where Source #
SomeMessageType :: Message msg => Proxy msg -> SomeMessageType |
Any messages
matchAnyMessage :: forall value. FieldTypeDescriptor value -> Maybe (AnyMessageDescriptor value) Source #
data AnyMessageDescriptor msg Source #
AnyMessageDescriptor | |
|
Utilities for constructing protocol buffer lenses
maybeLens :: b -> Lens' (Maybe b) b Source #
A helper lens for accessing optional fields. This is used as part of code generation, and should generally not be needed explicitly.
Note that maybeLens
does not satisfy the lens laws, which expect that set
l (view l x) == x
. For example,
set (maybeLens 'a') (view (maybeLens 'a') Nothing) == Just 'a'
However, this is the behavior generally expected by users, and only matters if we're explicitly checking whether a field is set.
Internal utilities for parsing protocol buffers
reverseRepeatedFields :: Map k (FieldDescriptor msg) -> msg -> msg Source #
Reverse every repeated (list) field in the message.
During parsing, we store fields temporarily in reverse order, and then un-reverse them at the end. This helps avoid the quadratic blowup from repeatedly appending to lists. TODO: Benchmark how much of a problem this is in practice, and whether it's still a net win for small protobufs. If we decide on it more permanently, consider moving it to a more internal module.
Unknown fields
type FieldSet = [TaggedValue] Source #
data TaggedValue Source #
A pair of an encoded field and a value.
Instances
Eq TaggedValue Source # | |
Defined in Data.ProtoLens.Encoding.Wire (==) :: TaggedValue -> TaggedValue -> Bool # (/=) :: TaggedValue -> TaggedValue -> Bool # | |
Ord TaggedValue Source # | |
Defined in Data.ProtoLens.Encoding.Wire compare :: TaggedValue -> TaggedValue -> Ordering # (<) :: TaggedValue -> TaggedValue -> Bool # (<=) :: TaggedValue -> TaggedValue -> Bool # (>) :: TaggedValue -> TaggedValue -> Bool # (>=) :: TaggedValue -> TaggedValue -> Bool # max :: TaggedValue -> TaggedValue -> TaggedValue # min :: TaggedValue -> TaggedValue -> TaggedValue # | |
NFData TaggedValue Source # | |
Defined in Data.ProtoLens.Encoding.Wire rnf :: TaggedValue -> () # |
discardUnknownFields :: Message msg => msg -> msg Source #