luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2025-12-18 00:41:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

test: corner cases in how :responses :default gets applied

Browse source
This commit is contained in:
Joel Kaasinen 2025-04-11 12:40:27 +03:00
parent 8058cecae0
commit f038fe1941
1 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
test/cljc/reitit/ring_coercion_test.cljc
View file

@ -696,6 +696,9 @@
(let [app (ring/ring-handler (let [app (ring/ring-handler
(ring/router (ring/router
["/foo" {:post {:responses {200 {:content {:default {:schema schema-200}}} ["/foo" {:post {:responses {200 {:content {:default {:schema schema-200}}}
201 {:content {"application/edn" {:schema schema-200}}}
202 {:description "status code and content-type explicitly mentioned, but no :schema"
:content {"application/edn" {} "application/json" {}}}
:default {:content {"application/json" {:schema schema-default}}}} :default {:content {"application/json" {:schema schema-default}}}}
:handler (fn [req] :handler (fn [req]
{:status (-> req :body-params :status) {:status (-> req :body-params :status)
@ -725,6 +728,19 @@
(is (= {:type :reitit.coercion/response-coercion, :in [:response :body]} (is (= {:type :reitit.coercion/response-coercion, :in [:response :body]}
(call (request {:status 200 :response {:b 1} :format "application/edn"}))) (call (request {:status 200 :response {:b 1} :format "application/edn"})))
"invalid response, different content-type")) "invalid response, different content-type"))
(testing "explicit response schema, but for the wrong content-type"
;; TODO: we might want to rethink this behaviour!
(is (= {:status 201 :body "anything goes!"}
(call (request {:status 201 :response "anything goes!"})))
"no coercion applied"))
(testing "response config without :schema - default applies"
;; TODO: we might want to rethink this behaviour!
(is (= {:status 202 :body {:b 1}}
(call (request {:status 202 :response {:b 1}})))
"valid response")
(is (= {:type :reitit.coercion/response-coercion, :in [:response :body]}
(call (request {:status 202 :response {:a 1}})))
"invalid response"))
(testing "default response schema" (testing "default response schema"
(is (= {:status 300 :body {:b 2}} (is (= {:status 300 :body {:b 2}}
(call (request {:status 300 :response {:b 2}}))) (call (request {:status 300 :response {:b 2}})))