             [frereth-cp.shared.crypto :as crypto]
             [frereth-cp.util :as util])
   (:import clojure.lang.ExceptionInfo
-           io.netty.buffer.Unpooled))
+           [io.netty.buffer ByteBuf Unpooled]))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;; Named Constants

* impose policy limitations on clients: known, maxconn
* for known clients, retrieve shared secret from cache
"
  [state supplied-client-short-key client-message-box]
  (let [client-long-buffer (::K/long-term-public-key client-message-box)
        client-long-key (byte-array K/key-length)]
    (.getBytes client-long-buffer 0 client-long-key)

                                            my-long-secret)]
      (log/info (str "Getting ready to decrypt the inner-most hidden public key\n"
                     "Supplied client long-term key:\n"
                     (b-t/->string client-long-key)
                     "which arrived in: "
                     client-long-buffer
