콧수염 처리기에서 요청 맵에 액세스/전달하는 방법

Question

두 입력을받는 처리기 함수를 만들고 싶습니다. 하나는 URL /name에서 가져온 매개 변수이며, 두 번째는 그러나 나는 단지 하나를 통과하고, 핸들러가 2 PARAMS을 기대하고 있기 때문에 /name?x=3

(def my-app (app 
       [page-name] (handler page-name))) 

(defn handler 
    [{:keys [params]} page-name] 
    (let [x (params "x")] 
    (-> (page-templ page-name x) response constantly))) 

은 위의 실패 쿼리 문자열에서 PARAM입니다.

요청 맵을 어떻게 가져 와서 처리기로 전달합니까?

상기 요청 맵에는 x이라는 매개 변수가 포함되어 있습니다.

Answer 1

당신이처럼 페이지 이름을 파견 할 수 있다면 그것은 가장 좋습니다 :

(app 
[""] (index-page) 
["login"] (serve-login)) 

다음

기능 인덱스 페이지를 봉사 - 로그인 리턴 기능을 하나 개의 인수의.

(defn index-page[] 
    (fn [req] ..)) 

req는 키/값 맵에있는 모든 url 매개 변수를 포함 할 요청입니다. 얻으려면 매개 변수 값은이 작업을 수행 :

(-> req (get :params) (get :x)) 

그래서 전체 솔루션은 다음과 같이 보일 것입니다 :

(def my-app (app 
       ["page1-name"] (handler))) 

(defn handler [] 
    (fn [req] 
    (let [x (-> req :params :x)] 
     (-> (page-templ page-name x) response)))) 

편집 :은 (랩 키워드 PARAMS에 당신이 응용 프로그램을 포장하는 것을 잊지 마세요) 및 (wrap-params)의 경우 다음을 수행 할 수 있습니다.

(def my-wrapped-app 
    (-> my-app 
    (wrap-keyword-params) 
    (wrap-params))