Jak uzyskać HttpServletRequest w programie obsługi Ring?

Question

Czy istnieje sposób uzyskania obiektu HttpServletRequest w programie obsługi pierścienia? Używam aplikacji Noir do tworzenia aplikacji internetowych. Potrzebuję uzyskać obiekt HttpServletRequest przy obsłudze identyfikatora URI. Używam więc funkcji (noir.request.ring-request), aby odzyskać mapę żądań dzwonka, która zawiera: klucz żądania serwletu, ale wartość jest zerowa. Czy to właściwy sposób, czy też coś przeoczyłem?

następujący kod:

(ns my-app 
    (:use noir.request)) 
(defpage [:get "/app"] [] 
    (str (ring-request))) 

wynik:

{:remote-addr "127.0.0.1", :scheme :http, :query-params {}, :session {}, :form-params {}, :multipart-params {}, :servlet #, :request-method :get, :query-string nil, :content-type nil, :cookies {"ring-session" {:value "eb509a65-d33a-40d2-9646-e2ff785428b0"}}, :uri "/app", :server-name "127.0.0.1", :params {}, :headers {"cookie" "ring-session=eb509a65-d33a-40d2-9646-e2ff785428b0", "accept-charset" "GBK,utf-8;q=0.7,*;q=0.3", "accept-language" "en-US,en;q=0.8,zh-CN;q=0.6,zh;q=0.4", "accept-encoding" "gzip,deflate,sdch", "accept" "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8", "user-agent" "Mozilla/5.0 (Windows NT 5.1) AppleWebKit/535.2 (KHTML, like Gecko) Chrome/15.0.874.106 Safari/535.2", "connection" "keep-alive", "host" "127.0.0.1:8080"}, :servlet-request #, :content-length nil, :server-port 8080, :character-encoding nil, :servlet-response #, :body #, :servlet-context #} 

Answer 1

Wygląda mapie żądanie pierścień zbudowany jest w oparciu o adaptera używanego przez serwer www. W przypadku molo, to dzieje się w ring.adapter.jetty:

https://github.com/ring-clojure/ring/blob/master/ring-jetty-adapter/src/ring/adapter/jetty.clj

If I were you, chciałbym stworzyć własny zasilacz, który wyraźnie dodaje, co trzeba mapie żądania. W szczególności należy zastąpić

request-map (servlet/build-request-map request)

z czymś takim:

request-map (assoc (servlet/build-request-map request) :jetty-request request)