Как мне заставить Compojure прослушивать один IP-адрес
Вопрос
Я запустил сервер Compojure (Jetty) с:
(defonce *server* (run-server {:host "localhost" :port 8080} "/*" (servlet routes)))
но netstat по-прежнему показывает, что он прослушивает 0.0.0.0: 8080, т. е.все IP-адреса.
Какой правильный параметр следует передать run-server, чтобы заставить его прослушивать с одного IP-адреса?
Решение
Я думаю, вам придется залатать Compojure.Это ничего не делает с вашим :host
параметр.Внесение этого изменения в server/jetty.clj
кажется, работает, но я не проверял это досконально.
(defn- create-server "Construct a Jetty Server instance." [options servlets] (let [port (options :port 80) host (options :host "0.0.0.0") connector (doto (org.mortbay.jetty.bio.SocketConnector.) (.setPort port) (.setHost host)) server (doto (Server.) (.addConnector connector)) servlets (partition 2 servlets)] (when (or (options :ssl) (options :ssl-port)) (add-ssl-connector! server options)) (doseq [[url-or-path servlet] servlets] (add-servlet! server url-or-path servlet)) server))
user> (run-server {:port 12346})
2009-07-22 13:48:53.999::INFO: jetty-6.1.15
2009-07-22 13:48:54.002::INFO: Started SocketConnector@0.0.0.0:12346
nil
user> (run-server {:host "127.0.0.1" :port 12345})
2009-07-22 13:48:08.061::INFO: jetty-6.1.15
2009-07-22 13:48:08.129::INFO: Started SocketConnector@127.0.0.1:12345
Не связан с StackOverflow