@@ -5,8 +5,8 @@
55module Katip.Scribes.Datadog.TCP
66 ( -- * Types
77 APIKey(..)
8− , DataDogScribeSettings(..)
9− , DataDogAuth(..)
8+ , DatadogScribeSettings(..)
9+ , DatadogAuth(..)
1010 , directAPIConnectionParams
1111 , localAgentConnectionParams
1212 -- * Scribe construction
@@ -44,7 +44,7 @@ newtype APIKey = APIKey
4444 } deriving (Show, Eq)
4545
4646
47−data DataDogAuth =
47+data DatadogAuth =
4848 NoAuthLocal
4949 -- ^ Writing to the local agent, no auth required
5050 | DirectAuth APIKey
@@ -52,13 +52,13 @@ data DataDogAuth =
5252 -- required. Using a local agent is recommended.
5353
5454
55−data DataDogScribeSettings = DataDogScribeSettings
55+data DatadogScribeSettings = DatadogScribeSettings
5656 { dataDogScribeSettings_connectionParams :: C.ConnectionParams
5757 -- ^ Specify where the logs should go. If writing directly to the
5858 -- main intake API, you can use 'directAPIConnectionParams'. If
5959 -- writing to a local agent, we recommend
6060 -- 'localAgentConnectionParams'
61− , dataDogScribeSettings_auth :: DataDogAuth
61+ , dataDogScribeSettings_auth :: DatadogAuth
6262 , dataDogScribeSettings_poolStripes :: Int
6363 -- ^ How many stripes should be used in the connection pool. 1 is a reasonable default
6464 , dataDogScribeSettings_connsPerStripe :: Int
@@ -86,7 +86,7 @@ directAPIConnectionParams = C.ConnectionParams
8686 }
8787
8888
89−-- | Configure to talk to a local DataDog agent at 127.0.0.1. TLS is not
89+-- | Configure to talk to a local Datadog agent at 127.0.0.1. TLS is not
9090-- utilized. This is the preferred type of connection because
9191-- authentication, buffering, and other more advanced features are
9292-- handled by the agent configuration.
@@ -103,10 +103,10 @@ localAgentConnectionParams port = C.ConnectionParams
103103-- connections with a number of connections per stripe equal to
104104-- 'getNumCapabilities'. Retry policy will do an exponential backoff
105105-- with a 25ms base delay for up to 5 retries for a total cumulative delay of 775ms
106−mkDatadogScribeSettings :: C.ConnectionParams -> DataDogAuth -> IO DataDogScribeSettings
106+mkDatadogScribeSettings :: C.ConnectionParams -> DatadogAuth -> IO DatadogScribeSettings
107107mkDatadogScribeSettings connectionParams auth = do
108108 capabilities <- Conc.getNumCapabilities
109− pure $ DataDogScribeSettings
109+ pure $ DatadogScribeSettings
110110 { dataDogScribeSettings_connectionParams = connectionParams
111111 , dataDogScribeSettings_auth = auth
112112 , dataDogScribeSettings_poolStripes = 1
@@ -118,7 +118,7 @@ mkDatadogScribeSettings connectionParams auth = do
118118
119119-------------------------------------------------------------------------------
120120mkDatadogScribe
121− :: DataDogScribeSettings
121+ :: DatadogScribeSettings
122122 -> PermitFunc
123123 -- ^ Function on whether to permit items, e.g. @permitItem InfoS@
124124 -> Verbosity