clojure-minimal-ssl-context.clj

(ns com.widdindustries.minimal-ssl-context
  (:import (java.security SecureRandom)
           (javax.net.ssl SSLContext X509ExtendedTrustManager)))


(let [context (SSLContext/getInstance "TLS")]
  (.init context nil
    (into-array [(proxy [X509ExtendedTrustManager] []
                   (checkClientTrusted [& _])
                   (checkServerTrusted [& _]))])
    (SecureRandom.))
  context)