pickle's Introduction

pickle

Instant StatsD in Haskell. Easy to implement in a program you've already written without any refactoring to pass any sockets/configuration around.

Usage

Call setupPickle defaultConfig at least once, e.g.

{-# LANGUAGE OverloadedStrings #-}
import qualified Data.Map.Strict as M

main :: IO()
main = do
    setupPickle defaultConfig
    {...}

Then to send metrics you can just call one of these functions:

let name  = "gauge.name"
    value = 42
    tags  = M.fromList [("key","value), ("tag2","value")]
gauge   name value (Just tags)
timer   name value (Just tags) Nothing
counter name value (Just tags) Nothing

Pickle will take care of the rest. He's a good boy.

pickle's People

Contributors

Stargazers

Watchers

pickle's Issues

Tags are not passed in the network call

In the below function, tags are being parsed but never sent over the network call

    mPick <- gpPickle <$> atomically (readTVar pickle)
    case mPick of
        Nothing -> pure () -- no connection, give up.
        Just (Pickle sock cfg) -> do
            let tags = parseTags $ (fromMaybe M.empty mTags) <> (statsdTags cfg)
                sampling = maybe "" (\s -> "|@" <> showT s ) mSampling
                name = (statsdPrefix cfg) <> n
                msg  = name <> ":" <> (showT val) <> "|" <> kind <> sampling
            when (statsdVerbose cfg) (T.putStrLn $ "Sending metric: " <> msg)
            void $ (try $ send sock $ T.encodeUtf8 msg :: IO(Either SomeException Int))

Recommend Projects