3

我有以下函数，它获取带有服务名称和阈值的地图。它检查服务是否超过定义的阈值，然后在事件上调用多个下游子级。

(defn tc
  [s & children]
   (where
     (and (service (:service_name s)) (not (expired? event)))
       (by [:host :service]
         (where (> metric (:threshold s)
           (with :state "critical" 
             (apply sdo children)))))))

我想使用地图向量动态构建流：

(def services [{:service "cpu/usage" :threshold 90}
               {:service "memory/usage" :threshold 90}])

当尝试在流中运行它时，我收到以下警告： 

(streams
  (doseq [s services] (tc s prn)))

WARN [2015-01-05 14:27:07,187] Thread-15 - riemann.core - instrumentation service caught
java.lang.NullPointerException
  at riemann.core$stream_BANG_$fn__11140.invoke(core.clj:19)
  at riemann.core$stream_BANG_.invoke(core.clj:18)
  at riemann.core$instrumentation_service$measure__11149.invoke(core.clj:57)
  at riemann.service.ThreadService$thread_service_runner__8782$fn__8783.invoke(service.clj:66)
  at riemann.service.ThreadService$thread_service_runner__8782.invoke(service.clj:65)
  at clojure.lang.AFn.run(AFn.java:22)
  at java.lang.Thread.run(Thread.java:701)

它可以工作，如果我在doseq 中运行流函数。这个有效并提供以下输出：

(doseq [s services]
  (streams (tc s prn)))

#riemann.codec.Event{:host "testhost", :service "memory/usage", :state "critical", :description nil, :metric 91.0, :tags nil, :time 1420460856, :ttl 60.0}
4

1 回答 1

0

如果您的事件没有所有必填字段，它似乎会爆炸，这是一个类似项目的示例，我从一系列事件中构建一个事件（减少）尽管我正在生成事件，但这并不是您正在做的事情以同样的方式：

{:service (:service (first events))
 :metric (->> events count)
 :host "All-counts"
 :state "OK"
 :time (:time (last events))
 :ttl default-interval}

我专门在没有时间的时候得到了 NPE。如果您不能从某个地方继承它，只需now在此处没有合理值就弥补（例如使用），事件到期将不起作用，您将用完 RAM

于 2015-01-05T23:15:39.937 回答