handler.clj

(defnk make-http-handler
  [[:handler-opts auth-secret]
   cassandra :as app]
  (info "making HTTP handler")
  (info (with-out-str (clojure.pprint/pprint app)))
  (let [auth-backend (auth-token/jws-backend {:secret auth-secret})]
    (-> (make-http-route-handler app)
        (mw/wrap-coerce-ids-handler)
        (mw/wrap-check-short-token-authentication-validity-handler 15) ;; 10 second tokens
        (mw/wrap-check-token-path-handler)
        (wrap-authentication auth-backend)
        (mw/wrap-log-request-handler))))