[WIP] Datadog APM support

.buildkite/pipeline.yaml

@@ -0,0 +1,41 @@
+steps:
+  # Default stack.yaml
+  - command: "stack $ARGS build --test --no-run-tests"
+  # LTS 7
+  - command: "stack $ARGS build --test --no-run-tests"
+    env:
+      STACK_YAML: "stack-lts7.yaml"
+  # LTS 9
+  - command: "stack $ARGS build --test --no-run-tests"
+    env:
+      STACK_YAML: "stack-lts9.yaml"
+  # Latest LTS
+  - command: "stack $ARGS build --test --no-run-tests"
+    env:
+      ARGS: "--resolver lts"
+  # Nightly build
+  - command: "stack $ARGS build --test --no-run-tests"
+    env:
+      ARGS: "--resolver nightly"
+
+  - wait
+
+  - command: "stack $ARGS test"
+  - command: "stack $ARGS haddock"
+
+  - command: "stack $ARGS test"
+    env:
+      STACK_YAML: "stack-lts7.yaml"
+
+  - command: "stack $ARGS test"
+    env:
+      STACK_YAML: "stack-lts9.yaml"
+
+
+  - command: "stack $ARGS test"
+    env:
+      ARGS: "--resolver lts"
+
+  - command: "stack $ARGS test"
+    env:
+      ARGS: "--resolver nightly"

README.md

@@ -1,3 +1,28 @@
-[![Build Status](https://travis-ci.org/iand675/datadog.svg?branch=master)](https://travis-ci.org/iand675/datadog.svg?branch=master)
+### :zap: WAI middleware for tracking metrics in Datadog :dog2: :zap:
+
+dd-middleware provides a simple middleware for shoving metrics from WAI
+requests to Datadog. Out of the box, it times all request/response
+lifecycles that don't throw exceptions (excluding raw responses used in
+Websocket upgrades and the like).
+
+The default tracked metric is `warp.requests.duration`
+
+Additional metrics can be sent as part of the request lifecycle by
+grabbing the datadog client from the WAI vault:
+
+``` haskell
+{-# LANGUAGE OverloadedStrings #-}
+import Data.Foldable
+import qualified Data.Vault.Lazy as V
+import Network.StatsD.Datadog
+
+anApp :: Application
+anApp req responder = do
+  forM_ (V.lookup statsClientKey $ vault req) $ \client ->
+    send client $ metric (MetricName "aardvark") Counter (1 :: Int)
+  responder $ responseLBS "aardvark"
+```
+
+
+
 
-# Datadog Client

datadog/README.md

@@ -0,0 +1,3 @@
+[![Build Status](https://travis-ci.org/iand675/datadog.svg?branch=master)](https://travis-ci.org/iand675/datadog.svg?branch=master)
+
+# Datadog Client

package.yaml → datadog/package.yaml

@@ -46,23 +46,30 @@ ghc-options:
 
 dependencies:
   - aeson
+  - atomic-primops
   - auto-update
   - base >= 4.7 && < 5
   - buffer-builder
   - bytestring
   - containers
+  - clock
+  - conduit
+  - conduit-extra
   - dlist
+  - exceptions
   - http-client
   - http-client-tls
   - http-types
   - lens
-  - lifted-base
-  - monad-control
+  - resourcet
+  - mtl
+  - mwc-random
   - network
   - old-locale
   - text
   - time
   - transformers-base
+  - unliftio
   - unordered-containers
   - unliftio
   - vector