Compojure路由丢失参数信息

Question

我的代码：

(defn json-response [data & [status]]
    {:status (or status 200)
     :headers {"Content-Type" "application/json"}
     :body (json/generate-string data)})

(defroutes checkin-app-handler
  (GET "/:code" [code & more] (json-response {"code" code "params" more})))

当我将文件加载到repl并运行此命令时，params似乎为空：

$ (checkin-app-handler {:server-port 8080 :server-name "127.0.0.1" :remote-addr "127.0.0.1" :uri "/123" :query-string "foo=1&bar=2" :scheme :http :headers {} :request-method :get})
> {:status 200, :headers {"Content-Type" "application/json"}, :body "{\"code\":\"123\",\"params\":{}}"}

我做错了什么？我需要获取query-string，但是params映射始终为空。

Answer 1

为了将查询字符串解析到params映射中，您需要使用params中间件：

(ns n
  (:require [ring.middleware.params :as rmp]))

(defroutes checkin-app-routes
  (GET "" [] ...))

(def checkin-app-handler
  (-> #'checkin-app-routes
      rmp/wrap-params
      ; .. other middlewares
      ))

请注意，使用var (#'checkin-app-routes)并不是必须的，但是当您重新定义路由时，它会使包装在中间件中的路由闭合，从而获得更改。

IOW你也可以写

(def checkin-app-handler
  (-> checkin-app-routes
      rmp/wrap-params
      ; .. other middlewares
      ))

但是，当以交互方式重新定义路由时，您也需要重新定义处理程序。