Question

我正在使用compojure-api，并且在尝试为我的简单webapp管理Content-Type时被阻止。我想要的是发出一个只是普通/文本的HTTP响应，但不知何故，Compojure-API将它设置为“application / json”。

    (POST "/echo" []
      :new-relic-name "/v1/echo"
      :summary "info log the input message and echo it back"
      :description nil
      :return String
      :form-params [message :- String]
      (log/infof "/v1/echo message: %s" message)
      (let [resp (-> (resp/response message)
                     (resp/status 200)
                     (resp/header "Content-Type" "text/plain"))]
        (log/infof "response is %s" resp)
        resp))

但是curl显示服务器响应了Content-Type：application / json。

$ curl -X POST -i --header 'Content-Type: application/x-www-form-urlencoded' -d 'message=frickin compojure-api' 'http://localhost:8080/v1/echo'
HTTP/1.1 200 OK
Date: Fri, 13 Jan 2017 02:04:47 GMT
Content-Type: application/json; charset=utf-8
x-http-request-id: 669dee08-0c92-4fb4-867f-67ff08d7b72f
x-http-caller-id: UNKNOWN_CALLER
Content-Length: 23
Server: Jetty(9.2.10.v20150310)

我的日志显示该函数请求“普通/文本”，但不知何故该框架胜过它。

2017-01-12 18:04:47,581  INFO [qtp789647098-46]kthxbye.v1.api [669dee08-0c92-4fb4-867f-67ff08d7b72f] - response is {:status 200, :headers {"Content-Type" "text/plain"}, :body "frickin compojure-api"}

如何控制Compojure-API Ring应用程序中的Content-Type？

Answer 1

compojure-api以HTTP客户端请求的格式提供响应，使用HTTP Accept标头指示。

使用curl，您需要添加：

-H "Accept: text/plain"

您还可以提供可接受格式的列表，服务器将以该列表中第一种支持的格式提供响应：

-H "Accept: text/plain, text/html, application/xml, application/json, */*"

Answer 2

我从未尝试过compojure，所以这里什么都没有：

1。）您的本地val reps与别名命名空间的名称相同 - 有点令人困惑

2。）访问参数 - 似乎 - 您必须将ring.middleware.params/wrap-params应用于您的路线

3。）啊是的Content-Type：因为你需要:form-params，由于缺少wrap-params而没有交付，你最终会遇到某种默认路由 - 因此不是{{ 1}}。这就是我认为发生的事情，至少。

与

text/plain

演示/粘贴到repl：

lein try compojure ring-server

试验：

(require '[compojure.core :refer :all])
(require '[ring.util.response :as resp])
(require '[ring.server.standalone :as server])
(require '[ring.middleware.params :refer [wrap-params]])

(def x
  (POST "/echo" [message]
      :summary "info log the input message and echo it back"
      :description nil
      :return String
      :form-params [message :- String]
      (let [resp (-> (resp/response (str "message: " message))
                     (resp/status 200)
                     (resp/header "Content-Type" "text/plain"))]
        resp)))

(defroutes app (wrap-params x))

(server/serve app {:port 4042})

如何在compojure响应中明确设置内容类型？

2 个答案: