后重定向？未在liberator中工作或印前检查响应不成功

Question

我有以下代码：

defresource handle-sign-in [redirect-uri]
  :available-media-types ["application/json"]
  :allowed-methods [:post]
  :post! (prn "welcome to post")
  :post-redirect? (fn [_] ;;(ring-response
                           {:location redirect-uri}
                           ;;)
                    )
  )

当我发送请求时，当我将重定向位置图包装在ring-response周围时，我得到了错误Preflight response is not successful和XMLHttpRequest cannot load [authorize-uri] due to access control checks.，但是，我没有得到错误，但我也没有在浏览器中得到重定向。我做错了什么？

-编辑--

这是我的system.components配置。

(defn config []
  {:http-port  (Integer. (or (env :port) 5000))
   :middleware [[wrap-defaults api-defaults]
                wrap-with-logger
                wrap-gzip
                ignore-trailing-slash
                [wrap-reload {:dir "../../src"}]
                [wrap-trace :header :ui]
                wrap-params
                wrap-keyword-params
                wrap-cookies
                [wrap-cors #".*"]
                ]})

这是我的新资源的样子：

(defresource handle-sign-in [authorize-uri]
  :available-media-types ["application/json"]
  :allowed-methods [:post]
  :post-redirect? true
  :as-response (fn [d ctx]
                 (-> (as-response d ctx) ;; default implementation
                     (assoc-in [:headers "Access-Control-Allow-Origin"] "*")
                     (assoc-in [:headers "Access-Control-Allow-Headers"] "Content-Type")
                     )

                 )
  :location authorize-uri
  )

但我仍然得到"No 'Access-Control-Allow-Origin‘报头出现在请求的资源上。“错误。

Answer 1

请阅读有关CORS的信息。您需要在资源中实现OPTIONS方法，或者使用适当的中间件(例如ring-cors )包装您的处理程序。