使用javax.servlet.Filter与Compojure

Question

我正在尝试使用Clojure/Compojure构建一个简单的网站，并希望将一个servlet过滤器应用于请求/响应（即一个标准的javax.servlet.Filter实例）。

例如，如果当前的源代码是：

(defroutes my-app
  (GET "/*"
    (html [:h1 "Hello Foo!!"]))
)

我想添加一个类似于这样的过滤器：

(defroutes my-app
  (GET "/*"
    (FILTER my-filter-name
      (html [:h1 "Hello Foo!!"])))
)

当my-filter-name是javax.servlet.Filter的任意实例时，有什么有效且优雅的方法来完成这个任务吗？

有任何想法如何高效而优雅地实现这个任务吗？

- mikera

---

你想将你的过滤器应用到所有路由还是仅部分路由？如果是前者，在Servlet层面上方放置过滤器可能更容易些。如果是后者，你需要使用reify或proxy编写一个适配器，将过滤器转换为中间件。 - cgrand

非常感谢，这很有帮助。我想做第二个，但似乎不可能，因为过滤器需要的请求/响应参数没有作为参数传递给中间件系统。我正在尝试第一个方法 - 如果成功了，我会发布答案！ - mikera

要完成第二个步骤，您还需要创建实现HttpServletRequest/Response接口的对象，并基于请求/响应映射来进行操作。或者使用现有的实现（例如http://static.springsource.org/spring/docs/2.0.x/api/org/springframework/mock/web/MockHttpServletRequest.html）但我认为使用reify实现它们比处理有状态的模拟对象更简单--正如Rich Hickey所说："那些模拟对象，它们正在嘲弄你"！ - cgrand

Answer 1

好的，我现在已经把它搞定了！感谢cgrand指引我朝着正确方向前进！

我的解决方案涉及创建过滤servlet和过滤器链的代理。以下是代码，供有兴趣的人参考.....

(def pass-through-filter 
  (proxy [javax.servlet.Filter] []
    (doFilter
      [request response #^javax.servlet.FilterChain filterchain]
      (do
        (.doFilter filterchain request response)))))

(defn filter-chain 
  [#^javax.servlet.Servlet servlet]
  (proxy [javax.servlet.FilterChain] []
    (doFilter
      [request response]
      (.service servlet request response))))

(defn filtered-servlet 
  [#^javax.servlet.Filter servlet-filter handler]
  (let [#^javax.servlet.Servlet base-servlet (servlet handler)
        the-filter-chain (filter-chain base-servlet)]
    (proxy [javax.servlet.http.HttpServlet] []
      (service
        [request response] 
        (.doFilter servlet-filter request response the-filter-chain))
      (init
        [config] 
        (.init base-servlet config)))))

(defroutes my-app
  (GET "/*"
    (html 
      [:h1 "Hello Foo!!"]))
  (ANY "*"
    [404 "Page not found"]))

(run-server {:port 80}
  "/*" (filtered-servlet pass-through-filter my-app))

- mikera

---

您不需要将筛选器定义添加到web.xml文件中吗？ - Chiron