Safe Haskell	None
Language	Haskell2010

Graylog.Gelf

Description

Default formatting for Graylog messages, see http://docs.graylog.org/en/latest/pages/gelf.html

Documentation

data GELF #

Constructors

GELF
Fields _gelfVersion :: Version _gelfHost :: Text _gelfShortMessage :: Text _gelfFullMessage :: Maybe Text _gelfTimestamp :: Maybe UTCTime _gelfLevel :: Maybe SyslogLevel _gelfLine :: Maybe Word _gelfFile :: Maybe Text

Instances

Show GELF #
Methods showsPrec :: Int -> GELF -> ShowS # show :: GELF -> String # showList :: [GELF] -> ShowS #
Generic GELF #
Associated Types type Rep GELF :: * -> * # Methods from :: GELF -> Rep GELF x # to :: Rep GELF x -> GELF #
ToJSON GELF #
Methods toJSON :: GELF -> Value # toEncoding :: GELF -> Encoding # toJSONList :: [GELF] -> Value # toEncodingList :: [GELF] -> Encoding #
type Rep GELF #
type Rep GELF = D1 * (MetaData "GELF" "Graylog.Gelf" "graylog-0.1.0.1-1t1jx11qmYgETGR1XG6cyA" False) (C1 * (MetaCons "GELF" PrefixI True) ((::) ((::) ((::) (S1 * (MetaSel (Just Symbol "_gelfVersion") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Version)) (S1 * (MetaSel (Just Symbol "_gelfHost") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Text))) ((::) (S1 * (MetaSel (Just Symbol "_gelfShortMessage") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Text)) (S1 * (MetaSel (Just Symbol "_gelfFullMessage") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * (Maybe Text))))) ((::) ((::) (S1 * (MetaSel (Just Symbol "_gelfTimestamp") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * (Maybe UTCTime))) (S1 * (MetaSel (Just Symbol "_gelfLevel") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * (Maybe SyslogLevel)))) ((::) (S1 * (MetaSel (Just Symbol "_gelfLine") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * (Maybe Word))) (S1 * (MetaSel (Just Symbol "_gelfFile") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * (Maybe Text)))))))

data Version #

Constructors

Version1x1

Instances

Eq Version #
Methods (==) :: Version -> Version -> Bool # (/=) :: Version -> Version -> Bool #
Show Version #
Methods showsPrec :: Int -> Version -> ShowS # show :: Version -> String # showList :: [Version] -> ShowS #
Generic Version #
Associated Types type Rep Version :: * -> * # Methods from :: Version -> Rep Version x # to :: Rep Version x -> Version #
ToJSON Version #
Methods toJSON :: Version -> Value # toEncoding :: Version -> Encoding # toJSONList :: [Version] -> Value # toEncodingList :: [Version] -> Encoding #
type Rep Version #
type Rep Version = D1 * (MetaData "Version" "Graylog.Gelf" "graylog-0.1.0.1-1t1jx11qmYgETGR1XG6cyA" False) (C1 * (MetaCons "Version1x1" PrefixI False) (U1 *))

data SyslogLevel #

Constructors

Emergency
Alert
Critical
Error
Warning
Notice
Informational
Debug

Instances

Eq SyslogLevel #
Methods (==) :: SyslogLevel -> SyslogLevel -> Bool # (/=) :: SyslogLevel -> SyslogLevel -> Bool #
Ord SyslogLevel #
Methods compare :: SyslogLevel -> SyslogLevel -> Ordering # (<) :: SyslogLevel -> SyslogLevel -> Bool # (<=) :: SyslogLevel -> SyslogLevel -> Bool # (>) :: SyslogLevel -> SyslogLevel -> Bool # (>=) :: SyslogLevel -> SyslogLevel -> Bool # max :: SyslogLevel -> SyslogLevel -> SyslogLevel # min :: SyslogLevel -> SyslogLevel -> SyslogLevel #
Show SyslogLevel #
Methods showsPrec :: Int -> SyslogLevel -> ShowS # show :: SyslogLevel -> String # showList :: [SyslogLevel] -> ShowS #
Generic SyslogLevel #
Associated Types type Rep SyslogLevel :: * -> * # Methods from :: SyslogLevel -> Rep SyslogLevel x # to :: Rep SyslogLevel x -> SyslogLevel #
ToJSON SyslogLevel #
Methods toJSON :: SyslogLevel -> Value # toEncoding :: SyslogLevel -> Encoding # toJSONList :: [SyslogLevel] -> Value # toEncodingList :: [SyslogLevel] -> Encoding #
type Rep SyslogLevel #
type Rep SyslogLevel = D1 * (MetaData "SyslogLevel" "Graylog.Gelf" "graylog-0.1.0.1-1t1jx11qmYgETGR1XG6cyA" False) ((:+:) * ((:+:) * ((:+:) * (C1 * (MetaCons "Emergency" PrefixI False) (U1 )) (C1 (MetaCons "Alert" PrefixI False) (U1 ))) ((:+:) (C1 * (MetaCons "Critical" PrefixI False) (U1 )) (C1 (MetaCons "Error" PrefixI False) (U1 )))) ((:+:) ((:+:) * (C1 * (MetaCons "Warning" PrefixI False) (U1 )) (C1 (MetaCons "Notice" PrefixI False) (U1 ))) ((:+:) (C1 * (MetaCons "Informational" PrefixI False) (U1 )) (C1 (MetaCons "Debug" PrefixI False) (U1 *)))))

simpleGelf #

Arguments

:: Text	Hostname
-> Text	Short message
-> GELF