Использование javax.servlet.Filter с Compojure

Я пытаюсь создать простой веб-сайт с помощью Clojure/Compojure и хочу, чтобы фид применял фильтр сервлета к запросу/ответу (т.е. стандартный экземпляр 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.

Любая идея, как сделать это эффективно и элегантно?


person mikera    schedule 10.05.2010    source источник
comment
Вы хотите применить фильтр ко всем маршрутам или только к некоторым? В первом случае может быть проще поставить фильтр выше Ring/Compojure, на уровне сервлета. Во втором случае вам нужно написать (с reify или прокси) адаптер, который превращает фильтр в промежуточное ПО.   -  person cgrand    schedule 11.05.2010
comment
Спасибо очень полезно. Я хотел бы сделать второе, но это кажется невозможным, потому что параметры запроса/ответа, которые нужны фильтру, не передаются в качестве параметров в систему промежуточного программного обеспечения. Я пробую первый - опубликую ответ, если он заработает!   -  person mikera    schedule 12.05.2010
comment
Чтобы сделать второе, вам также необходимо создать объекты, которые реализуют HttpServletRequest/Response поверх карт запроса/ответа. Или использовать существующую реализацию (например, static.springsource.org/spring/docs/2.0.x/api/org/), но я думаю, что проще реализовать их с помощью reify, чем иметь дело с фиктивным объектом с состоянием - как говорит Рич Хикки. Эти фиктивные объекты , они издеваются над вами!   -  person cgrand    schedule 12.05.2010


Ответы (1)


Хорошо, теперь у меня это работает! Спасибо cgrand за подсказки в правильном направлении!

Мое решение заключалось в создании прокси для отфильтрованного сервлета и цепочки фильтров. Код ниже для всех, кто заинтересован.....

(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))
person mikera    schedule 12.05.2010
comment
Вам не нужно добавлять определение фильтра в файл web.xml? - person Chiron; 24.06.2013