mirror of
https://github.com/metosin/reitit.git
synced 2025-12-20 09:31:11 +00:00
27 lines
1.1 KiB
Clojure
27 lines
1.1 KiB
Clojure
|
(ns example.spec
|
||
|
|
(:require [clojure.spec.alpha :as s]
|
||
|
|
[spec-tools.spec :as spec]
|
||
|
|
[reitit.ring.coercion :as coercion]
|
||
|
|
[reitit.ring.coercion.spec :as spec-coercion]))
|
||
|
|
|
||
|
|
;; wrap into Spec Records to enable runtime conforming
|
||
|
|
(s/def ::x spec/int?)
|
||
|
|
(s/def ::y spec/int?)
|
||
|
|
(s/def ::total spec/int?)
|
||
|
|
|
||
|
|
(def routes
|
||
|
|
["/spec"
|
||
|
|
["/plus" {:name ::plus
|
||
|
|
:coercion spec-coercion/coercion
|
||
|
|
:responses {200 {:schema (s/keys :req-un [::total])}}
|
||
|
|
:get {:summary "plus with query-params"
|
||
|
|
:parameters {:query (s/keys :req-un [::x ::y])}
|
||
|
|
:handler (fn [{{{:keys [x y]} :query} :parameters}]
|
||
|
|
{:status 200
|
||
|
|
:body {:total (+ x y)}})}
|
||
|
|
:post {:summary "plus with body-params"
|
||
|
|
:parameters {:body (s/keys :req-un [::x ::y])}
|
||
|
|
:handler (fn [{{{:keys [x y]} :body} :parameters}]
|
||
|
|
{:status 200
|
||
|
|
:body {:total (+ x y)}})}}]])
|