Clojure 责任链 - Code Recipes

设计模式 / 行为型模式

;; Chain of responsibility folds into a sequence of handlers walked by some:
;; the chain stops at the first one that answers, with no next pointers

;; Handlers - each knows its code and what to do
(def rescuers
  [{:code 1 :to-help #(println "call firefighters")}
   {:code 2 :to-help #(println "call the police")}
   {:code 3 :to-help #(println "call an ambulance")}])

;; HandleRequest()
(defn help [code]
  (or (some (fn [r]
              (when (= code (:code r))
                ((:to-help r))
                true))
            rescuers)
      (println "nobody handles code" code)))

(help 1)  ; call firefighters
(help 3)  ; call an ambulance
(help 9)  ; nobody handles code 9 - the chain ran out

Avoid coupling the sender of a request to its receiver by giving more than one object a chance to handle the request. Chain the receiving objects and pass the request along the chain until an object handles it.

问题。客服部门收到大小不一的请求：小请求交给助理，较大的交给经理，很大的交给总监。如果发送请求的代码必须自己选择接收者，它就得了解每一个接收者和每一条规则。每增加一个接收者，都要修改发送者。

思路。这些接收者称为处理者，它们按固定顺序排列，这就是链。发送者只把请求交给第一个处理者。每个处理者检查请求是否归自己处理。如果是，处理者完成工作，请求不再往下传。如果不是，处理者把请求传给下一个。发送者不知道哪个处理者会作答，也不知道是否会有处理者作答。

如何阅读示例。几个处理者连成一条链。每个处理者按自己的规则判断请求是否归自己处理。客户端代码发送几个请求，每次都发往链的起点。每个请求沿着链传递，直到某个处理者接受它。在大多数语言中，每个处理者都持有下一个处理者的引用；在某些语言中，链只是一个按顺序检查的普通列表。有些示例还会发送一个没有任何处理者接受的请求，输出会报告这一点。

何时使用。当多个对象都可能处理某个请求，而这些对象的集合或顺序可能变化时，使用责任链模式。接收者始终不变时不要使用它：直接调用更简单，也更容易理解。

常见错误。忘记链的末端。这样，没有任何处理者接受的请求就会悄无声息地丢失。应事先决定末端如何处理：报错、交给默认处理者，或者给出明确的报告。