 
 (ns modular.entrance
   (:require
+   [clojure.java.io :as io]
+   [clojure.pprint :refer (pprint)]
    [bidi.bidi :as bidi :refer (path-for resolve-handler unresolve-handler ->WrapMiddleware)]
    [modular.bidi :as modbidi :refer (BidiRoutesContributor routes context)]
    [schema.core :as s]

(extend-protocol UserPasswordAuthorizer
  Boolean
  (authorized-user? [this user password] this))

(defprotocol FailedAuthorizationHandler
  (failed-authorization [_ request]))

   [hiccup.core :refer (html)]
   [com.stuartsierra.component :as component])
  (:import
   java.security.SecureRandom
   javax.crypto.SecretKeyFactory
   javax.crypto.spec.PBEKeySpec
   (javax.xml.bind DatatypeConverter)))

(defprotocol HttpRequestAuthorizer
