Prometheus

A very rough Clojure wrapper around Prometheus, an open-source service monitoring system and time series database. Unlike https://github.com/soundcloud/prometheus-clj it has no coupling to Ring or compojure.

Usage

(require '[prometheus.raw :as count])

(def counters {:some-count (count/mk-counter 
                            :application-name 
                            :some-count 
                            [] 
                            "text description")
                :some-count-with-labels (count/mk-counter 
                                        :application-name 
                                        :some-count-with-labels 
                                        [:browser] 
                                        "text description")
                })

;;Super useful to include this in all metrics.
;;Effectively the version from your project.clj file
(def project-version "v0.0.1")

(defn inc-counter
  ([key]       (inc-counter key {}))
  ([key pairs] (apply (count/incrementer-fn counters project-version) [key pairs])))
  
(inc-counter :some-count))
(inc-counter :some-count-with-labels {:browser "Chrome"})
(inc-counter :some-count-with-labels {:browser "Firefox"})

Future

Some idle thoughts about tidying the interface using watchers on atoms. None of this exists yet.

(require '[promethesus.core :as prom])
(def errors (atom 0))
(prom/register-counter errors)
(swap! errors inc)

(def errors (atom 0))

(prom/start!)
;;  (inc-counter :failed-batches {:type worker-type :error-code (str (.getClass e))})

(def failed-batches (atom {:error-code 0}))
(prom/register-counter failed-batches)
(swap! failed-batches assoc :error-code (-> @failed-batches :error-code inc))

(prom/start!)

License

Copyright © 2015 Joseph Wilk

Distributed under the Eclipse Public License either version 1.0 or (at your option) any later version.